主题：[求助]执行次数

Static cs As Integer = 1

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As DataTable = DataTables("激活码")
If txt = "" Then
    tbl.LoadFilter = ""
Else
    txt = "'%" & txt & "%'"
    tbl.LoadFilter = "激活码 Like " & txt
    tbl.Load()
   
    If tbl.DataRows.Count = 0 Then

        cs += 1
        MessageBox.Show("您输入的激活码不正确,请重新输入!","提示",MessageBoxButtons.OK,MessageBoxIcon.Warning)
    End If

    If cs > 5 then then e.Form.Close
End If

cs += 1

等同于

cs = cs + 1