看板 Visual_Basic 關於我們 聯絡資訊
※ 引述《iversonjimmy ()》之銘言: : Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As : System.EventArgs) Handles Button2.Click : '資料庫資料的新增 : dbcmd = New MySqlCommand("insert into user_info(name, year, stdID) : values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & : "', dbconn") : dbadapter = New MySqlDataAdapter(dbcmd) : User_infoDataSet1.Clear() : dbadapter.Fill(User_infoDataSet1, "user_info") : End Sub 試看看 dim dbcmd as string dbcmd = "insert into user_info(name, year, stdID) values ('" & TextBox1.Text & "','" & TextBox2.Text & "', '" & TextBox3.Text &"')" dbconn.open() Dim dbcmd As New SqlDbCommand(dbcmd, dbconn) dim i as integer = dbcmd.ExecuteNonQuery() If i = 1 Then MessageBox.Show("資料新增成功!") Else MessageBox.Show("資料新增失敗!") End If dbconn.Close() -- 如果是這樣, 我還是會不顧一切的愛下去, 因為我也是明知故犯。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 123.204.174.12 ※ 編輯: dichia 來自: 123.204.174.12 (05/14 01:06)
dichia:修改跟刪除亦同 05/14 01:07