使用MySqlHelper类查询并显示数据

　　 Imports System.Data.SqlClient

...
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　　   Dim MySqlHelper As New MySqlHelper
        Dim cmd = "select * from yccy_read"
        Dim TT As New DataTable
        TT = MySqlHelper.ExecSelectNo(cmd, CommandType.Text)
        MsgBox("第四行第二列的数据是" & TT.Rows(3).Item(1))
        MsgBox("("共有" & TT.Rows.Count & "条记录")
    End Sub

注意：需要使用MySqlHelper.ExecSelectNo。

 

需要注意，查询中文的时候，类中需要改为：    Dim connStr As String = "database=test;server=127.0.0.1;Uid=root;Pwd=root;charset=utf8" 默认是没有charset=utf8的，会查不到数据