Foxtable(狐表)用户栏目专家坐堂 → 代码创建窗口


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

主题:代码创建窗口

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


加好友 发短信
等级:三尾狐 帖子:655 积分:5004 威望:0 精华:0 注册:2011/11/26 17:46:00
代码创建窗口  发帖心情 Post By:2022/8/12 12:46:00 [只看该作者]

请问老师,可否通过代码来新增窗口?

 回到顶部
帅哥,在线噢!
cd_tdh
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3212 积分:21346 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2022/8/12 12:56:00 [只看该作者]

比如这样:

Dim frm As New system.Windows.Forms.Form
frm.Text = "欢迎使用"
frm.Topmost = True
frm.width = 500
frm.height = 500
frm.Show

[此贴子已经被作者于2022/8/12 12:56:35编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110798 积分:563928 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/12 13:34:00 [只看该作者]

Foxtable设计的窗口无法通过代码新增

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


加好友 发短信
等级:三尾狐 帖子:655 积分:5004 威望:0 精华:0 注册:2011/11/26 17:46:00
  发帖心情 Post By:2022/8/12 17:19:00 [只看该作者]

谢谢,试了一下真的可以

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


加好友 发短信
等级:三尾狐 帖子:655 积分:5004 威望:0 精华:0 注册:2011/11/26 17:46:00
  发帖心情 Post By:2022/8/12 17:46:00 [只看该作者]

前辈,再多问你一个问题。
我看帮助文件里没有用代码修改窗口尺寸的方法,
我用你代码里的方法客修改已有窗口的尺寸吗?
forms("窗口").width  forms("窗口").height

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110798 积分:563928 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/8/13 8:28:00 [只看该作者]

如果是独立、模式窗口:Forms("窗口").baseform.width

停靠窗口:Forms("窗口").panel.parent.width

 回到顶部