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

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 返回受影响的行数，以便您可以比较该值以确保数据已成功插入.

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