如何在 vb.net 中显示消息框以知道数据已成功插入?

2021-09-16 00:00:00 vb.net sql-server stored-procedures

下面的代码只是一个插入代码,它调用了我在 sql 中创建的存储过程 InsertDataIntoTable.该代码有效,但我想添加的是一个消息框(或标签)以确保数据已成功插入.

The code below is simply an insertion code that calls a stored procedure InsertDataIntoTable that i created in sql. The code works but what I want to add is a messagebox (or a label) to ensure that data has been successfully inserted.

Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles save_btn.Click
    Try

        sqlCon = New SqlConnection(strConn)

        Using (sqlCon)

            Dim sqlComm As New SqlCommand()

            sqlComm.Connection = sqlCon

            sqlComm.CommandText = "InsertDataIntoTable"
            sqlComm.CommandType = CommandType.StoredProcedure

            sqlComm.Parameters.AddWithValue("Years", ddl_year.SelectedItem.Text)
            sqlComm.Parameters.AddWithValue("StateForest", SFtx.Text)
            sqlComm.Parameters.AddWithValue("PrivateForest", PFtx.Text)
            sqlComm.Parameters.AddWithValue("TotalForest", totalForesttx.Text)
            sqlComm.Parameters.AddWithValue("PercentageSF", PercentageSFtx.Text)
            sqlComm.Parameters.AddWithValue("PercentageTotal", PercentageTotal.Text)

            sqlCon.Open()

            sqlComm.ExecuteNonQuery()

        End Using
        LoadData()

    Catch ex As Exception

    End Try

推荐答案

你可以使用你的sqlComm.ExecuteNonQuery():

Dim RowsAffected as Integer = sqlComm.ExecuteNonQuery()

.ExecuteNonQuery 返回受影响的行数,以便您可以比较该值以确保数据已成功插入.

.ExecuteNonQuery returns the number of rows affected so you can compare the value to ensure that a data has been successfully inserted.

类似于:

If RowsAffected > 0 Then
     Msgbox("Record has been successfully inserted")
End If

相关文章