Question

我是vb.net的新手（VS 2008）＆amp;需要帮助。我正在从windows窗体向mysql dbase提供数据。成功插入数据后，它会在msgbox中显示“已添加数据” 怎么做？＆gt; 请帮忙。

这是我的按钮代码

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Manage("insert into pExpenses(expdate,exptype,expamount) values('" & txtExpDate.Text & "','" & txtExpType.Text & "'," & txtExpAmount.Text & ")")
    End Sub

点击后，数据被送到数据库，但我需要以messagebox的形式进行确认。请帮忙。

Answer 1

正如您所说，您正在使用MySQL数据库作为VB.net应用程序的后端。如果要调用manage（）函数来插入数据，请查找“.ExecuteNonQuery（）”函数调用以插入数据。此ExecuteNonQuery（）函数始终返回命令执行期间受影响的行数。将该返回值分配给Integer变量，检查它是否大于0，然后显示该消息。

Dim insRet as integer = <MySqlCommandobject>.ExecuteNonQuery()
If insRet>0 then
messagebox.show(insret & " Record(s) Successfully Inserted")
else
messagebox.show("Records not inserted")
End If

数据插入后显示消息框

1 个答案: