以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  Panel里TextBox的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107876)

--  作者:douglas738888
--  发布时间:2017/10/11 20:34:00
--  Panel里TextBox的问题

请教老师,下面这段代码写在timertick ,问题:textBox1是放在Panel控件上,产生的数据能显示,但无法保存到单元格里,如果不放在Panel,能正常记录内容

到单元格里,也能保存

 

e.Form.TimerEnabled = True
Dim Val As String = Rand.Next(100000)
Dim s As String = val.PadLeft(5, "2")
Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
txt.text = s

 

Dim sdt As Date = Date.Now
While Date.Now < sdt.AddSeconds(10)
    Application.DoEvents
    e.Form.TimerEnabled = False
End While


--  作者:有点甜
--  发布时间:2017/10/11 20:38:00
--  

试试

 

Dim txt As WinForm.TextBox = e.Form.Controls("TextBox1")
txt.text = s

txt.WriteValue