[求助]在VB.NET中如何使用过滤器?(已解决)

Saging · 发表于 2009-3-25 23:53:00

代码如下:
         m_CAD_docu = m_CAD_app.Documents.Open(ListBox1.Items(i))'打开文件
         m_CAD_Sels = m_CAD_docu.SelectionSets.Add("EndSelections")'建立选择集
         m_Filters(0) = 1 '建立过滤器
         If CheckBox3.Checked Then '全字匹配
            FilterData(0) = TextBox2.Text
         Else
            FilterData(0) = "*" & TextBox2.Text & "*"
         End If
         S_Filter = m_Filters
         S_FData = FilterData
         m_CAD_Sels.Select(.AcSelect.acSelectionSetAll, , , S_Filter, S_FData)'选择对象
   在这一句就通不过，提示过滤器的类型错误？是哪里不对？

Saging · 发表于 2009-3-26 15:21:00

找到问题了。S_Filter只能声明为SHORT类型。

[求助]在VB.NET中如何使用过滤器?(已解决)

发表回复

精选推荐