vb期末考试复习资料（经典总结版）(3)

达式。在所给出的选择中，A是用Print方法输出一个关系表达式的值，比较两个算术表达式的值是否相等；B是用Print输出一个字符串和一个算术表达式的值，其中字符串照原样输出，然后计算并输出算术表达式的值；C是用Print方法输出一个关系表达式的值，比较两个字符串是否相等，这几个语句都是正确的，可以输出正确的结果，而D会产生语法错误。 【答案】 D

例3 在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_Click()

a&=InputBox(\请输入第一个数\ b&=InputBox(\请输入第二个数\ Print b&+ a& End Sub

程序运行后，单击命令按钮，在两个输入对话框中先后输入12345和54321，程序的输出结果是 A．66666 B．54321 12345 C．1234554321 D．出错

【分析】 InputBox函数的返回值是一个字符串，但由于a＆和b＆通过类型说明符被显式地定义为长整型变量，因而在执行InputBox函数后，所返回的字符串值被转换为长整型值，它实际上相当于执行一次类型转换，即：

a&=CLng(InputBox(\请输入第一个数\b&=CLng(InputBox(\请输入第二个数\

这样，当执行Print方法时，将计算并输出算术表达式b&+a&的值。 【答案】 A

例4假定程序中有如下语句：

answer=MsgBox(\第一个字符串\，vbAbortRetryIgnore_ Or vbCritical_

Or vbDefaultButton3，_ \第二个字符串\

执行该语句后，将显示一个信息框，此时如果按回车键，则answer的值为 A．\第二个字符串” B．5 C．3 D．7

【分析】 MsgBox函数的返回值是一个整数，这个整数与所选择的按钮有关。本例的第二个参数由三部分组成，其中 vbAbortRetryIgnore 用来在信息框中显示3个按钮，分别为“终止”、“重试”和“忽略”；vbCritical用来在信息框中显示Critical Message图标；而vbDefaultButton3把信息框的第三个按钮(即“忽略”)指定为默认按钮。执行该语句后，在信息框中显示3个按钮，并把第三个按钮作为默认按钮，此时如果按回车键，则返回值是该按钮所对应的值。由于“忽略”按钮对应的值是5，因此变量answer的值为5。 【答案】 B

例5 执行下列语句后，显示输入对话框，此时如果单击“确定”按钮，则变量strinput的内容是______。 strinput=InputBox(“请输入字符串”，“字符串对话框”，“字符串”)

【分析】 在执行InputBox函数时，会产生一个输入对话框，该函数有7个参数，前三个参数都是字符串。其中第一个参数用来在输入对话框内显示一个提示用户输入的字符串，第二个参数是对话框的标题，第三个参数是输入的默认信息。也就是说，在执行InputBox函数后，如果用户没有输入任何信息，则可用此默认字符串作为输入值。如果不想用这个默认字符串作为输入值，则可在输入区直接键入数据，以取代默认值。在该例中，显示对话框后直接单击“确定”按钮，因此第三个参数就是默认的输入值。 【答案】 字符串 例6 阅读程序：

Private Sub Form_Click() msg1$=\继续吗?\ msg2$=\操作对话框\

r=MsgBox(msg1$，vbYesNo OrvbDefaultButton2，msg2$) End Sub

程序运行后，单击窗体，将产生一个信息框。此时如果直接按回车键，则相当于用鼠标单击信息框

6

中的______ 按钮。

【分析】 本例用MsgBox函数产生信息框，该函数的第一个参数在信息框内显示，第二个参数分为两部分，其中前一部分(即vbYesNo)用来在信息框中产生两个按钮，分别为“是”和“否”，后一部分(即vbDefaultButton2)把第二个按钮(即“否”)设置为默认按钮；第三个参数是信息框的标题。程序运行后，单击窗体，所产生的信息框的标题为“操作对话框”，在信息框内显示的内容是“继续吗?”，两个按钮分别是“是”和“否”，其中“否”是默认按钮。此时如果按回车键，则与单击“否”按钮效果相同。

【答案】 “否” 或第二个 例7 设有如下程序： Private Sub Form_Click() a = 32548.56

Print Format(Int((a * 10 + 0.5))/10,\End Sub

程序运行后，单击窗体，输出结果是______。

【分析】 本例用Format函数对数值进行格式化输出，要输出的数值存放在变量a中。Format函数的第一个参数对变量a进行了舍入处理，保留一位小数，第二位小数四舍五入，其值为32548.6。Format函数的第二个参数是格式说明符，使用的说明符有“0”和“，”，保留两位小数，该函数的返回值为032,548.60。

【答案】032,548.60

例8 编写程序，计算圆的面积。 【分析】 圆面积的计算公式为： S=πr2

其中r是要计算面积的圆的半径，程序运行后从键盘上输入。 程序如下：

Private Sub Form_Click() Const PI = 3.14159

Dim r As Single, S As Single

r=InputBox(\请输入圆的半径\，\输入数据\，\ S=PI*r*r

Print\，\End Sub

程序运行后，单击窗体，将显示一个输入对话框，在该对话框中输入圆的半径(默认为50)，然后单击确定按钮或按回车键，即可在窗体上输出圆的面积。假定在对话框中输入35，则单击“确定”按钮后，输出结果为：S=3,848.45。

例9 从键盘上输入小时、分和秒，把它转换为秒数并输出。

【分析】 1小时等于60分，1分钟等于60秒。把小时数乘以60*60，把分钟数乘以60，再加上秒数，就等于总秒数。设小时数为H，分钟数为M，秒数为S，则H小时、M分、S秒的总秒数SS为：

SS=H*60*60+M*60+S 程序如下：

Private Sub Form_Click()

H=InputBox(\请输入小时\，\小时\ H=Val(H)

M=InputBox(\请输入分\，\分\ M=Val(M)

S=InputBox(\请输入秒\，\秒\ S=Val(S)

SS=S+M*60+H*60*60

PrintH;\小时\分\秒=\秒\End Sub

程序运行后，单击窗体，将先后显示3个输入对话框，要求输入小时、分和秒。假定分别输入5、45和25，则输出结果为： 5小时45分25秒=20725秒

7

第五章 常用标准控件例题

例1 在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click()

Text1.Text = \End Sub

Private Sub Text1_Change()

Text2.Text = UCase(Text 1.Text) End Sub

程序运行后，单击命令按钮，则在Text2文本框中显示的内容是 A． Computer Rank Examination B． computer rank examination

C． COMPUTER RANK EXAMINATION D．空字符串 【分析】 该例有两个事件过程，一个是命令按钮的Click事件过程，一个是文本框的Text1的Change事件过程，当单击命令按钮时，执行前一个事件过程，而当在文本框Text1中输入信息时，将执行该文本框的Change事件过程。在命令按钮事件过程中，为文本框Text1的Text属性赋值，即在该文本框中显示字符串“Computer Rank Examination”，在这种情况下，将触发Text1文本框的Change事件，把文本框Text1中的所有字母转换为大写字母，并在文本框Text2中显示出来。程序运行后，如果单击命令按钮，则将先后触发命令按钮的Click事件和文本框Text1的Change事件，分别在两个文本框中显示由两个事件过程所指定的内容。 【答案】 C

例2 在窗体上画一个名称为List1的列表框，一个名称为Labe …… 此处隐藏：3103字，全部文档内容请下载后查看。喜欢就下载吧 ……