保存窗体文件名：SY1_2.frm,保存工程名：SY1_2.vbp。
表1.2 实验2属性设置
对象名称 窗体Form1 属性 Caption Text Alignment Font ForeColor Caption Caption Caption 属性值 VB，你好！ （空） 2－Center 黑体 加粗 14号 红色 显示内容 清屏 结束 文本框Text1 命令按钮Command1 命令按钮Command2 命令按钮Command3
编写代码如下：
代码
Private Sub Command1_Click() Text1.Text = \End Sub
Private Sub Command2_Click() Text1.Text = \End Sub
Private Sub Command3_Click() End End Sub
遇到的主要问题及分析：
3、P260 实验A 。二、3.编写一程序，在文字框中统计在该窗口上鼠标单击的次数。设计和运行界面如图1.3所示。完成后自己取名保存。
图1.3 实验3 设计界面 运行界面
编写代码如下：
代码
Private Sub Form_click()
Text1.Text = Val(Text1.Text) + 1 End Sub
遇到的主要问题及分析：
3
【提高题】 P259 实验A 。二、1. 编写一程序，要求在屏幕上显示“欢迎学习Visual Basci”，并在“请输入你的姓名”标签后的文本框Text1中输入姓名；单击“你输入的姓名是”按钮，则在Label3标签上显示在文本框Text1中输入的姓名。窗体如图1.4所示。 Label1 调整控件的大小使内容显示为两行 Label2 Command1 图1.4 提高题 的运行界面
Text1 Label3 将BorderStyle属性设置为1
编写代码如下：
代码
Private Sub Command1_Click() Label3 = Text1 End Sub
遇到的主要问题及分析：
【选作题】窗体上有两个名称分别为C1, C2的命令按扭，一个文本框Text1。命令按
钮的标题及文本框上显示的字符自定。编程实现当按下C1时，将C2的标题与Text1中的内容交换。要求：
1）界面自己设计 2）连续多次单击C1，都能将C2的标题与Text1中的内容交换。 设计的界面如下：
4
编写代码如下：
代码
Private Sub C1_Click() Dim a As String a = Text1.Text
Text1.Text = C2.Caption C2.Caption = a End Sub
遇到的主要问题及分析：
实验心得体会
成绩： 教师签名：
5
实验日期 年 月 日
实验二 窗体及基本控件使用
一、实验目的
1、复习启动与退出Visual Basic的方法。
2、掌握窗体基本的事件、方法和属性，并学会在不同的事件的过程中，编写代码。 3、掌握文本框和标签两种控件的使用，掌握文本框和标签控件的常用属性、事件和方法。以及它们之间的区别。
4、掌握命令按钮控件的常用属性、事件和方法。
二、实验内容
1、设计一个程序（如图2.1所示），用窗体模拟黑板，窗体上没有最大化、最小化按钮；鼠标单击窗体时窗体上输出提问，双击时显示回答。
分析：把窗体装扮成黑板模样，要设置窗体的BackColor属性为黑色，ForeColor属性为白色（模拟粉笔字的颜色）。窗体上没有最大化、最小化按钮，则需要设置窗体的MaxButton、MinButton属性。而单击、双击时的输出显示，可以在Click、DblClick事件里用Print和Cls方法来实现。
（a）设计状态
1） 属性设置
（d）窗体双击
（b）运行状态 （c）窗体单击
图2.1 实验2.1模拟黑板
表2.1 实验1属性设置
对象名称 窗体Form1 属性 BackColor ForeColoFont 属性值 6
MaxButton MinButton
2）代码编写
代码
【思考】
遇到的主要问题及分析：
如果进一步要求随机出题（简单的数学四则运算题）在窗体上输出并显示答案，该怎么做
2、窗体上有一个文本框Text1，要求当鼠标划过文本框Text1时，鼠标显示Cross“┼”形状；窗体上的一个标题为“复制”的命令按钮C1。通过属性窗口实现以上的设置之后，编程实现：
1)程序启动时窗体标题为“修改文本框内容”；
2)单击命令按钮C1，则把按钮上的标题复制到文本框，并使按钮不可见； 3)单击窗体空白处，按钮可见但不可用。
? 必要属性设置
表2.2 实验2属性设置
对象名称
属性 属性值 7
百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库Visual Basic实验(2)在线全文阅读。
相关推荐：