文档详情

实验4 VB程序设计运行环境使用.doc

发布:2017-07-15约1.08千字共6页下载文档
文本预览下载声明
实验4 VB程序设计运行环境使用 实验目的 熟悉VB集成编辑环境,掌握创建工程文件、保存工程文件、启动工程文件、设计窗体界面等基本操作。 实验内容 使用菜单编辑器。 实验步骤和运行结果 1. 建立工程1 2. Form1中拖入label,caption:华中师范大学欢迎你。 3. Form1中拖入timer。 4.工具——菜单编辑器。编辑菜单。 5. 编写代码: Private Sub Form_Load() Me.Tag = 1 End Sub Private Sub Timer1_Timer() If Label1.Left Me.Width Then Me.Tag = 2 ElseIf Label1.Left = 0 Then Me.Tag = 1 End If If Me.Tag = 1 Then Label1.Left = Label1.Left + 100 ElseIf Me.Tag = 2 Then Label1.Left = 0 End If End Sub Private Sub 变大_Click() Label1.FontSize = Label1.FontSize + 5 End Sub Private Sub 变小_Click() Label1.FontSize = Label1.FontSize - 5 End Sub Private Sub 欢送_Click() Label1.Caption = 华中师范大学期待你的下一次光临! End Sub Private Sub 欢迎_Click() Label1.Caption = 华中师范大学欢迎你! End Sub Private Sub 开始_Click() Timer1.Enabled = True End Sub Private Sub 楷体_Click() Label1.Font = 楷体 End Sub Private Sub 宋体_Click() Label1.Font = 宋体 End Sub Private Sub 暂停_Click() Timer1.Enabled = False End Sub 5.实验结果 文字——字体——宋体 文字——字体——楷体 文字——字号——变大 文字——字号——变小 标语——欢迎 标语——欢送 运行——开始、暂停 实验总结 点击标语,当选择时,即表示把选择的内容移动到不同的层或不同级。选择则表示选择欢迎。“↓”和“下一个”代表的含义是不同的。插入代表在该层之上添加一层。
显示全部
相似文档