vb.net VB语言贝叶斯

如何做一个简单的小软件?如果要求不高,那么winform肯定是必须的,废话不多说。先用winform做一个简单的登录界面,一步步开始做软件的道路。洗鸭子!

vb.net VB语言贝叶斯

首先,在制作登录界面之前,我们需要有一个数据库来存储我们的用户信息。我们照常使用Access作为数据库,做一个如下图的用户信息表,初始包含用户ID、用户名、用户账号、用户密码。后来增加了功能,需要设置账号类型,权限等内容。目前来看,这些设置已经足够了。

嗯,我们的数据库里有第一个用户张哈哈的用户信息。接下来,表演将开始。啧啧!

打开vs2019创建新项目。选择Visual Basic(即VB.NET)作为语言,windows作为平台和。如下图所示,点击下一步。

关于项目名称的设置我就不说了,都设置好了,就像下图。

然后这里省略了一些单词。调整大小后,设置一些属性参数,界面调整如下图。

是不是有点像登录界面?winform是事件驱动的。登录界面有两个按钮。当您单击它们时,将会有一个单击事件。点击登录按钮,你将跳转到主程序界面。点击取消按钮,关闭登录界面,按照这个思路开始写代码。首先,双击登录按钮进入Button1_Click事件。如图所示

按照思路开始写程序,Button1_Click里的代码是这样的。

private Sub Button1 _ Click(sender As Object,e As EventArgs)处理button 1。点击

将sql显示为字符串

作为新OleDbConnection的Dim连接

将密码显示为字符串

将用户名显示为字符串

用户名=文本框1。文本。修剪

密码=文本框2。文本。修剪

如果用户名= & # 34;"或者密码= & # 34;"然后

MessageBox。显示(& # 34;账号或密码不能是空& # 34;)

返回

如果…就会结束

连接字符串= & # 34;provider = Microsoft . ace . oledb . 12.0;Datasource = c: \ users \黄龙\ desktop \ database。accdb & # 34

sql =字符串。格式(& # 34;从用户信息表中选择用户帐户、用户密码,其中用户帐户= & # 39;{0}'和用户密码= & # 39;{1}'"用户名、密码)

Dim适配器作为新OleDbDataAdapter(sql,康涅狄格州)

将dt标注为新数据集

适配器。填充(dt,& # 34;用户信息表& # 34;)

将datareader调暗为DataTableReader

尝试

datareader = dt。表格(& # 34;用户信息表& # 34;).CreateDataReader

如果datareader。那么读吧

如果datareader。那么散列行

MessageBox。显示(& # 34;登录成功& # 34;)

如果…就会结束

其他

MessageBox。显示(& # 34;登录失败,请输入正确的账户密码& # 34;)

返回

如果…就会结束

将ex作为异常捕获

MessageBox。显示(& # 34;发生了异常& # 34;& amp前任。消息)

结束尝试

我。隐藏()

末端接头

篇幅有限,就不详细说代码了。大家应该都能看懂。如下图编译即可。

在数据库中输入正确的用户账号和密码,点击登录按钮,弹出登录成功的提示。

输入不正确会弹出登录失败界面。

然后进入Button2_Click事件,也就是取消按钮的Click事件。上面说点击取消按钮会关闭整个登录界面。利用我吧。Close,其中Me代表当前窗体,这个关键字在C#中用来表示当前窗体。

Private Sub Button2_Click(发送方作为对象,例如EventArgs)处理Button2。点击

我。关闭()

末端接头

这是一个非常简单的登录界面。您可以创建一个表单。当账号和密码输入正确后,点击登录按钮,登录界面将被隐藏。界面将跳转到新创建的表单。今天不介绍了,下次再进一步介绍。

下次见了[送心][送心][送心]
下次再见[宋新][宋新][宋新]

免责声明:本站所有文章内容,图片,视频等均是来源于用户投稿和互联网及文摘转载整编而成,不代表本站观点,不承担相关法律责任。其著作权各归其原作者或其出版社所有。如发现本站有涉嫌抄袭侵权/违法违规的内容,侵犯到您的权益,请在线联系站长,一经查实,本站将立刻删除。

发表回复

登录后才能评论