VB(清华大学).ppt

注意： Unload和End的区别。 ①装载语句的作用：把窗体（或其他对象）装入内存但不显示它。 说明：因VB在执行时会自动装载窗体，引发Load事件，故一般不用此语句。②卸载语句作用：把对象从内存卸载，使该对象的属性恢复为设计时的初始值，并引发对象的Unload事件。 Me 是系统保留字，代表当前窗体，因此Unload Me表示将当前窗体从内存中卸载，如果当前窗体是程序唯一的窗体，则将终止程序的运行。③ End语句作用：终止应用程序的执行，并从内存卸载所有窗体。 (3)菜单编辑器中的控件功能如下： 标题框：输入出现在菜单条或菜单中的菜单标题和菜单命令。用“”设键盘访问。 名称框：用来输入菜单项的名称。以便在程序代码中引用该命令。 索引框：当使用控件数组时，用来输入数组元素的下标。 快捷键框：带有下拉列表框的组合框，用来为菜单项指定一个快捷键。 四个复选项： “复选” ：指定当选中某一菜单项时，是否在该菜单项的左边作一个“?“标记。 “有效”：指定是否允许某菜单项响应鼠标事件。 “可见”：指定某一菜单项是否可见。 “菜单列表框”：显示菜单项的分级列表，以缩进方式将子菜单项的分级位置显示出来。 左右箭头按钮：改变菜单命令的级别，创建子菜单。单击“左箭头“左移一个等级，单击“右箭头“右移一个等级。VB允许最多四个等级。 上下箭头按钮：用于移动菜单项在菜单中的位置。 下一个按钮：设置下一个菜单项。 插入和删除按钮：插入、删除菜单项。 Private Sub Command1_Click() Dim i As Integer If Text2.Text = 123456 And Text1.Text = npu Then Form3.Visible = True Form1.Visible = False Else: i = MsgBox(密码错！ + Chr(13) + Chr(10) + 是否重新输入？, vbOKOnly + vbCritical, 提示信息) Text2.Text = Form1.Visible = True End If End Sub Private Sub Command2_Click() End End Sub Private Sub Form_Load() Text1.Text = npu“ Text2.Text = “” Text2.PasswordChar = “* End Sub Visual Basic 程序设计 基本概念：由一组具有名称和相同类型的控件组成，数组中的每一控件共享同样的事件过程。当建立控件数组时，系统给每个元素赋一个唯一的索引号（Index），通过属性窗口的Index属性，可以知道该控件的下标是多少，第1个下标是0。 例如：一个控件数组有三个option按钮，不论单击哪一个，都会调用同一个Click事件过程。 建立的方法：1、创建同名控件。2、复制现存控件。 5.4 控件数组 Visual Basic 程序设计 5.4 控件数组 Private Sub Command1_Click(Index As Integer) Select Case Index Case 0 Text1.Text = “第一组” Case 1 Text1.Text = “第二组” Case 2 Text1.Text = “第三组” End Select End Sub 第6节 过 程 Visual Basic 程序设计 6.1 事件过程 6.2 过程及调用 6.3 参数的传递 6.4 变量的作用域 Visual Basic 程序设计 将多处使用的代码分解为相对独立的部分，供使用处调用。这样可以大大解化程序的设计。 第6节 过 程 过程 子程序过程（Sub） 函数过程（Function） 属性过程（Property） 事件过程 通用过程 窗体过程 控件过程 Visual Basic 程序设计 打开代码窗口（双击控件或窗体，单击查看代码） 选择对象和事件，并输入代码 建立事件过程 加入对发生事件进行处理的代码的过程，称为事件过程 6.1 事件过程 1.事件： 定义：能被对象所识别的动作。 触发事件的条件：用鼠标或按键等 系统也会产生事件 事件过程的分类： 窗体事件过程