设窗体上有一个名称为Option1的单选按钮数组（其下标从0开始），共有4个单选按钮，并有下面事件过程： Private Sub Option1_Click（Index As Integer) n = Index If Index ＜ 3 Then n = n + 1 Print Option1（n).Caption End Sub 程序运行时，单击其中一个单选按钮，则在窗体上显示的是________。A．被选中单选按钮的下一个按钮的标题，但如果选中的是最后一个，则显示最前面一个单选按钮的标题B．被选中的单选按钮的标题C．被选中单选按钮的上一个按钮的标题，但如果选中的是最前面的一个，则显示最后面按钮的标题D．被选中单选按钮的下一个按钮的标题，但如果选中的是最后一个，则显示该单选按钮的标题
设窗体上有一个名称为Option1的单选按钮数组（其下标从0开始），共有4个单选按钮，并有下面事件过程： Private Sub Option1_Click（Index As Integer) n = Index If Index ＜ 3 Then n = n + 1 Print Option1（n).Caption End Sub 程序运行时，单击其中一个单选按钮，则在窗体上显示的是________。
A．被选中单选按钮的下一个按钮的标题，但如果选中的是最后一个，则显示最前面一个单选按钮的标题
B．被选中的单选按钮的标题
C．被选中单选按钮的上一个按钮的标题，但如果选中的是最前面的一个，则显示最后面按钮的标题
D．被选中单选按钮的下一个按钮的标题，但如果选中的是最后一个，则显示该单选按钮的标题
参考答案和解析
被选中单选按钮的下一个按钮的标题，但如果选中的是最后一个，则显示该单选按钮的标题
相关考题：
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）Dim m As Integer, n As Integer, p As Integerm=3: n=5: p=0Call Y（m, n, p）Print Str（p）End SubSub Y（ByVal i As Integer, ByVal j As Integer, k As Integer）k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。A．4B．6C．8D．10
在窗体上画一个名称为Text1的文本框，然后画3个单选按钮，并用这3个单选按钮建立一个控件数组，名数为Option1。程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示。请填空。Private Sub Option1_Click（Index As Integer）Select Case 【8】Case 0a="宋体"Case 1a="黑体"Case 2a="楷体_GB2312"End SelectText1 【9】 =aEnd Sub
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub CommaLndl_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
（ 16 ） 窗体上有一个名称为 Option 1 的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub Option1_C1ick （ Index As Integer ）…End Sub下面关于此过程的参数 Index 的叙述中正确的是A ） Index 为 1 表示单选按钮被选中，为 O 表示未选中B ） Index 的值可正可负C ） Index 的值用来区分哪个单选按钮被选中D ） Index 表示数组中单选按钮的数量
（25）在窗体上有一个命令按钮Commandl，编写下列程序： Private Sub Command1_Click() Print ppl(3,7) End Sub Public Funcion ppl(x As Single,n As Integer)As Single If n=0 Then ppl=1 Else If n Mod 2=1 Then ppl=x*x+n Else ppl=x*x-n End If End If End Funcion 程序运行后，单击该命令按钮，屏幕上显示的是 A.2 B.1 C.0 D.16
（26）在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1,程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句。 Private Sub Option1_Click(Index As Integer) Select Case________ Case 0 a="宋体" Case 1 a="黑体" Case 2 a="楷体_GB2312" End Select Text1._______=a End SubA.Option Text B.Index Text C.Index Fonr D.Option Fonr
窗体上有一个名称为Optionl的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub Optionl_Click(Index As Integer)End Sub下面关于此过程的参数Index的叙述中正确的是A．Index为1表示单选按钮被选中，为0表示未选中B．Index的值可上正可负C．Index的值用来区分哪个单选按钮被选中D．Index表示数组中单选按钮的数量
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) Dim m As Integer，n As Integer，p As Integer m=3：n=5：p=O Call Y(m，n，p) Print Str(p)End SubSub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．4B．6C．8D．10
在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程： Private Function fun1(n As Integer)As Integer Dim k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n - 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1 (x) Print m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．4B．6C．9D．15
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )A．4B．6C．8D．10
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() a = 2 For i=1 To 3 Call funl(i，A)Next i x = i + 2 Print x；a End Sub Private Sub fun1(n，m) m=m + n * 2 n = n + m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．1 5B．4 5C．8 4D．3 4
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim in As Integer，n As Integer，p As Integer m=3:n=5:p=0 Call Y(m,n,p) Print Str(p) End Sub Sub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．4B．6C．8D．10
在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24
在窗体上绘制一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() c="ABCD" For n=1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在横线处应填入的内容为A．Left(c,n)B．Right(c，n)C．Mid(c，n，1)D．Mid(c,n,n)
窗体上有一个名称为Option1的单选按钮控件，当程序运行时，当单击某个单选按钮时，会调用下面的事件过程： Private Sub Option1 Click(Index As Integer) End Sub 下面关于此过程的参数Index的叙述中正确的是（ ）。A.Index为1表示单选按钮被选中，为0表示未选中B.Index的值可正可负C.Index的值用来区分哪个单选按钮被选中D.Index表示数组中单选按钮的数量
在窗体上画一个名称为Text1的文本框，然后画3个单选按钮，并用这3个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句( )。 Private Sub Optionl_Click(Index As Integer) Select Case Case 0 a="宋体" Case 1 a="黑体" Case 2 a="楷体 GB2312" End Select Text =a End SubA．Option TextB．Index TextC．Index FontD．Option Font
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x = 0 n=InputBox(" ") For i = 1 To n For j=1 To i x = x + 1 Next i Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是A．3B．4C．5D．6
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 ＜＞ 0 Then m = m + n \ 3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是A．15B．18C．21D．24
在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，请选择空白处合适的语句( )。 Private Sub Option1_Click(Index AS Integer) Select Case______ Case 0 a="宋体" Case 1 a="黑体"A．Option TextB．Index TextC．Index FontD．Option Font
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
在窗体上画一个按钮，然后再复制5个，形成名称为Command1的6个控件数组，删除其中Index=4的一个。有下列程序： Private Sub Command1_Click(Index As Integer) Print Command1.Count； Print Command1.LBound； Print Command1.UBound； End Sub 程序运行后，单击任一命令按钮，则窗体上显示的内容是A．0 0 0B．5 0 5C．4 0 4D．4 1 5
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x(5)As String Dim n AS Integer For n ： 4 TO 0 Step -1 x(n)= n + 1 Print x(n)； Next n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．54321B．4C．54321D．0
在窗体上画一个名称为C1的命令按钮，然后编写如下事件过程： Private Sub C1_Click() a=0 n=InputBox("") For i=1 To n For j=1 To i a=a+1 Next j Next i Print a End Sub 程序运行后单击命令按钮，如果输入4，则在窗体上显示的内容是( )。A．5B．6C．9D．10
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．41 54B．2 54C．1 3D．42 3
在窗体上画一个名称为C1的命令按钮，然后编写如下事件过程： Private Sub C1 Click() a=0 n=InputBox(” ”) For i=l To n For j=1 To i a=a+1 Next j Next i Print a End Sub 程序运行后单击命令按钮，如果输入4，则在窗体上显示的内容是( )。A．5B．6C．9D．10
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Forn=1 To 20 If n Mod 3＜＞Thenm=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
在窗体上画一个名称为Text1的文本框，然后画三个单选按钮，并用这三个单选按钮建立一个控件数组，名称为Option1，程序运行后，如果单击某个单选按钮，则文本框中的字体将根据所选择的单选按钮切换，如图所示，请填空。Private Sub Option1_Click（Index As Integer）Select Case ______Case 0a = "宋体"Case 1a = "黑体"Case 2a = "楷体＿GB2312"End Selecttext1. ______ =aEnd Sub
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24