5555555刚才发的问题没了还得从新写

Question

dim a as object
set a=Text1
a="bbbbbb"
这个能实现 text1的内容是 bbbbb
我想实现
dim a as object
dim b as string
b="Text1"
......
......
a="bbbbbb"
也能实现 text1的内容是 bbbbb
哪位老大能搞定？

Answer 1

Dim a As Object
Dim b As String
b = "Text1"
Set a = Me.Controls(b)
a = "bbbbbb"

Answer 2

再比如：
Me.Controls("text1").Left = 200

Answer 3

a = "text1"
    Me.Controls(a).Text = "bbbb"

Answer 4

for i=0 to Me.Controls.count-1
  if Me.Controls(i).name=b then
     Set a = Me.Controls(b)
     exit for 
  endif
next ia="bbbbbb"

Answer 5

for i=0 to Me.Controls.count-1
  if Me.Controls(i).name=b then
     Set a = Me.Controls(i)
     exit for 
  endif
next ia="bbbbbb"