最近在学VB.NET,在不断练习,做小程序。觉得对它还不了解,知道的库、模块、类不多,很多 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim con As MySql.Data.MySqlClient.MySqlConnection
con = New MySql.Data.MySqlClient.MySqlConnection()
Dim da As MySql.Data.MySqlClient.MySqlDataAdapter
Dim ds As DataSet
con.ConnectionString = "Server=cdb-7f114qbz.gz.tencentcdb.com;database=scd;UID=root;PWD=*****;port=10048"
con.Open()
da = New MySql.Data.MySqlClient.MySqlDataAdapter("Select * from sz1", con)
ds = New DataSet()
da.Fill(ds, "sz1")
Dim dr As DataRow
ds.Tables("sz1").PrimaryKey = New DataColumn() {ds.Tables("sz1").Columns("日期")}
dr = ds.Tables("sz1").Rows.Find(TextBox1.Text)
dr("日期") = TextBox1.Text
dr("名目") = TextBox2.Text
dr("价格") = TextBox3.Text
Dim scb As New MySql.Data.MySqlClient.MySqlCommandBuilder(da)
da.Update(ds, "sz1")
DataGridView1.DataSource = ds.Tables("sa1")
con.Close()
End Sub
实在不知道这个错误怎么改了。不知道各位有何高见?