VB。net：选择所有行

Jozi68 · 发表于 2022-7-6 12:51:08

我使用以下代码选择图形上的所有线，但它不起作用。我相信这应该很容易做到，但是。网络对我来说还是个新鲜事物。

Dim filterfor（）As TypedValue={New TypedValue（0，“LINE”）}
Dim sf As SelectionFilter=新建SelectionFilter（filterfor）
Dim psr As PromptSelectionResult=ed.SelectAll（sf）
如果psr。状态=PromptStatus。那好吧
ed.WriteMessage（“无法在图形中找到线条。”）
其他的
ed.WriteMessage（“找到行！”）
如果结束

有什么想法吗？

gile · 发表于 2022-7-6 14:36:57

你好

我对VB了解不多，但根据我的C#小知识，我宁愿写：

copy

 filterfor As TypedValue() = {New TypedValue(0, "LINE")}

[编程交流] VB。net：选择所有行

发表回复

精选推荐