可视化编程VB-If语句-单、双分支结构-习题(含答案).pdfVIP

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第1页

1.应用窗体单击事件，从键盘输入两个数，分别放在x和y变量中，比较它们大小，要

求将大数放在x中，小数放在y中。

分析：两个变量交换必须借助第三个变量，并且注意赋值语句的写法。等价的行IF是：If

xyThent=x:x=y:y=t

2.新建一个名称为command1的命令按钮，输入以下代码：

1/6

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第1页

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第2页

3.应用窗体单击事件输入成绩，成绩大于等于60分输出“恭喜你通过考试”，否则输出“很

遗憾你没通过考试”。

4、输入三角形的三条边的边长，判断其是否构成一个三角形。如果能，则计算并显示该三

角形的面积，如果不能，则给出相应的提示信息。

2/6

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第2页

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第3页

5、某大楼的电梯限载为13人，限重1000kg，在此范围内电梯能正常运行，超出了这个范

围电梯将发出警报。操作要求：单击“电梯”按钮，在文本框1和文本框2分别输入人数

与

重量，若满足题目要求，则在命令按钮标题上显示“正常运行”，否则命令按钮上显示

“发出警报”，并且命令按钮无效。

6、设计一个致欢迎词的程序：当输入姓名及选择相应的性别时，根据性别显示不同的用语，

如图所示。

7、打开工程文件，操作要求：修改程序代码。

（1）界面修改：添加文本框对象text4，将text4的text属性设置成空白且只读属性。

（2）调整程序实现功能：在文本框text1、text2、text3分别输入三个整数a、b、c,单击

“计算按钮”，如果a、b、c作为边长能构成三角形，则在text4中显示“abc能构成三角

形”，否则显示“abc不能构成三角形“，单击“清空”所有文本框中的数据。

3/6

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第3页

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第4页

（3）将工程文件4-1-3.vbp和窗体文件4-1-3.frm及生成的执行文件4-1-3.exe保存在考生

文件夹中。

4/6

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第4页

可视化编程VB-If语句-单、双分支结构-习题(含答案)--第5页

2、

PrivateSubcommand1_click()

a=Text1.Text:b=Text2.Text:x=a+b

IfabThenx=b+a

Text3.Text=x

EndSub

3、

PrivateSubform_click()

DimscoreAsSingle

请输入你的成绩

Ifscore=60Then

很遗憾你没通过考试

Else

很遗憾你没通过考试

En