- 0
- 0
- 约7.95千字
- 约 8页
- 2018-12-08 发布于江苏
- 举报
五程序与软件工程基础
裁剪线第五章 程序设计与软件工程基础
裁剪线
实验十一 VB 6.0地基本操作
学 号: 姓名: 成绩:
学院(系): 专业: 班级:
一.实验要求
1.上机实验前必须认真阅读整个实验内容,并认真学习配套教材上地相关知识.
2.上机实验后,请完成实验步骤部分地填空.
3.完成回答问题部分地所有问题.
4.上机完成修改程序部分地操作.
5.将完成后地整个实验内容作为实验报告,并从裁剪线处剪下交给任课教师.
二.实验目地
1.熟悉Visual Basic 6.0地集成开发环境.
2.掌握用Visual Basic 6.0编程地一般步骤.
3.学会使用窗体对象,以及在窗体上设计应用程序界面.
4.掌握CommandButton.PictureBox.TextBox等控件地建立及使用方法.
5.学会设置窗体和其他控件地属性.
6.掌握Click事件地使用方法,理解事件驱动过程.
三.实验内容
创建一个工程,该工程包含窗体FormPicture和FormText.窗体FormPicture用于显示和清除图片,窗体FormText用于显示和清除文本.具体要求如下:
1.在窗体FormPicture上,用程序实现图片地显示与清除.窗体上有四个控件:图片框Picture1用于显示图片;命令按钮Command1用于驱动Command1_Click()事件,完成显示图片地任务;命令按钮Command2用于驱动Command2_Click()事件,完成清除图片地任务;命令按钮Command3用于驱动Command3_Click()事件,完成转向窗体FormText地任务.
2.在窗体FormText上,用程序实现文本地显示与清除.窗体上有四个控件:文本框Text1用于显示文本内容;命令按钮Command1用于驱动Command1_Click()事件,完成显示文本地任务;命令按钮Command2用于驱动Command2_Click()事件,完成清除文本地任务;命令按钮Command3用于驱动Command3_Click()事件,完成转向窗体FormPicture地任务.
四.实验步骤
1.执行“文件”菜单中地“新建工程”命令创建一个新工程,同时系统自动为新工程创建一个名字为Form1地窗体.
2.执行“工程”菜单中地“添加窗体”命令再新建一个名字为Form2地窗体.
3.双击工程资源管理器窗口中地Form1窗体使窗体Form1被选中,在属性窗口中将Form1地Name(名称)属性设置为FormPicture.
4.在窗体FormPicture上,用工具箱上地图片框PictureBox创建控件Picture1,用命令按钮CommandButton创建对象Command1.Command2和Command3.窗体界面如图5-1所示.
图5-1
5.选中窗体FormPicture上地每一个控件,在属性窗口中依次为他们设置表5-1所示地属性值.
表5-1 FormPicture上控件地属性设置
控件名称
属性
属性值
控件名称
属性
属性值
FormPicture
Caption
显示或清除图片
Command2
Caption
清除图片
Picture1
AutoSize
True
Font
宋体5号
Command1
Caption
显示图片
Command3
Caption
转文本窗口
Font
宋体5号
Font
宋体5号
6.双击窗体FormPicture上地命令按钮Command1进入代码编辑窗口,然后输入以下程序.
Rem Command1_Click()事件完成显示图片任务
Private Sub Command1_Click()
Picture1.Picture = LoadPicture(D:\lj\tp.bmp)
用LoadPicture()在图片框中装入图形,装入地图形可自己设置
End Sub
Rem Command2_Click()事件完成清除图片任务
Private Sub Command2_Click()
Picture1.Picture = LoadPicture()
装入一个空图形时可删除图片框中原来地图形
End Sub
Rem Command3_Click()事件完成转换窗口任务
Private Sub Command3_Click()
FormPicture.Hide 隐藏窗体FormPicture
裁剪线FormText.Show 显示窗体FormText
裁剪线
End Sub
说明:图片框
您可能关注的文档
最近下载
- 2025年加州驾照常考题库及答案.doc VIP
- 欧洲规范-NF P94-093-中文版.pdf VIP
- 欧洲规范-NF P94-078-中文版.pdf VIP
- SY_T 5333-2023 钻井工程设计规范.pdf VIP
- 深度解析(2026)《SYT 5946-2019钻井液用包被抑制剂 聚丙烯酰胺钾盐》.pptx VIP
- 卧式储罐体积容积计算(带公式).xls VIP
- 深度解析(2026)《SYT 5661-2019钻井液用增粘剂 丙烯酰胺类聚合物》.pptx VIP
- SY_T 5061-2020 钻井液用石灰石粉.docx VIP
- 深度解析(2026)《SYT 5677-2019钻井液用滤纸》.pptx VIP
- ICU常用药物中英文对照一览表.doc VIP
原创力文档

文档评论(0)