这是前面板，计算的时候是数值1运算数值2，比如数值1数值2运算控件就是用指针滑动杆改的，右键单击属性文本标签里就能设置，每种运算都有个对一个的数，用这些数就能驱动后台的选择结构来选择运算不要忘记。一般都是用角度值求三角函数，需要把角度值换算成弧度值代码如下Dim a Dim pin As Doub...

代码如下Dim t， t1 As Integer Dim x， y As Double Public Sub comx = Vall1CaptionSelect Case t1 Case Is = 1 y = y + x Case Is = 2 y = y x Case Is = 3 y = y *...