新手上路,如何动态取得对不同控件的控制 界面上有两个控件:TEXTBOX1和TEXTBOX2程序中有一个变量ls_temp,运行时如果ls_temp=“TEXTBOX1”那么,我要将TEXTBOX1这个控件的TEXT改为“hello”,也就相当于TEXTBOX1.TEXT = "hello"请问如何写,多谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 dim a as stringtext2_chang a="asda"text1.text=a 理解错了ls_temp存放的是控件的名称,不是控件的TEXT属性如果ls_temp =“TEXTBOX1”,那么我要TEXTBOX1.TEXT = "hello"如果ls_temp =“TEXTBOX2”,那么我要TEXTBOX2.TEXT = "hello"我不想写死,想动态的根据ls_temp的值来改变相应控件的属性 dim ctl as control for each ctl in me if ctl.name=ls_temp then ctl.text="hello" exit for end if next Dim ls_temp As Stringls_temp = "Text1"Me.Controls(lw_temp).Text = "hello" 求一个用VB编写的进销存软件,要源代码哟 我做了个工程,并生成exe文件,但是执行exe文件之后关闭时,在任务管理器中仍有这个工程.exe,怎么回事? 请问程序中使用了datareport报表,怎么打包?(在线等,急!) 怎样判断某个文件是否存在? 深圳的程序员进来看看! 请问初级问题 怎么屏蔽右键 vb常量与变量 Urgent!! Question on execute SQL 一个关于ADO的问题!急!! 100分放:老大呀,如何用代码实现在数据库结构里插入子数据表呀. VB6.EXE 中导致无效页错误
text2_chang
a="asda"
text1.text=a
ls_temp存放的是控件的名称,不是控件的TEXT属性
如果ls_temp =“TEXTBOX1”,那么我要TEXTBOX1.TEXT = "hello"
如果ls_temp =“TEXTBOX2”,那么我要TEXTBOX2.TEXT = "hello"
我不想写死,想动态的根据ls_temp的值来改变相应控件的属性
for each ctl in me
if ctl.name=ls_temp then
ctl.text="hello"
exit for
end if
next
ls_temp = "Text1"
Me.Controls(lw_temp).Text = "hello"