Question

vb 不再显示窗体

我自己写了个小程序，里面有一个窗体是说使用帮助，我添加了一个checkbox，想要选中以后，下次启动时就不再启动这个帮助窗体，要怎么做
或者是通过代码设置程序的启动窗体
不要说点击工程属性，这个我懂
不要只能实现一次的，我要生成exe文件，要生成后也能用的

Answer 1

在程序退出（UnLoad）前，把CheckBox的Value属性值保存到注册表、文本文件、INI文件、数据库、网络上……等等任何你认为合适的地方，然后在程序启动（Load）的时候从上述地方取出保存的数值，这样就知道CheckBox是已经点击了还是没点，如果点了就不再显示帮助窗体，没点就继续显示。

追问

我比较笨，能帮我写吗
帮助窗体是help，主窗体是selection，当点击了help中名为judge的checkbox控件后，以后不再显示help，直接启动selection（似乎每次启动时会初始化，judge都是未点击，如果我要它开了就是点击状态怎么做）

追答

以下是最简单也是最好的利用注册表储存数据的例子，请把代码放入主窗体中：

Private Sub Form_Load()
Dim j As Integer
j = Val(GetSetting(App.Title, "help", "judge", "0"))
'读取注册表中储存的CheckBox的值
If j = 0 Then help.Show
'如果是0，说明尚未点击CheckBox，因此显示help窗体
End Sub

Private Sub Form_Unload(Cancel As Integer)
SaveSetting App.Title, "help", "judge", help.judge.Value
'退出前把CheckBox的值储存到注册表
End Sub

Answer 2

添加一个User类型的的全局属性，用My.Setting来读写。

Answer 3

我的做法有二:1是用注册表记录它的状态, 2是用服务器上的文本文件或数据库记录它的状态.

Answer 4

达到你的要求不需要判断窗体二是不是当前窗体，程序运行时两个窗体都已加载，只不过默认显示窗体一隐藏二，你想要的功能是点击按钮窗体二隐藏，你的加载指的是不是显示，显示就用form2.show
隐藏form2.hide，你想点击隐藏后等一会就显示可以用sleep延时函数，还有获得当前窗体是用getforewindow（好像是这么写的又好像是getforegroundwindow这个不用记，只需知道有这个函数)获得当前句柄，每个窗体都分配唯一句柄例如窗体二的句柄就是form2.hwnd，可以用函数返回值与此值比较