以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  这个代码无效，如何解决？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24264)
--  作者：lihe60
--  发布时间：2012/10/9 12:59:00
--  这个代码无效，如何解决？

Dim txtBox As WinForm.TextBox
txtBox = e.Form.Controls("textbox1")
txtBox.ReadOnly ="BooleanEnum." & "True"

 

 

最后一行代码如何动态合成？

[此贴子已经被作者于2012-10-9 13:00:19编辑过]
--  作者：lin_hailun
--  发布时间：2012/10/9 15:25:00
--  
 楼主合成这是为哪般？
--  作者：lihe60
--  发布时间：2012/10/9 16:22:00
--  

如果不能合成，需要5行代码

If a=True
    txtBox.ReadOnly =BooleanEnum.True
Else
    txtBox.ReadOnly =BooleanEnum.False
End If

如果能合成，只需要1行代码

txtBox.Read & a
--  作者：lin_hailun
--  发布时间：2012/10/9 16:31:00
--  
 直接 txtBox.ReadOnly = a 不行么？
--  作者：woiz
--  发布时间：2012/10/10 12:18:00
--  

直接用readonly=true 不就可以？