Foxtable(狐表)用户栏目专家坐堂 → 窗口满屏显示


  共有2748人关注过本帖树形打印复制链接

主题:窗口满屏显示

帅哥哟,离线,有人找我吗?
nxqtxwz
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
窗口满屏显示  发帖心情 Post By:2023/12/20 12:38:00 [显示全部帖子]

请问老师,
1、我制作一个独立窗口,怎样才能让这个窗口一打开就是满屏显示呢。
2、录入窗口中有一些控件,想一打开窗就将登录用户名填写在姓名控件中,并在另一个表中以登录的姓名查找这个人的信息填入窗口内相关控件中,包括照片写入图片控件中。

 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2023/12/20 15:00:00 [显示全部帖子]

直接赋值代码应写在哪呢,写窗口的事件中都显示错误。
比如以用户名调取表A的性别、民族、照片等写入窗口相应的控件中怎么写代码呢


 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2023/12/20 15:53:00 [显示全部帖子]

在表事件中没问题
就是给窗口控件赋值不知怎么做,代码这么写在窗口事件中显示错误。
e.form.Controls("Text1") = User.Name

 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2023/12/20 16:28:00 [显示全部帖子]

写不进去呀

Dim dr As DataRow = DataTables("职工信息总表").Find("姓名=User.Name")
        If dr IsNot Nothing Then
            e.form.Controls("TextBox1").text = User.Name
            e.form.Controls("TextBox2").text = dr("性别")
            
        End If

 回到顶部
帅哥哟,离线,有人找我吗?
nxqtxwz
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1495 积分:12175 威望:0 精华:0 注册:2013/3/19 16:41:00
  发帖心情 Post By:2024/1/11 8:24:00 [显示全部帖子]

请问,自制窗口在别的一些显示器上不能正常显示的问题有办法解决吗。估计应该是与不同显示器上不同的分辩率有关。

 回到顶部