用反射获取值,参考
Dim txt As WinForm.TextBox = Forms("窗口1").Controls("TextBox1")msgbox(txt.Gettype.GetProperty("Left").GetValue(txt, Nothing))