Dim conn As MySql.Data.MySqlClient.MySqlConnection
Dim cmd As MySql.Data.MySqlClient.MySqlCommand

Dim connStr As String = "server=localhost; port=3306; user id=root; password=root ; database=test;CharSet=utf8" \'设置你的数据库连接字符串,注意我设置了字符编码为utf8，如果你的mysql里有中文字段，读取出来是乱码，就要记得设置mysql里你的字段的字符编码用utf8，这个世界最通用的字符编码格式！
conn = New MySql.Data.MySqlClient.MySqlConnection(connStr)
conn.Open

Dim mda As New MySql.Data.MySqlClient.MySQLDataAdapter("se lect * from t1" , conn) \'这里可以设置你的查询语句
Dim ds As New System.Data.DataSet()
mda.Fill(ds, "TableTemp") \'MySQLDataAdapter方法把数据放到一个新建的临时表里,这个临时表名可自定义,我这里写TableTemp
e.form.controls("Table1").Table.DataSource = ds.Tables("TableTemp") \'把刚才的临时表TableTemp填充到我们的控件Table1里

conn.close

如果想把数据表传递出去，不绑定控件，有什么办法？

绑定table，是为了可以直接用。无法直接绑定datatable的。