首页新闻找找看学习计划

请问在visio的二次开发环境VB怎样实现动态文本框的生成?

0
悬赏园豆:20 [待解决问题]

很奇怪,一段同样的程序,功能是动态文本框的生成,放在纯VB环境中,可以运行,但放在visio二次VB开发环境中,就显示是无效的类别字符串,程序是这样的:

Dim a As TextBox
Dim i As Integer
For i = 0 To 3
Set a = form.Controls.Add("VB.TextBox", "Text" & i)     
a.Visible = True
a.Move 3000, i * 400, 1000, 300
a.Text = "Text" & i
Next

请问这是怎么回事?而且VBA里的文本框没有index属性。

我的乐趣的主页 我的乐趣 | 初学一级 | 园豆:181
提问于:2012-05-19 15:20
< >
分享
清除回答草稿
   您需要登录以后才能回答,未注册用户请先注册