Question

vb怎么从第一个窗体到第二个窗体,再从第二个窗体到第三个窗体?

Answer 1

Form1.Show 以后

假设一个按钮 button1，单击事件：

Form2.Show
me.Hide

Form2.Show 以后，同样加入事件处理程序

Form3.show

me.hide

追问

我的意思是 第一窗体是点击一个按钮进到第二个窗体的...然后第二个窗体是输入账号 密码 才能进到第3 个窗体...

追答

假设一个按钮 button1，单击事件：

Form2.Show
me.Hide

Form2.Show 以后，同样加入事件处理程序
sub Login()
if check(name pwd)=true then

Form3.show
me.hide
else
msgbox " 输入的有误"
end if
end sub

private check(byvl name as string，byval pwd as string) as boolean
dim bret as boolean
bret=false
'
dim cn as new adodb.connection
dim rs as new adodb.recordset
....
str="select top 1 * from {users} where name='" & name & "' and pwd='" & pwd & "'"
set rs=cn.execute(str)
....

if rs.eof or rs.bof then
bret=false
else
bret=true
endif
check=bret
end function

追问

这个程序 放在哪段? 确定按钮上吗?

Answer 2

在form1的一个按钮上写：
form2.show
就行了