如何用VB.net做一个简单的小软件(第一步)打开vs2019 创建新项目,语言选择Visual Basic(就是vb....更多内容,请关注我们高考升学网的专题频道。
qdE高三网
如何用VB.net做一个简单的小软件(第一步)
如何做个简单的小软件呢?如果要求不高,那winform绝对是必选项,那么废话不多少了,先用winform做个简单的登录界面,一步一步的开启做软件之路,冲鸭!冲鸭!qdE高三网
首先呢,在做登录界面之前,我们得有数据库是不是,用来保存我们的用户信息,老样子还是用Access作数据库吧,按照下图的样子做个用户信息表,里面初步要有用户ID、用户姓名、用户账号、用户密码,以后随着功能的添加还要设置账号类型、权限等内容,目前设置这些就够了。qdE高三网
好了,我们数据库里就有了第一位用户张哈哈的用户信息了。下面要开始表演了,啧啧!qdE高三网
打开vs2019 创建新项目,语言选择Visual Basic(就是vb.net),平台选择windows,选中windows 窗体应用(.NET Framework),如下图所示,点击下一步。qdE高三网
设置项目名称等内容就不说了,都是设置好后,就是下图这个样子。qdE高三网
然后这里就省略一些字了,经过调整大小,设置一些属性参数,把界面调整到下图的样子。qdE高三网
是不是有点像登录界面的样子了,winform是事件驱动的,登录界面里有两个按钮,在单击他们时就会产生点击事件,点击登录按钮就要跳转到主程序界面,点击取消按钮就要关闭登录界面,按照这个思路开始写代码。首先双击登录按钮,进入Button1_Click事件里。如图所示qdE高三网
按照思路开始编写程序,Button1_Click里面的代码就是这样的qdE高三网
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.ClickqdE高三网
Dim sql As StringqdE高三网
Dim conn As New OleDbConnectionqdE高三网
Dim PassWord As StringqdE高三网
Dim UserName As StringqdE高三网
UserName = TextBox1.Text.TrimqdE高三网
PassWord = TextBox2.Text.TrimqdE高三网
If UserName = &,34;&,34; Or PassWord = &,34;&,34; ThenqdE高三网
MessageBox.Show(&,34;账号或密码不能为空&,34;)qdE高三网
ReturnqdE高三网
End IfqdE高三网
conn.ConnectionString = &,34;provider =microsoft.ace.oledb.12.0;data source=C:UsershuanglongDesktop数据库.accdb&,34;qdE高三网
sql = String.Format(&,34;select 用户账号,用户密码 from 用户信息表 where 用户账号=&,39;{0}&,39; and 用户密码=&,39;{1}&,39;&,34;, UserName, PassWord)qdE高三网
Dim adapter As New OleDbDataAdapter(sql, conn)qdE高三网
Dim dt As New DataSetqdE高三网
adapter.Fill(dt, &,34;用户信息表&,34;)qdE高三网
Dim datareader As DataTableReaderqdE高三网
TryqdE高三网
datareader = dt.Tables(&,34;用户信息表&,34;).CreateDataReaderqdE高三网
If datareader.Read ThenqdE高三网
If datareader.HasRows ThenqdE高三网
MessageBox.Show(&,34;登录成功&,34;)qdE高三网
End IfqdE高三网
ElseqdE高三网
MessageBox.Show(&,34;登录失败,请输入正确账号密码&,34;)qdE高三网
ReturnqdE高三网
End IfqdE高三网
Catch ex As ExceptionqdE高三网
MessageBox.Show(&,34;出现异常&,34; & ex.Message)qdE高三网
End TryqdE高三网
Me.Hide()qdE高三网
End SubqdE高三网
篇幅有限,代码就不详细讲了,大家应该能看懂,编译一下就是如下图这样qdE高三网
输入正确的数据库里的用户账号和密码,点击登录按钮就会弹出登录成功qdE高三网
输入错误的话会弹出登录失败界面qdE高三网
然后进入Button2_Click事件,就是取消按钮的点击事件,上面说了点击取消按钮整个登录界面将关闭,用Me.Close就行了,Me代表当前窗体,C,里用this这个关键词表示当前窗体。qdE高三网
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.ClickqdE高三网
Me.Close()qdE高三网
End SubqdE高三网
这就是非常简单的登陆界面,可以在创建个窗体,当账号和密码输入正确时点击登录按钮后登录界面隐藏,界面跳转到新创建的窗体里。今天就不介绍了,下次才进一步介绍qdE高三网
下次见了[送心][送心][送心]qdE高三网
qdE高三网
以上就是如何用VB.net做一个简单的小软件(第一步)的全部内容,接下来,我们一起来了解关于各网友对于vb.net视频教程下载这个话题的讨论结果。
如何用VB.net做一个简单的小软件(第一步)
打开vs2019 创建新项目,语言选择Visual Basic(就是vb.net),平台选择windows,选中windows 窗体应用(.NET Framework),如下图所示,点击下一步。 设置项...qdE高三网
vb.net视频教程下载拓展阅读
qdE高三网
通俗易懂:什么是.NET?.NET Framework?.NET Core?(比较全面)
什么是.NET?什么是.NET Framework?本文将从上往下,循序渐进的介绍一系列相关.NET的概念,先从类型系统开始讲起,我将通过跨语言操作这个例子来逐渐引入...qdE高三网
标签:
vb.net视频教程下载