正文
VB.net中登录页面 vb登录界面
小程序:扫一扫查出行
【扫一扫了解最新限行尾号】
复制小程序
【扫一扫了解最新限行尾号】
复制小程序
VB.Net 新手问题:如何关闭登录界面并跳到另一个界面
me.dispose()
楼主针对这个问题我也纠结过很久不过就在刚刚我找到了问题所在:
还是用me.close()
打开
项目
》
最下面一行有一个属性》
应用程序》下面
有一个关机模式
改为:当最后一个窗体关闭时。。。注意
me.close要写在窗体show()后面
例如
写成
f2.show()
me.close()
不要写成
me.close()
f2.show()
如何用vb.net实现用户登陆界面的操作?
select * from t1 where name=** and password=** and style=**
如果查询到的表是空的,说明登陆错误,否则成功
用vb.net ,后台用access 做一个登录窗口
建个模块VB.net中登录页面, Dim varcnn As OleDb.OleDbConnection ReadOnly Property cnn() As OleDb.OleDbConnection
Get
If varcnn Is Nothing OrElse varcnn.State ConnectionState.Open Then Dim cnstr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=""" My.Application.Info.DirectoryPath "\Contact.mdb"";Persist Security Info=True"
varcnn = New OleDbConnection(cnstr)
varcnn.Open()
End If
Return varcnn
End Get
登录窗体VB.net中登录页面,新建一个就行了。代码Public Class LoginForm1
Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
Using cmd As New OleDb.OleDbCommand("select password from tbuser where userid =?", cnn)
cmd.Parameters.Add("?", OleDbType.VarChar).Value = Me.UsernameTextBox.Text
Dim obj As Object = cmd.ExecuteScalar
If (Not IsDBNull(obj)) AndAlso (obj IsNot Nothing) AndAlso obj = PasswordTextBox.Text Then
Me.DialogResult = Windows.Forms.DialogResult.OK
Else MessageBox.Show("密码不正确VB.net中登录页面!") Return
End If
End Using Me.Close()
End Sub Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel.Click
Me.DialogResult = Windows.Forms.DialogResult.Cancel
Me.Close()
End SubEnd Class 项目属性里点查看应用程序事件,写代码Namespace My ' 以下事件可用于 MyApplication:
'
' Startup: 应用程序启动时在创建启动窗体之前引发。
' Shutdown: 在关闭所有应用程序窗体后引发。如果应用程序异常终止,则不会引发此事件。
' UnhandledException: 在应用程序遇到未处理VB.net中登录页面的异常时引发。
' StartupNextInstance: 在启动单实例应用程序且应用程序已处于活动状态时引发。
' NetworkAvailabilityChanged: 在连接或断开网络连接时引发。
Partial Friend Class MyApplication
Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
Dim f As New LoginForm1
If Not f.ShowDialog = DialogResult.OK Then
End
End If
End Sub End ClassEnd Namespace
VB.net中登录页面你测试一下吧。
在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 用户登录
哈哈简单哪
第一步:登陆网页代码
第二步:登陆以后判断是否登陆成功
有两种方法:1.获取网页代码,判断网页字符有无”登陆成功”字样
源代码:
2.就是判断网页是否跳转到了某一页
源代码:
两种方法结合起来用,可以判断网页是否无法连接
VB.net中登录页面的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于vb登录界面、VB.net中登录页面的信息别忘了在本站进行查找喔。