Public Function ExecuteNonQueryCommand(ByVal strSQL As String, ByVal params() As SqlParameter) As SqlCommand
        Dim oconn As SqlConnection = GetConnection()
        Dim command As New SqlCommand(strSQL, oconn)
        command.CommandType = CommandType.Text
        For i As Integer = 0 To params.Length - 1
            command.Parameters.Add(params(i))
        Next
        oconn.Open()
        Dim retval As Integer = command.ExecuteNonQuery()
        oconn.Close()
        oconn.Dispose()
        Return command
    End Function

我想调用这个类来执行以下SQL
Dim StrSql As String = "Delete  from SysUser where NTIDName='Yu_yuk' and ValidityDate='07/25/2017'"

可以指点一下吗？SqlParameter 我不懂得怎么写

这个是 的代码。

简单的好说，这个复杂的，懂的人比较少，估计还是要去请教 那边的版主， 不景气。

谢谢帮主！

Dim SqlCmd As SQLHelper = New SQLHelper

        Dim paras As SqlParameter() = {New SqlParameter("@IDNumer", TextBox1.Text),
                                       New SqlParameter("@NTIDName", TextBox2.Text)}

        Dim StrSql As String = "Delete from shortuser where NTIDName=@NTIDName and IDNumer=@IDNumer"
        SqlCmd.ExecuteNonQueryCommand(StrSql, paras)

与大家分享！！