《Visual Basic程序设计基础》教材 习题参考答案 revised by Alan Wu.docVIP

《VisualBasic程序设计基础》教材

习题参考答案revisedbyAlanWu

第1章VisualBasic6.0程序设计概述

一、判断题

1．√2．√3．√4.×5.√6.×7.√8.×

9．√10．√11．×12．√13．√14．√15．√

二、选择题

1.C2.B3．D4．C5．B6．A7．D8．A9．B10．D

三、填空题

1．对象、事件2．属性、方法、事件3．控件对象、屏幕（Screen）

4．Left5.Top6．属性、对象名.属性名=表达式

7．网格8．Form1

9．Load或Initialize或Resize或Activate（自动执行的先后顺序也按此排列）

10．Activate、Deactivate

四、程序设计题

程序1．界面设计参看图10-1、10-2以及表10-1。

表10-1实例2各控件的主要属性设置

控件

属性（属性值）

属性（属性值）

标签控件1

Name(Label1)

Caption(我的第一个VB程序)

标签控件2

Name(Label2)

Caption(请输入你的姓名)

FontUnderLine(True)

FontItalic(True)

命令按钮1

Name(Command1)

Caption(确定(O))

命令按钮2

Name(Command2)

Caption(结束(X))

过程设计如下：

PrivatesubForm_Click()

Command2.Enabled=False

EenSub

PrivateSubCommand1_Click()

Label2.Visible=False

Label1.Caption=Text1.Text+:欢迎使用+Label1.Caption

Text1.Visible=False

Command1.Enabled=False:Command2.Enabled=True

EndSub

PrivateSubCommand2_Click()

End

EndSub

程序2．界面设计略，过程设计如下：

PrivateSubCommand1_Click()字体变大

Form1.FontSize=Form1.FontSize+3

Form1.Cls:Print欢迎使用VB

EndSub

PrivateSubCommand2_Click()字体变小

Form1.FontSize=Form1.FontSize-3

Form1.Cls:Print欢迎使用VB

EndSub

PrivateSubCommand3_Click()字体加粗

Form1.FontBold=True

Form1.Cls:Print欢迎使用VB

EndSub

PrivateSubCommand4_Click()字体不加粗

Form1.FontBold=False

Form1.Cls:Print欢迎使用VB

EndSub

运行时，不得连续、过多次单击“字体变小”按钮，因为当FontSize属性值小于0会产生适时错误。

程序3．界面设计略，过程设计如下（窗体Height值的计量包括标题、边框，而ScaleHeight值仅与窗体有效绘图区域的高度有关）：

PrivateSubForm_Load()

Text1.Text=VisualBasic程序设计

EndSub

PrivateSubForm_Resize()

Text1.Top=0:Text1.Left=0

Text1.Width=Form1.ScaleWidth/2用Form1.ScaleWidth效果优于用Form1.Width

Text1.Height=Form1.ScaleHeight/2用Form1.ScaleHeight优于用Form1.Height

Command1.Top=Form1.ScaleHeight-Command1.Height

Command1.Left=Form1.ScaleWidth-Command1.Width

EndSub

第2章程序设计基础

一、判断