请问，在把AutoCAD VBA中的数据、文本放置到剪贴板中后，如何从VB程序中正确读取剪

LYHZM

请问，在把AutoCAD VBA中的数据、文本放置到剪贴板中后，如何从VB程序中正确读取剪贴板中的内容？[br]

各位老师：

我在AutoCAD VBA中使用了下面的语句把变量InfoV中的内容放入剪贴板：

            Dim CbV As New DataObject
            CbV.SetText ""
            CbV.SetText InfoV
            CbV.PutInClipboard

然后使用语句：

            Shell ThisDrawing.Path & "\工程1.exe", vbNormalFocus

调用VB程序“工程1.exe”，VB程序“工程1.exe”包含一个窗体和一个文本框，其中的语句仅为：

Private Sub Form_Load()
    Text1.Text = Clipboard.GetData
End Sub

但运行后，“工程1.exe”中的文本框中的文本为“0”，若换成“Text1.Text = Clipboard.GetText”，则文本为空。

但在记事本中粘贴则文本显示正常。

请问，在把AutoCAD VBA中的数据、文本放置到剪贴板中后，如何从VB程序中正确读取剪贴板中的内容？

           

LYHZM

请各位老师不吝赐教。

LYHZM

后通过文本框间接实现。

fang:

我也正在求教，不知道你的问题解决了没有！？