以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口控件的动态显示问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173165)

--  作者:aidimeng
--  发布时间:2021/11/17 11:06:00
--  窗口控件的动态显示问题
 
Dim t As Table= Tables("设备资料表")
Dim nr As WinForm.TextBox = e.Form.Controls("TextBox1")
For i As Integer = 0 To t.Rows.Count -1
    t.Position=i
    Dim r As Row= t.Current
    
    
         
        nr.Value = "IP地址:"& r("设备地址") & vbcrlf & "MAC地址:" & r("设备物理地址") & vbcrlf & "网关地址:" & r("设备网关") & vbcrlf &  "责任人:" & r("设备责任人") & vbcrlf & "资料维护日期:" & r("维护日期")
        
   
Next
窗口中 通过点击按钮 实现 TextBox1 显示不同内容,在循环后,只显示最后一行的值,这是为什么啊
加上下面代码即可,记录下
Application.DoEvents()
[此贴子已经被作者于2021/11/17 11:37:10编辑过]