动态文本控件的取值连接问题

fewroc 2017-01-01 07:56:27
动态创建N个textbox,如textbox2,textbox3,textbox4.....
现在我想做到Textbox1=textbox2 & textbox3 & textbox4......
请问用什么方法,或怎么变通。百度了好久,大概是找的关键字不对,没有相关实例参考,请各位大侠指点,谢谢!

如:
Dim wenben As New RichTextBox
wenben .Size = New Size(582, 334)
wenben .Location = New Point(0, 0)
wenben .Name = "文本" & (myTabPage.TabPages.Count + 1)
myTabPage.Controls.Add(wenben )

Textbox1=wenben 2 & wenben 3 & wenben 4......这个怎么写, wenben .Name 是动态生成的


...全文
564 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
abcsa10 2017-04-27
  • 打赏
  • 举报
回复
for each C as control in me.controls '遍历所有控件,然后判断把不是textbox1的文本都相加 If C.GetType Is GetType(TextBox) and c.name.tostring<>"textbox1" Then textbox1.text=textbox1.text & c.text end if next
清晨曦月 元老 2017-02-19
  • 打赏
  • 举报
回复
既然动态创建,就可以在创建的地方把它记录到一个容器里面。例如 public tblst as new list (of textbox) dim textbox1 as new textbox1 tblst.add (textbox1) 如果不愿意再去修改代码,可以遍历容器的子控件,前提是这些textbox都有共同的根,例如 dim tt as type= gettype(textbox) for each ctl as control in me.controls if ctl.gettype is tt then debug.print(ctl.text) end if next
yubeistao 2017-02-05
  • 打赏
  • 举报
回复
学习了谢谢各位
  • 打赏
  • 举报
回复
跟百度学习,需要收费的
fewroc 2017-01-02
  • 打赏
  • 举报
回复
已自行解决,不是用Controls的方法,是加了个计数,方法虽然笨了点,但毕竟达到想要的效果,谢谢baidu_37187202 的回答
baidu_37187202 2017-01-01
  • 打赏
  • 举报
回复
类似controls(“wenben2”)来获取控件

16,722

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧