正常的Select 语句如下： Dim status As Integer = 5Select Case statusCase 0Console.WriteLine("状态是:0")Case 1Console.WriteLine("状态是:1")Case 2Console.WriteLine("状态是:2")Case ElseConsole.WriteLine("其它状态!")End Select 也可以比较数值范围，确定数值范围的两个值用关键字To连接。如果Select表达式在这个范围中，则执行該Case语句。 Dim status As Integer = 5Select Case statusCase 0Console.Wr...
VB.NET MYSQL DataGridView 增删改查（INSERT,SELECT,UPDATE,DELETE） 留存备用。 Imports MySql.Data.MySqlClientPublic Class Form1' GLOBAL DECLARATIONSDim conString As String = "Server=localhost;Database=net2;Uid=root;Pwd=123456;"Dim con As New MySqlConnection(conString)Dim cmd As MySqlCommandDim adapter As MySqlDataAdapterDim dt As New DataTable()Private Sub Form1_Load(sender As Object, e As EventArgs...