怎样使窗体只显示一次?

wangbm 2003-09-10 04:52:57
Private Sub mnuQPowOff_Click()
Dim frm As Form
Set frm = New Form1
frm.Show

End Sub
代码如上。我要使FORM1只显示一次,即下一次点击菜单时不打开新窗体,
只移到最前面获得焦点就行。因为我几个程序用的是同一个窗体。
...全文
155 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
wangbm 2003-09-10
  • 打赏
  • 举报
回复
sxfzu(flying) 的可行。
谢谢大家
felix 2003-09-10
  • 打赏
  • 举报
回复
将Dim frm As New Form定义到全局模块,然后
Private Sub mnuQPowOff_Click()
frm.Show
End Sub
strongfisher 2003-09-10
  • 打赏
  • 举报
回复
在active事件中加判断
wangbm 2003-09-10
  • 打赏
  • 举报
回复
直接SHOW只会执行一次FORM_LOAD()
wangbm 2003-09-10
  • 打赏
  • 举报
回复
直接SHOW不行因为我是同一窗体,但不同内容。
射天狼 2003-09-10
  • 打赏
  • 举报
回复
直接SHOW就行了~~

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧