VB电量参数微机测控系统设计(12)
End Sub
Private Sub cmdYaoCe_Click() 遥测的按钮
frmYaoCe.Show
Me.Hide
End Sub
Private Sub cmdYaoKong_Click() 遥控的按钮
Dim i As Integer
i = MsgBox("", vbOKCancel, "确认操作开关")
If i = 1 Then
frmYaoKong.Show
Me.Hide
Else
frmMain.Show
End If
End Sub
Private Sub cmdYaoXin_Click() 遥信的按钮
frmYaoXin.Show
Me.Hide
End Sub
Private Sub Form_Load()
frmLogin.Show
Me.Hide
intPort = 1 初始化串口
strSet = "9600,n,8,1" 初始化串口通讯参数
If Not frmMain.ctrMSComm1.PortOpen Then
frmMain.ctrMSComm1.CommPort = intPort 串口号
frmMain.ctrMSComm1.Settings = strSet 串口参数
frmMain.ctrMSComm1.PortOpen = True 打开串口
End If
frmMain.ctrMSComm1.PortOpen = False 初始化完毕，关闭串口
End Sub
程序说明：主窗口是以七个按钮组成的界面，即简单又实用，用户在进入主窗口以后可以选择自己想要的功能。包括对于配电网中远动开关设备的合跳闸的状态控制（遥控），对于配电网中各个开关的状态读取（遥信），对于配电网中一些常用的电量参数的测量和简单计算（遥测），同时还可以直接从RTU中读取原始数据，一般为十吹冰进制，当用户需要改变时，可以选择设置参数来改变，以及对于正在使用的监控软件系统的信息。当用户需要退出该窗口时，可以点击“退出系统”，为了防止因人为操作不当引起的误动作，本软件在用户点击退出系统时，软件会弹出一个窗口，供用户选择确认是否确实需要退出。
下一篇：DSP三相电能测量单元硬件设计