谁知道用vb.net 怎么才能实现
代码要写在哪里才合适,代码怎么写呢
楼下的代码很正确 关键是两个窗体不在一个项目程序里 而是在同一个解决方案里面
[此贴子已经被作者于2006-12-27 12:31:49编辑过]
[此贴子已经被作者于2006-12-27 12:31:49编辑过]
这个问题可以适当扩充一下:
首先,可以定义一个一般通用模块,把所有窗体类的公共变量放在里面,在判断在密码验证窗体中,可以这样写代码:
(这是密码窗口的代码)
Public constr As String="....."
Public sqlstr AS String="select count(*) from 密码表 where user='...' and Password='....'"
Public mycon As New SqlConnection(sqlstr)
在对应的事件代码中
If mycon.State=........closed Then
mycon.Open()
End If '注意这里最好是先写个判断语句,将起打开(或许已经打开了),用了后将mycon关闭,因为如果同时用了sqlDataReader和DataSet比较容易出现错误,呵呵,还有数据阅读器sqldatareader也一样,用了后关闭,养成好的习惯
以免发生意想不到的错误
Dim mycom As New SqlCommand(sqlstr,mycon)
mycom.ExecuteScalar()
If mycom.ExecuteScalar()<>1 Then
MsgBox("密码或用户名错误")
Application.Exit()
Else
MsgBox("恭喜你,登陆成功")
Me.Close()
End If
<2>在模块中
module
首先定义公共变量,呵呵
然后:
Private Sub main()
Dim ps As New 密码筐类
Ps.StartPosition=.....自己写
Ps.ShowDialog()
Application.Run(New 你所要运行的窗体(比如说主窗体))
End main
End module