vba - 是否可以在基于 VB 的 Scada 系统中从文本框值控制视频

Question

我在 Visual Basic 2010 中创建了一个 Scada 系统。

该系统显示水电站的径向闸门位置。我在用于门位置的文本框中有特定信号的模拟值。

请建议我，如何制作与 texbox 值相关的径向Gate动画，或者我有一个 Gate 的打开和关闭视频。是否可以控制我想要的视频（文本框值的参考），以便我可以在特定的模拟值处显示门的位置？

Answer 1

尝试启用“Microsoft.VisualBasic.PowerPacks.VS”参考，然后添加以下代码。您可以根据需要调整代码以反映您的需求。

代码：导入 Microsoft.VisualBasic.PowerPacks

Dim canvas As New ShapeContainer Dim theLine As New LineShape ' 将窗体设置为 ShapeContainer 的父级。canvas.Parent = Me ' 将 ShapeContainer 设置为 LineShape 的父级。theLine.Parent = canvas ' 设置线条的起点和终点坐标。theLine.StartPoint = 新 System.Drawing.Point(0, 0) theLine.EndPoint = 新 System.Drawing.Point(640, 480)

http://msdn.microsoft.com/en-GB/library/cc488281.aspx