之后:
Form3的VB6代码:
Option
Explicit
Private
Declare
Sub
Sleep
Lib
"kernel32"
(ByVal
dwMilliseconds
As
Long)
‘延时函数
Private
Sub
Form_Load()
Me.Hide
'此为From3隐藏
Form1.Show
'Form1启动
DoEvents
Sleep
(1000)
'暂停1秒
Unload
Form1
'Form1关闭并释放
Form2.Show
'Form2启动
DoEvents
Sleep
(1000)
'暂停1秒
Unload
Form2
'Form2关闭并释放此孝
Form3.Show
'Form3启动
End
Sub
分类: 电脑/网络 >>程序设计 >>其他编程语言问题描述:
我做了一个小程序,当初没有想设密码。现在做了一个密码登陆form2,但是
程序是先启动form1的,请问在这种情况下如何才能让form2先启动,输入密
码后在启动form1?
我做form2的Command1 Click如下:
If Text1.Text = "12345" Then'
If Text2.Text = "asdf" Then'
MsgBox "或伏您成功登陆!"'
Form2.Hide '
Form1.Show '
End If
Else
Text1.Text = ""
Text2.Text = ""
MsgBox "密码错误", , "提雀渣示"'
End If
解顷团悄析:
工程->工程属性->启动对象->选择form2
VB是事件驱动的,所以和执行流程相关的代码都分散在各个事件过程里。唯一一个例外的就是启动过程sub main()
该过程写在通用模块Module里面,并且你要指定以该过程为启动点。
一般默认是以窗体为启动点,这将载入窗体,如果你添加了Form_Load事件那么就执行该过程李轮然后显则春示窗体。其他代码就看你的代码在那个事件里了,比如有按钮,那么点击按钮就会孙扰耐触发Click事件(如果你有写这个事件的话)
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)