用户登陆
站点日历
站点统计
最新评论
过滤条件举例 [ 日期：2012-09-19 ] [ 来自：Dim Values(0) As TypedValue
Values.SetValue(New TypedValue(DxfCode.Start, "Line,Arc"), 0)
Dim acTypValAr(1) As TypedValue
acTypValAr.SetValue(New TypedValue(DxfCode.Start, "TEXT"), 0)
acTypValAr.SetValue(New TypedValue(DxfCode.Text, "%%1328@200"), 1)
Dim acTypValAr(0) As TypedValue
acTypValAr.SetValue(New TypedValue(DxfCode.Start, "TEXT"), 0)
Dim acTypValAr(0) As TypedValue
acTypValAr.SetValue(New TypedValue(DxfCode.BlockName, BlockRecord.Name), 0)
Values.SetValue(New TypedValue(DxfCode.Start, "Line,Arc"), 0)
Dim acTypValAr(1) As TypedValue
acTypValAr.SetValue(New TypedValue(DxfCode.Start, "TEXT"), 0)
acTypValAr.SetValue(New TypedValue(DxfCode.Text, "%%1328@200"), 1)
Dim acTypValAr(0) As TypedValue
acTypValAr.SetValue(New TypedValue(DxfCode.Start, "TEXT"), 0)
Dim acTypValAr(0) As TypedValue
acTypValAr.SetValue(New TypedValue(DxfCode.BlockName, BlockRecord.Name), 0)
|
|
过滤参照快:
是”Insert" 而不是 "BlockReference“
Dim Values(0) As TypedValue
Values.SetValue(New TypedValue(DxfCode.Start, "Insert"), 0)
Dim acSelFtr As SelectionFilter = New SelectionFilter(Values)
Values.SetValue(New TypedValue(DxfCode.Start, "Insert"), 0)
Dim acSelFtr As SelectionFilter = New SelectionFilter(Values)
是”Insert" 而不是 "BlockReference“
| 发表评论 - 不要忘了输入验证码哦！ |