以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于文本框的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=15711)

--  作者:zstk7333
--  发布时间:2012/1/7 21:45:00
--  [求助]关于文本框的问题
如果在一个窗口中我有四个TextBox,我用 for each 语句,比如: Forms("窗口1").Controls(""TextBox" & i").value = value ,红色字体部分正确的应该怎样写?谢谢
--  作者:pyh6918
--  发布时间:2012/1/7 21:51:00
--  

Controls("TextBox" & i)试试!


--  作者:czy
--  发布时间:2012/1/7 21:53:00
--  
For Each c As WinForm.Control In e.Form.Controls
    If Typeof c Is WinForm.TextBox Then \'判断控件是否是文本框
        Dim t As WinForm.TextBox = c \'使用特定类型的变量引用控件
        t.Value = "abc"
    End If
Next

--  作者:zstk7333
--  发布时间:2012/1/7 22:08:00
--  
谢谢