将mysql查询转换为在vb.net中使用

将mysql查询转换为在vb.net中使用,mysql,vb.net,Mysql,Vb.net,我是mysql和vb.net的新手,有以下问题: select `db_employee`.`firstName` as `firstName`, `db_employee`.`lastName` as `lastName`, `tbl_employment`.`position` as `position` from (`db_employee` `db_employee` inner join `tbl_employment` `tbl_employment` on (

我是mysql和vb.net的新手,有以下问题:

select `db_employee`.`firstName` as `firstName`, `db_employee`.`lastName` as `lastName`,
       `tbl_employment`.`position` as `position`
  from (`db_employee` `db_employee`
  inner join `tbl_employment` `tbl_employment` on (`tbl_employment`.`ctrlID` = `db_employee`.`ctrlID`))
 where (`tbl_employment`.`companyName` like 'MES%') 
我想把它转换成在这里使用:

Dim MySqlConn = New MySqlConnection
MySqlConn.ConnectionString = connStr
Dim SDA As New MySqlDataAdapter
Dim dbdataset As New DataTable
Dim bsource As New BindingSource
MySqlConn.Open()
Dim query As String
query = ?

您可以使用下面的代码来显示数据。。。我希望这就是你想要的……)


您可以使用正在使用的MySQL提供程序执行类似操作。这将创建连接、命令和数据读取器,并正确关闭和处理所有内容。如果需要DataTable实例,可以从DataReader加载它

    Using conn As New MySql.Data.MySqlClient.MySqlConnection("YourConnectionString")
        conn.Open()

        Using cmd As MySql.Data.MySqlClient.MySqlCommand = conn.CreateCommand
            cmd.CommandText = "select db_employee.firstName as firstName, " & _
                                        "db_employee.lastName as lastName, " & _
                                        "tbl_employment.position as position " & _
                                        "from db_employee db_employee " & _
                                        "inner join tbl_employment tbl_employment on tbl_employment.ctrlID = db_employee.ctrlID " & _
                                        "where tbl_employment.companyName like 'MES%' "

            ' Get a data reader that you can loop over or load a data table with
            Dim dr As MySql.Data.MySqlClient.MySqlDataReader = cmd.ExecuteReader

            ' How to read with a DataReader
            While dr.Read
                ' Do something with this
                Dim lastName As String = dr("lastName")

            End While


        End Using

        conn.Close()
    End Using
    Using conn As New MySql.Data.MySqlClient.MySqlConnection("YourConnectionString")
        conn.Open()

        Using cmd As MySql.Data.MySqlClient.MySqlCommand = conn.CreateCommand
            cmd.CommandText = "select db_employee.firstName as firstName, " & _
                                        "db_employee.lastName as lastName, " & _
                                        "tbl_employment.position as position " & _
                                        "from db_employee db_employee " & _
                                        "inner join tbl_employment tbl_employment on tbl_employment.ctrlID = db_employee.ctrlID " & _
                                        "where tbl_employment.companyName like 'MES%' "

            ' Get a data reader that you can loop over or load a data table with
            Dim dr As MySql.Data.MySqlClient.MySqlDataReader = cmd.ExecuteReader

            ' How to read with a DataReader
            While dr.Read
                ' Do something with this
                Dim lastName As String = dr("lastName")

            End While


        End Using

        conn.Close()
    End Using