Vb编写程序题型及答案.docx

Vb编写程序题型及答案.docx

《Vb编写程序题型及答案.docx》由会员分享，可在线阅读，更多相关《Vb编写程序题型及答案.docx（48页珍藏版）》请在冰豆网上搜索。

Vb编写程序题型及答案

Vb编写程序题型

一、基本操作题

1、新建工程，在窗体上创建一个命令按钮Command1，一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置命令按钮上的文字为“绿色”，标签上文字为“这里是一个标签”（5分）。

（2）编写事件过程，运行程序后，单击命令按钮，窗体的背景色改为绿色（5分）。

（3）编写事件过程，运行程序后，单击窗体，标签上显示“你单击了窗体”（5分）。

答案：

PrivateSubCommand1_Click（）

Form1.BackColor=vbGreen

EndSub

PrivateSubForm_Click（）

Label1.Caption="你单击了窗体"

EndSub

2、新建工程，在窗体上创建一个命令按钮Command1和一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置命令按钮上的文字为“改变大小”，标签上文字为“改变颜色”（5分）。

（2）编写事件过程，运行程序后，单击命令按钮，适当增加窗体的高度（5分）。

（3）编写事件过程，运行程序后，单击标签，将窗体的背景色改为绿色（5分）。

答案：

PrivateSubCommand1_Click（）

Form1.Height=Form1.Height+200

EndSub

PrivateSubLabel1_Click（）

Form1.BackColor=vbGreen

EndSub

3、新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置两个命令按钮上的文字分别为“隐藏”和“显示”，标签上文字为“可以隐藏的控件”（5分）。

（2）编写事件过程，运行程序后，单击“隐藏”按钮，标签不可见，单击“显示”按钮，标签重新可见（5分）。

（3）编写事件过程，运行程序后，单击窗体，窗体的标题栏上显示“隐藏/显示控件”（5分）。

答案：

PrivateSubCommand1_Click（）

Label1.Visible=False

EndSub

PrivateSubCommand2_Click（）

Label1.Visible=True

EndSub

PrivateSubForm_Click（）

Form1.Caption="隐藏/显示控件"

EndSub

4、新建工程，在窗体上创建一个命令按钮Command1、一个标签和三个单选钮OptionButton1～3。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置命令按钮上的文字为“关闭”，标签上的文字为“字体颜色”，三个单选钮上的文字分别为“红”、“绿”、“蓝”（5分）。

（2）编写事件过程，运行程序后，单击命令按钮可关闭窗体（5分）。

（3）编写事件过程，运行程序后，分别单击三个单选钮，可改变标签文字为红色、绿色或蓝色（5分）

答案：

PrivateSubCommand1_Click（）

Form1.Hide

EndSub

PrivateSubOption1_Click（）

Label1.ForeColor=vbRed

EndSub

PrivateSubOption2_Click（）

Label1.ForeColor=vbGreen

EndSub

PrivateSubOption3_Click（）

Label1.ForeColor=vbBlue

EndSub

5、新建工程，在窗体上创建一个命令按钮Command1，一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置命令按钮上的文字为“窗体标题”，标签上文字为“窗体颜色”（5分）。

（2）编写事件过程，运行程序后，单击命令按钮，窗体的标题栏上显示“Visual Basic考试”（5分）。

（3）编写事件过程，运行程序后，单击标签，窗体的背景色改为红色（5分）。

答案：

PrivateSubCommand1_Click（）

Form1.Caption="VisualBasic考试"

EndSub

PrivateSubLabel1_Click（）

Form1.BackColor=vbRed

EndSub

6、新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置两个命令按钮上的文字分别为“改变颜色”和“改变大小”，标签上文字为“计算机等级考试”，标签可以自动调整大小以显示所有文字（5分）。

（2）编写事件过程，运行程序后，单击“改变颜色”按钮，标签的背景色改为绿色（5分）。

（3）编写事件过程，运行程序后，单击“改变大小”按钮，标签上的文字内容改为“大小已经改变”，文字大小改为30（磅）（5分）。

答案：

PrivateSubCommand1_Click（）

Label1.BackColor=vbGreen

EndSub

PrivateSubCommand2_Click（）

Label1.Caption="大小已经改变"

Label1.FontSize=30

EndSub

7、新建工程，在窗体上创建一个命令按钮Command1、一个标签和三个单选钮OptionButton1～3。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置命令按钮上的文字为“关闭”，标签上的文字为“请选择学历”，三个单选钮上的文字分别为“硕士”、“本科”、“大专”（5分）。

（2）编写事件过程，运行程序后，单击命令按钮可关闭窗体（5分）。

（3）编写事件过程，运行程序后，分别单击三个单选钮，标签上的文字相应改变为“硕士学历”、“本科学历”或“大专学历”（5分）。

答案：

PrivateSubCommand1_Click（）

Form1.Hide

EndSub

PrivateSubOption1_Click（）

Label1.Caption="硕士学历"

EndSub

PrivateSubOption2_Click（）

Label1.Caption="本科学历"

EndSub

PrivateSubOption3_Click（）

Label1.Caption="大专学历"

EndSub

8、新建工程，在窗体上创建一个命令按钮Command1、一个标签和三个单选钮OptionButton1～3。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置命令按钮上的文字为“红色”，标签上的文字为“字体大小”，三个单选钮上的文字分别为“10”、“14”、“18”（5分）。

（2）编写事件过程，运行程序后，单击命令按钮可将标签文字改变为红色（5分）。

（3）编写事件过程，运行程序后，分别单击三个单选钮，可改变标签文字大小为10磅、14磅或18磅（5分）。

答案：

PrivateSubCommand1_Click（）

Label1.ForeColor=vbRed

EndSub

PrivateSubOption1_Click（）

Label1.FontSize=10

EndSub

PrivateSubOption2_Click（）

Label1.FontSize=14

EndSub

PrivateSubOption3_Click（）

Label1.FontSize=18

EndSub

9、新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置两个命令按钮上的文字分别为“改变颜色”和“改变字体”，标签上文字为“计算机等级考试”，标签可以自动调整大小以显示所有文字（5分）。

（2）编写事件过程，运行程序后，单击“改变颜色”按钮，标签上的文字内容改为“颜色已经改变”，文字颜色改为红色（5分）。

（3）编写事件过程，运行程序后，单击“改变字体”按钮，标签上的字体改为“黑体”（5分）。

答案：

PrivateSubCommand1_Click（）

Label1.ForeColor=vbRed

Label1.Caption="颜色已经改变"

EndSub

PrivateSubCommand2_Click（）

Label1.FontName="黑体"

EndSub

10、新建工程，在窗体上创建两个命令按钮Command1、Command2，一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置两个命令按钮上的文字分别为“改变大小”和“改变字体”，标签上文字为“Visual Basic程序设计”，字体为宋体，标签可以自动调整大小以显示所有文字（5分）。

（2）编写事件过程，运行程序后，单击“改变大小”按钮，标签上的文字大小改为28（磅）（5分）。

（3）编写事件过程，运行程序后，单击“改变字体”按钮，标签上的文字字体改为黑体，文字内容改为“这是黑体”（5分）。

答案：

PrivateSubCommand1_Click（）

Label1.FontSize=28

EndSub

PrivateSubCommand2_Click（）

Label1.FontName="黑体"

Label1.Caption="这是黑体"

EndSub

或者（3）编写事件过程，运行程序后，单击“改变字体”按钮，标签上的文字字体改为楷体，文字内容改为“这是楷体”（5分）。

（提示：

楷体的字体名称为“楷体”。

）

PrivateSubCommand2_Click（）

Label1.FontName="楷体"

Label1.Caption="这是楷体"

EndSub

（提示：

楷体的字体名称为“楷体_GB2312”。

）

11、新建工程，在窗体上创建一个命令按钮Command1，一个标签Label1。

窗体和控件的大小适当、布局合理，命名并保存窗体文件（5分），要求：

（1）在属性窗口中设置命令按钮上的文字为“显示”，将标签上的文字清除（5分）。

（2）编写事件过程，运行程序后，单击“显示”按钮，标签上显示“你单击了[显示]按钮”（5分）。

（3）编写事件过程，运行程序后，每次单击窗体，命令按钮均向左移动一个按钮位置（5分）。

答案：

PrivateSubCommand1_Click（）

Label1.Caption="你单击了[显示]按钮"

EndSub

PrivateSubForm_Click（）

Command1.MoveCommand1.Left-Command1.Width

EndSub

或者（3）编写事件过程，运行程序后，每次单击窗体，命令按钮均向右移动一个按钮位置（5分）。

PrivateSubForm_Click（）

Command1.MoveCommand1.Left+