已知一个单行文本的Handle 请问怎样把这个文本中的文字显示到VBA窗体中的文本框中?

jxb8888 · 发表于 2003-9-4 17:02:00

mccad · 发表于 2003-9-4 19:33:00

可以通过HandleToObject(Handle)方法来得到文本的图元对象，然后再通过对象来获得文本内容，再把内容放到文本编辑框中。

jxb8888 · 发表于 2003-9-5 10:17:00

明总:
         可否说得详细点?这个函数以前可没用过啊!可不可以把代码写出来,我好参考参考???
   急盼回复!!!
            先谢谢明总!!!

efan2000 · 发表于 2003-9-5 10:24:00

'先转化成文字对象
Dim TextObj As AcadText
Set TextObj = ThisDrawing.HandleToObject(TextHandle)
'将文字对象的内容赋给文本框
TextBox1.Text = TextObj.TextString

jxb8888 · 发表于 2003-9-5 10:57:00

多谢明总搞定啦!!实在是高人也!!