在用VB.NET敲三层的登录前,自己先敲了一个没有用三层的登录以和三层的登录进行比较。下面就是我编写的关于面向过程的登录例子。
在进行代码编写之前我们需要专门建立一个数据库:下面这个是我建立的数据库,数据库名字是SanCeng,表的名字是TLoginUser.
为了方便我们设置的表里的字段只有两个:
数据库添加完成后接下来就是我们的代码部分。
首先是一个很简单登录界面:
接下来就是数据库的连接:
'连接数据库
Dim cnStr As String = "data source=zwk-PC;initial catalog=SanCeng;user id=sa;password=zwk;"
Dim cn As SqlClient.SqlConnection = New SqlClient.SqlConnection(cnStr)
cn.Open() '打开数据库
Dim strSql As String = "SELECT * FROM TLoginUser " '查询字符串1
'Dim strSql As String = "select * from TLoginUser where strUser_ID='" & txtID.Text & "'and strUser_PWD='" & txtPWD.Text & "'" '查询字符串2
Dim cmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(strSql, cn)
cmd.CommandText = strSql
Dim dr As SqlClient.SqlDataReader = cmd.ExecuteReader() '查询结果返回到数据读取器中
再接下来就是业务的判断:
While (dr.Read())
If txtID.Text.Trim = dr("strUser_ID").ToString() Then
If txtPWD.Text = dr("strUser_PWD").ToString() Then
MsgBox("登录成功!")
Exit While
Else
MsgBox("密码错误!")
txtPWD.Text = ""
Exit While
End If
Else
MsgBox("账号错误!")
txtID.Text = ""
txtPWD.Text = ""
Exit While
End If
End While
cn.Close()
End Sub
最后就是我们的运行结果:
到此我们这个简单的面向过程的登录例子就完成了。
分享到:
相关推荐
VB.NET的人机界面具有易写性,但是基于该语言的算法很少,多数情况下要与速度较慢的Matlab控件结合,在做一些信号处理应用的时候几乎成为编程菜鸟的瓶颈。网上关于FFT的源代码很多,大多数是用C语言写的,用VB.NET写...
VB.NET 初学者教程 VB.NET 初学者教程 VB.NET 初学者教程 VB.NET 初学者教程 VB.NET 初学者教程
VB具有丰富数据类型是种符合结构化设计思想语言而且简单易学此外作为种设计语言VB还有 ...许多独到的处,本工程为vb.net2010制作的简单12选5和12选3选号程序,使用了随机数和for循环语句,仅供新入门的菜鸟参考.
在VS2008环境下开发,配置config.ini文件,一个设置为“发送端",另一个设置为"接收端”,用串口线链接两个PC机串口,可通信。其实是一个半成品,仅供菜鸟学习参考,如有不足之处,也请批评指正!
可以把VB.NET转换C#工具,装换率99%。
把待机变成灰色,屏蔽待机 相信好多人都找了很久。。 菜鸟们,我们一起加油!!
本人做菜鸟时整理的,实际项目中遇到的大小问题。入门级也应了解的,概念性东西较多,有助于深入理解逻辑结构。...使用vb.net开发网站时,涉及到的知识点。以项目中从简到难的部分所涉及到的顺序排序。
SQL Server 2000菜鸟入门 chm SQL参考手册 chm UltraEdit教程 chm VB NET面向对象的实现 chm vbapi函数手册 chm vbscript语言参考 chm vbscript速查手册 chm VBSCRIP语言参考 CHM VC++ 编程指南 chm vc新手学堂 chm ...
代码难度不大,因为本人是vb菜鸟,或者可以说一个不是学计算机这一行的,但是其中也有一些自己的创新设计,做到与专业软件不一样,适合个人使用。 主要功能: 1、利用wmp能够播放任何音频文件,能够播放任何路径的...
电子版的Python GUI设计之Tkinter菜鸟编程,一般是扫描图片组成的PDF或网页版 ,不支持查找操作,特整理成Word版并分享。
1、借助本机windows media player实现播放功能(菜鸟通用方法、写播放器内核不现实) 2、路径列表与音乐列表对应实现任意路径播放 3、借用列表框TopIndex属性和鼠标位置与列表索引值换算实现光标跟随 4、选择...
《实战C#.NET编程----Spring.NET & NHibernate从入门到精通》代码 版本:V0.50 BoolsSample 项目代码 NHibernateSample 项目代码 SpringSample 项目代码 SpringNhibernateSample 项目代码 这个是代码部分 pdf我也...
《ASP.NET完全入门》面向初、中、高级用户,全面系统地介绍了ASP.NET的特点、基础知识和具体的应用。 《ASP.NET完全入门》由浅入深,层层深入的讲解了ASP.NET技术,在本书中写作中,例子都使用了VB.NET的语法。所以...
Visuai Basic.NET编程培训教程 Visuai Basic.NET编程培训教程
微软C++.NET 编程规范,微软C++.NET 编程规范,微软C++.NET 编程规范,微软C++.NET 编程规范
第一篇 “概论”——本篇介绍了微软的.NET战略、ASP.NET的历史以及.NET的安装和运行环境,即使你是一个菜鸟级人物,在这里你也会得心应手。 第二篇 “WEB Form”—— 本篇介绍了ASP.NET的WEB Form技术,对APS...
ASP.NET精美个人网站管理系统很适合菜鸟学习用ASP.NET精美个人网站管理系统很适合菜鸟学习用ASP.NET精美个人网站管理系统很适合菜鸟学习用
VB菜鸟级别初学编写试用
asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net asp.net
本课程将介绍开发ASP.NET程序所涉及的开发工具和运行环境、VB.NET程序设计基础和ASP.NET的程序设计基础等有关内容。 希望同学通过本课程的学习,掌握开发ASP.NET程序的基础知识和基本方法,对网络程序设计有一个全面...