以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  文本框不可编辑怎么写?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=32249)

--  作者:云淡风轻
--  发布时间:2013/4/28 9:33:00
--  文本框不可编辑怎么写?

 e.Form.Controls("UserGroup").Edit = False

UserGroup是文本框名,Edit不行,那是什么才是不可编辑?


--  作者:XYT
--  发布时间:2013/4/28 9:40:00
--  
 

Dim txtBox As WinForm.TextBox
txtBox = e.Form.Controls(
"txtSale")
If
User.Group = "录入员" Then
    txtBox.ReadOnly = BooleanEnum.
True
Else

    txtBox.ReadOnly = BooleanEnum.Default

End
If


--  作者:Bin
--  发布时间:2013/4/28 9:40:00
--  
.Enabled=False
--  作者:云淡风轻
--  发布时间:2013/4/28 9:56:00
--  
谢谢!