在datagridview对象上显示来自mysql服务器的数据。没有显示任何内容

Question

我曾尝试使用数据集工具在设计侧将其链接，但是由于它一直消失而无法正常工作，这是另一种方法，它无法在datagrid视图上显示任何值，我不确定为什么，我在vb的这一方面还很新，所以如果您也能解释一下，那就太好了。预先感谢。

Public Class Search
    Private Async Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Try
            If TextBox1.Text = "" Then 'this acts as a simple presence check on the textbox
            Else
                Dim val = "name"
                If RadioButton1.Checked = True Then 'This changes the type of search i do as it filters which column the query looks in
                    val = "type"
                End If
                Await getDataSet(TextBox1.Text) ' waits for infomation to be retrieved
            End If
        Catch ex As System.Exception
            System.Windows.Forms.MessageBox.Show(ex.Message) 'Catches any errors 
        End Try
    End Sub


    Async Function getDataSet(partname As String) As Task(Of DataSet) 'This retieves the values that matches the users input 
        Return Await Task.Factory.StartNew(
    Function()
        Dim connectionString = "server=localhost; userid=root; password=; database=partstest1; CharSet=utf8;" 'These are the login details for the database in the form of a connection string 
        Dim commandText = "SELECT ID, Benchpoint, Name, Type, BrandID FROM `parts` WHERE `name` Like  '%" & TextBox1.Text & "%';"
        Using connDB = New MySqlConnection(connectionString), objCmd = New MySqlCommand(), objAdpt = New MySqlDataAdapter()
            connDB.Open()
            objCmd.Connection = connDB
            objCmd.CommandText = commandText
            objCmd.CommandType = CommandType.Text 'These lines specify the command i am using and execute it
            objAdpt.SelectCommand = objCmd
            Dim objDs = New DataSet()
            objAdpt.Fill(objDs) 'Puts all of the values into a dataset
            PartsDataGridView.DataSource = objDs.Tables(0) 'This shows the datasource and displays it
            Console.WriteLine(objDs)
            Return objDs
        End Using
    End Function)
    End Function
End Class```

Answer 1

• 安装MySQL /连接器/等