vb中怎么把属性值作为动态的

xfayu 发布于 2013-09-03 09:42， 584 次点击

各位大侠，我现在用VBA做一个工具，想通过text中用户输入的字符值（这个值是个属性值，例如Font,initialvalue等等，根据使用者随便更改），赋到程序中某个语句属性值，即"."之后。但我现在无法实现，请帮助！谢谢

7 回复

Artless2013-09-03 12:23

以下是引用xfayu在2013-9-3 09:42:10的发言：

各位大侠，我现在用VBA做一个工具，想通过text中用户输入的字符值（这个值是个属性值，例如Font,initialvalue等等，根据使用者随便更改），赋到程序中某个语句属性值，即"."之后。但我现在无法实现，请帮助！谢谢

用户输入的字符值=Font
然后？

zhengang10262013-09-03 18:00

例如：
在窗体建一text1文本框和一命令按钮，然后在代码窗口写如下代码：
Private Sub Command1_Click()
Command1.Caption = Text1.Text
End Sub
如改变文本框中的text,按命令按钮时，按钮上的名字也将随之改变。
不知你要的是不是这个意思？

xfayu2013-09-04 09:29

回复 2楼 Artless

我现在想要的就是一条程序里的属性或方法来源于文本框的输入。例如pb_tagon.()="-1",这条语句中（）是属性或方法，而（）是由文本框输入而来的具体值。谢谢！

xfayu2013-09-04 09:30

回复 3楼 zhengang1026

zhengang10262013-09-04 11:24

回复 5楼 xfayu

我的那个例子就是啊，命令按钮的Caption属性就是随文本框输入而变化的，你可试试。

风吹过b2013-09-04 16:09

text1.text 是属性名
text2.text 是值

CallByName 对象,text1.text, VbLet,text2.text

如：
CallByName Form1, "Caption", VbLet, "测试"
执行后，把窗体 Form1 的标题修改为测试

我好学习2013-09-19 08:01

学习一下