主题：密码

 编写 startEdit 事件

 

If e.Row.DataRow.RowState = DataRowState.Unchanged Then
    Dim pwd As String
    If InputPassWord(pwd,"提示","请输入密码:") Then
        Messagebox.Show("您输入的密码是:" & pwd)
        If pwd <> "1234" Then
            Messagebox.Show("密码错误")
            e.cancel = True
        End If
    End If
End If

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=85887&skin=0