菜单
  

        If txtPassword = "" Then  
            LoginSucceeded = True      
            Me.Hide
            frmUnitSelect.Show
        Else
            MsgBox   "无效的密码,请重试!", , "登录"
            txtPassword.SetFocus
            SendKeys "{Home}+{End}"
        End If
    End Sub
        程序说明:在配电网测控程序中,选用了一个含有密码验证的登陆对话框。在这个设计的过程中,为了简化程序,将密码设置省去,即登录窗口显示后,直接进入即可。相反,若是输入了其它的数字或者字幕等字符串,就会出现“无效的密码,请重试。”的字样。
        在这个程序的设计过程中用到了Label控件,以此来设置系统的名称和密码的字样,一旦固定,则位置以及属性不会改变。而利用TextBox控件来编辑输入密码的文本框。利用CommandButton控件来实现确定和取消两个按钮。
    3.3.2 回路选择窗口
        实现程序如下:
     
    Private Sub Command1_Click()
    intNum = Val(frmUnitSelect.Combo1.Text)
    Me.Hide
    frmMain.Show
    End Sub
    Private Sub Form_Load()
    Combo1.AddItem "1"          将1~5五个数字加到下拉菜单中
    Combo1.AddItem "2"
    Combo1.AddItem "3"
    Combo1.AddItem "4"
    Combo1.AddItem "5"
    Combo1.ListIndex = 0       将ListIndex属性默认为0,即回路单元默认为1
    End Sub
        程序说明:在配电测控系统的设计过程中,利用一台PC机来控制五台RTU,从而实现对配电网的多条线路进行控制,在利用一台PC机对多台RTU进行控制时,利用RS485总线将五台RTU并联起来,并通过RS485/RS232的转换器连接到PC机上,每一台RTU有自己的地址号,在利用微机进行监测时,我们需要清楚是在对哪一台RTU进行监控,由此,就需要回路选择窗口[15]。用户在成功登陆后,需要选择一个回路来确认自己所需要监控的RTU。
        在这个程序中,用到了Label控件,同样的是对窗口中诸如“请选择回路单元”字体固定,而利用comboBox控件是可输入的文本与可选择的下拉列表相统一的功能,即可输入回路的数字号,也可以进行下拉菜单进行选择。利用CommandButton则是对应于确定的按钮。
    3.3.3    主界面窗口
        实现程序如下:
    Private Sub cmdAbout_Click()             关于按钮
    frmAbout.Show
    End Sub
    Private Sub cmdDataDisplay_Click()       数据显示的按钮
    frmDataDisplay.Show
     
    Me.Hide
    End Sub
    Private Sub cmdExit_Click()           是否需要退出系统
    Dim k As Integer
    k = MsgBox("确定要退出此系统?", vbExclamation + vbYesNo, "退出警告")
    If k = vbYes Then
    End
    End If
    End Sub
    Private Sub cmdSetting_Click()         设置参数的按钮
        frmSetting.Show
        frmSetting.txtPort.Text = Str(intPort)   显示端口号
        frmSetting.txtSetting.Text = strSet      显示参数
        Me.Hide
  1. 上一篇:电网短路电流限制措施的研究+文献综述
  2. 下一篇:DSP三相电能测量单元硬件设计
  1. RTU微机电量参数测控与保护装置设计

  2. CHAPMAN-KIRK纸靶测量攻角数...

  3. 制导火箭弹舵系统故障诊断观测器参数设计

  4. MacCormack水下火炮内弹道数值仿真及参数设计

  5. 超高射频火炮内弹道性能分析及参数计算

  6. 底排参数对底部排气弹弹道特性的影响分析

  7. 全年最大发电量的光伏板安装方位设计

  8. 高警觉工作人群的元情绪...

  9. 浅析中国古代宗法制度

  10. 现代简约美式风格在室内家装中的运用

  11. g-C3N4光催化剂的制备和光催化性能研究

  12. NFC协议物理层的软件实现+文献综述

  13. 江苏省某高中学生体质现状的调查研究

  14. 中国传统元素在游戏角色...

  15. C++最短路径算法研究和程序设计

  16. 上市公司股权结构对经营绩效的影响研究

  17. 巴金《激流三部曲》高觉新的悲剧命运

  

About

优尔论文网手机版...

主页:http://www.youerw.com

关闭返回