尝试利用VB.net连结MySQL,初步先以VB.net作为前端操作介面,MySQL则为后端数据库。
为了使程式结构容易理解,分别将连接MySQL程式(connection())和帐号密码登入程式(login())撰写成模组,再由Form(Fm_con_login)统一引用,如下列代码所示。
Public Class Fm_con_login
Private Sub bt_connect_Click(sender As Object, e As EventArgs) Handles bt_connect.Click
connection()
End Sub
Private Sub bt_login_Click(sender As Object, e As EventArgs) Handles bt_login.Click
login()
End Sub
End Class
另外,connection()和login()两个模组程式的几个重点摘要如下:
1.利用Imports MySql.Data.MySqlClient语法,连结MySQL。
2.使用try... catch... finally... end try...陈述式结构做为侦错的架构,对于新手而言,这个陈述式结构可借由讯息反馈达到有效的储错功能,相当值得善用的除错结构。
3.延续try... catch... finally... end try...陈述式结构做为侦错的架构,进一步延伸于使用者介面上的应用,让使用者得以借由Textbox背景的红蓝颜色变化,快速得知是否已成功连结MySQL资料库,程式码如下:
Try
mysqlcon.Open()
Fm_con_login.TB_con_status.Text = "Connection Successful"
Fm_con_login.TB_con_status.BackColor = Color.Blue
mysqlcon.Close()
Catch ex As MySqlException
Fm_con_login.TB_con_status.Text = "Connection Failure"
Fm_con_login.TB_con_status.BackColor = Color.Red
Finally
mysqlcon.Dispose()
End Try
End Sub
-----如果文章对您有帮助,打开微信扫一扫,请作者喝杯咖啡。-----