已知一个单行文本的Handle 请问怎样把这个文本中的文字显示到VBA窗体中的文本框中?
已知一个单行文本的Handle请问怎样把这个文本中的文字显示到VBA窗体中的文本框中? 可以通过HandleToObject(Handle)方法来得到文本的图元对象,然后再通过对象来获得文本内容,再把内容放到文本编辑框中。 明总:可否说得详细点?这个函数以前可没用过啊!可不可以把代码写出来,我好参考参考???
急盼回复!!!
先谢谢明总!!! '先转化成文字对象
Dim TextObj As AcadText
Set TextObj = ThisDrawing.HandleToObject(TextHandle)
'将文字对象的内容赋给文本框
TextBox1.Text = TextObj.TextString 多谢明总搞定啦!!实在是高人也!!
页:
[1]