单选按钮复选框和框架控件实验Word文件下载.docx
《单选按钮复选框和框架控件实验Word文件下载.docx》由会员分享,可在线阅读,更多相关《单选按钮复选框和框架控件实验Word文件下载.docx(7页珍藏版)》请在冰点文库上搜索。
![单选按钮复选框和框架控件实验Word文件下载.docx](https://file1.bingdoc.com/fileroot1/2023-5/6/c3ed8627-fb14-48e2-b12c-10018f30d325/c3ed8627-fb14-48e2-b12c-10018f30d3251.gif)
实验室
机房
同组人数
1
实验时间
2011年月日
成绩
指导教师
赵立英、杨东
一、实验目的
1、熟练掌握VisualBasic标准控件的主要属性、方法、事件及在实际编程中的应用。
2、掌握单选按钮(OptionButton)、复选框(CheckBox)、框架(Frame)、列表框(ListBox)、组合框(ComboBox)控件的常用属性、方法、事件和基本用法。
3、通过实验进一步理解应用程序界面设计及常用控件的使用技巧。
二、实验内容
1、单选按钮、复选框和框架控件实验
设计如图所示的窗体界面,设置Text1中文本的字体、字号和字形,要求字体和字号用控件数组实现。
程序清单:
PrivateSubCheck1_Click()
IfCheck1.Value=1Then
Text1.FontBold=True
Else
Text1.FontBold=False
EndIf
EndSub
PrivateSubCheck2_Click()
IfCheck2.Value=1Then
Text1.FontItalic=True
Text1.FontItalic=False
PrivateSubCheck3_Click()
IfCheck3.Value=1Then
Text1.FontUnderline=True
Text1.FontUnderline=False
PrivateSubOptzh_Click(IndexAsInteger)
Text1.FontSize=Optzh(Index).Caption
PrivateSubOptzt_Click(IndexAsInteger)
Text1.FontName=Optzt(Index).Caption
运行界面:
2、列边框控件实验
设计如图所示的界面,具体要求如下:
1在Form_Load事件中利用AddItem方法实现对列表框添加若干项目;
2选定某项目,项目内容和下标自动在Label1控件中显示;
3“添加”按钮,将Text1控件输入的项目添加在列表框最后;
4“删除”按钮,对选定的项目删除;
5“清除”按钮,清除列表框中所有项目。
PrivateSubCommand1_Click()
List1.AddItemText1.Text
PrivateSubCommand2_Click()
List1.RemoveItemList1.ListIndex
PrivateSubCommand3_Click()
List1.Clear
PrivateSubForm_Load()
List1.AddItem"
大学计算机基础"
VB程序设计"
C语言程序设计"
数据库基础"
Java程序设计"
PrivateSubList1_Click()
Label1.Caption=List1.Text&
"
下标为:
"
&
List1.ListIndex
3、组合框控件实验。
实验指导P119实验9-2
PrivateSubCombo1_Click()
Label4.FontName=Combo1.Text
PrivateSubCombo2_Change()
IfVal(Combo2.Text)>
8Then
Label4.FontSize=Val(Combo2.Text)
PrivateSubCombo2_Click()
Label4.FontSize=Val(Combo2.Text)
PrivateSubCombo3_Click()
SelectCaseCombo3.Text
Case"
常规"
Label4.FontBold=False
Label4.FontItalic=False
斜体"
Label4.FontItalic=True
粗体"
Label4.FontBold=True
粗斜体"
EndSelect
WelcomeTo
Download!
!
欢迎您的下载,资料仅供参考!