vb。净长度总计

Jozi68 · 发表于 2022-7-6 11:26:51

我需要编写代码来更改行的长度，就像LEN Total命令一样。我有线路和起点。有什么想法吗？它必须在vb中。网

MSasu · 发表于 2022-7-6 11:42:57

可以尝试以下方法：
[列表]

列出起点和终点；

计算直线与X轴的角度；

使用角度的正弦和余弦以及所需长度重新计算新端点的位置；

更新直线的端点属性。
完成！

我可以为您发布VBA代码，但恐怕这与VSTA代码有很大不同。

当做

Jozi68 · 发表于 2022-7-6 11:46:46

Thanx msasu，我将感谢VBA代码。我想我应该能弄明白。

MSasu · 发表于 2022-7-6 11:53:51

这里是（未声明的变量）：

关于，

MSasu · 发表于 2022-7-6 12:06:42

此外，可以直接从实体获取线的方向：

copy

Alfa = [color=blue]theLineEntity[/color].Angle

当做

Jozi68 · 发表于 2022-7-6 12:10:36

Thanx我成功了

MSasu · 发表于 2022-7-6 12:20:52

听起来不错！不客气！

gile · 发表于 2022-7-6 12:26:57

你好

IMO，写作。NET从VBA编码不是一个好的学习方法。净额。
.NET提供了比COM多得多的API来处理几何问题（即使用3d向量而不是2d角度）。

这里有一个小示例（C）。
它包含一个函数（LineTotalLength）和一个“Test”命令，该函数用于更改拾取侧的线的总长度（需要线对象ID、拾取点和长度）。

copy

[编程交流] vb。净长度总计

发表回复

精选推荐