vb.net登陆 vbnet webclient

vb.net登陆界面中当login验证后进入main窗体时怎样关闭login窗体

您可以调用Me.Hide()方法隐藏Login窗体。

另外，如果您使用新建工程后的那个默认窗体作为Login窗体，那么您只能隐藏这个窗体或修改程序的启动对象。因为VB.net默认将创建工程时的那个默认窗体作为程序的主窗体，应用程序的主消息循环就建立在这个窗体上，如果您关闭这个窗体，那么所有的消息泵都会停止，应用程序就会退出。

我比较推荐您将Main窗体设为应用程序的主窗体，这样可以减小资源的占用，当Login完成后就可以释放Login窗体了。

另外，vb.net中的me变量相当于C语言中的this指针，它指向当前类。

推荐一个网站，这个网站有很多的教程，而且基本都是附部分代码，可能有一些对您有用的信息。

如何用VB.net连接数据库做一个简单的登陆窗口？

Label1.Caption = "融通系统外挂程序"

If Dir(App.Path "/hjw.mdb") "" Then

Set mydata = OpenDatabase(App.Path "\hjw")

Set myrs1 = mydata.OpenRecordset("user", dbOpenTable)

Else

Set mydata = CreateDatabase(App.Path "\hjw", dbLangGeneral, dbVersion40)

mydata.Execute "create table ku (建立日期 text(100),库名 text(100),功能 text(100))"

mydata.Execute "create table system (店号 integer,建立日期 text(100),文件路径 text(100),软件版本 text(100),路径1 text(50),路径2 text(50),路径3 text(50),路径4 text(50))"

kuname = "system"

kugn = "文件信息"

Me.showlist1

mydata.Execute "create table user (user text(50),passwd text(50),name text(50),quanx integer)"

kuname = "user"

kugn = "用户信息"

Me.showlist1

Private Sub cmdOK_Click()

txtUserName.SetFocus

If Trim(txtUserName.Text = "") Then

MsgBox "没有这个用户，请重新输入用户名！", vbOKOnly + vbExclamation, "警告"

txtUserName.SetFocus

Else

sql = "select * from user where user = '" txtUserName.Text "'"

'Debug.Print sql

'Set mrc = ExecuteSQL(sql, MsgText)

Set myrs2 = mydata.OpenRecordset(sql)

If myrs2.EOF = True Then

MsgBox "没有这个用户，请重新输入用户名!", vbOKOnly + vbExclamation, "警告"

txtUserName.SetFocus

Else

If Trim(myrs2.Fields(1)) = Trim(txtPassword.Text) Then

UserName = myrs2.Fields(2)

myrs2.Close

Me.Hide

' UserName = Trim(txtUserName.Text)

'Debug.Print UserName

MDIform1.Show

Else

MsgBox "输入密码不正确，请重新输入！", vbOKOnly + vbExclamation, "警告"

txtPassword.SetFocus

txtPassword.Text = ""

End If

End If

End If

End Sub

在VB.NET中做登陆界面老是出现这个错误

oledbconnection conn=new oledbconnection("连接字符串")

conn.open()

oledbcommand1.connection=conn;

oledb.comandtext= "SELECT 用户, 密码 FROM yonghu where 用户='" Me.TextBox1.Text "' and 密码='" Me.TextBox2.Text "'"

vb.net + access 登陆 验证

分开写看看vb.net登陆：

Dim cl_Reader As OleDbDataReader

set cl_Reader =cl_Cmd.ExecuteReader

ASP.NET用户登陆处理（VB.NET）

结果同上区别在于后半段

if(count0)

{

Response.Redirect("WebForm3.aspx");

}

else

{

Response.Redirect("WebForm4.aspx");

}

我感觉上面最好写成字符串类型，用一个页面实现会好一些！

页面部分采用传递方式用 string jjj= "ppp.asp?ddd=1"; ddd就是方式用

Response.Redirect(jjj);

vb.net登陆的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet webclient、vb.net登陆的信息别忘了在本站进行查找喔。