以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  密码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=94261)
--  作者：张子俊
--  发布时间：2016/12/20 10:19:00
--  密码
如何给单元格设置密码
谢谢
--  作者：有点色
--  发布时间：2016/12/20 10:21:00
--  

 编写 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

 

[此贴子已经被作者于2016/12/20 10:21:39编辑过]