问答题
(1)在考生目录下有一个工程文件vbs2-3.vbp,窗体上有一个命令按钮cmdNext(标题为“下一个”)。
要求:在窗体上建立一个单选按钮数组optltem,含4个单选按钮,标题分别为“A”、“B”、“C”、“D”,初始状态下,“A”为选中状态。如图3.70所示。窗体文件中已经给出了命令按钮的Click事件过程,但不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容,使得每单击命令按钮一次,就选中下一个单选按钮,如果已经选中最后一个单选按钮,再单击命令按钮,则选中第1个单选按钮。
注意:不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
程序源码:
PriVate Sub cmdNext_Click()
' For k=0 To?
If OptItem(k).Value Then
' n=?
End If
Next k
optItem(n).Value=False
n=n+1
If n=4 Then
' n= ?
End If
optItem(n).Value=True
End Sub
(2)在考生文件夹下有一个工程文件vbsj4.vbp,窗体上有两个文本框、三个单选按钮和一个命令按钮。运行时,在txtlnput中输入若干个大写和小写字母,并选中一个单选按钮,再单击“转换”按钮,则按选中的单选按钮的标题进行转换,结果放入txtResult(如图3.71所示)。在给出的窗体文件中已经给出了全部控件,但程序不完整,要求:去掉程序中的注释符,把程序中的“?”改为正确的内容。
【正确答案】正确答案:(1)步骤1:打开考生文件夹中的本题工程文件vbsj3.vbp,按表4-43在窗体中用“复制”和“粘贴”命令画出包含4个元素的单选数组和1个命令按钮并设置属性。

【答案解析】解析:(1)本题源程序在命令按钮的单击事件过程中,首先利用For循环语句(循环变量k的初值为0,终值为3)逐一检查单选按钮数组中的每个元素是否被选中,若选中则用变量n记录下选中单选按钮的索引号,即n=k。循环结束后,取消对当前选中单选按钮的选择,变量n增1;接着判断增1后的n值是否为4,若是则将n的值设置为0;最后设置索引号为n的单选按钮被选中。 (2)本题源程序功能是在命令按钮的单击事件过程中,用For循环语句和Mid函数逐一取出文本框txtInput中的字符后,根据单选按钮的选择进行相应转换;当选择“大小写互换”时,如果是小写字母就用UCase函数转换为大写,如果是大写字母就用LCase函数转换为小写,如果不是字母就不用转换;当选择“全部大写”时,就用UCase函数将文本框中所有字母转换为大写;当选择“全部小写”时,就用LCase函数将文本框中所有字母转换为小写。将转换结果显示在文本框txtResult中。