网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
窗体上有一个名为Command1的命令按钮,并有如下程序: Private Command1_Click（) Dim a（10),x% For k=1 to 10 a（k)=Int（Rnd*90+10) x=x+a（k) Mod 2 Next k print x End Sub 程序运行后，单击命令按钮．输出结果是 。
A．10个数中奇数的个数
B．10个数中偶数的个数
C．10个数中奇数的累加和
D．10个数中偶数的累加和
参考答案和解析
Command1.FontBold＝true Command1.FontBold＝true 解析：本题考查有关字体属性的知识。窗体中控件的字体由一些有关字体的属性控制，比如FontName(字体名)、FontSize(字体大小)、FontBold(加粗)、Fomltalic (倾斜)、FontUnderline(下划线)等。
更多 “窗体上有一个名为Command1的命令按钮,并有如下程序: Private Command1_Click（) Dim a（10),x% For k=1 to 10 a（k)=Int（Rnd*90+10) x=x+a（k) Mod 2 Next k print x End Sub 程序运行后，单击命令按钮．输出结果是 。A．10个数中奇数的个数B．10个数中偶数的个数C．10个数中奇数的累加和D．10个数中偶数的累加和” 相关考题
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是。Private Sub Command1_Click()Dim aa = Array(1,2,3,4,5)For K = 1 To 4 S = S + a(K)Next K Print SEnd SubA. 10 B. 14 C. 15 D. 120
考题
（23）在窗体上画一个名为 Command1 的命令按钮，然后编写以下程序：Private Sub Command1_Click( )Dim M(10) As IntegerFor k=1 To 10M(k)=12-kNext kx=8Print M(2+M(x))End Sub运行程序，单击命令按钮，在窗体上显示的是（ ）。A）6B）5C）7D）8
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 s=s+a(k) Next k Print s End Sub A.10 B.14 C.15 D.120
考题
（19）窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 。 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 S=S+a(k) Next k Print S End SubA.10 B.14 C.15 D.120
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。Private Sub Command1_Click()Dim aa=Array(1,2,3,4,5)For k=1 To 4S=s+a(k)Next kPrint sEnd SubA．10B．14C．15D．120
考题
在窗体上画一个命令按钮，然后编写如下代码：Private Sub Command1_Click()Dim M (10) As IntegerFor k=1 To 10M(k)=12-kNext kx=6Msgbox M(2+M(x))End Sub程序运行后，单击命令按钮，消息框显示的是【 】。
考题
在窗体中画一个命令按钮，然后编写以下时间过程： Private Sub Command1_Click() For i=1 To 4 x=1 For j=1 To 3 x=2 For k=1 To 2 x= x+6 Next k Next j Next i Print x End Sub程序运行后，单击命令按钮，输出结果是______。A．2B．7C．14D．37
考题
在窗体上画一个名称为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
考题
在窗体上画一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a(4)As Integer, x As Integer, sum As Integer n = 4: sum = 0 a (1) = 1 For k = 0 To n - 1 For i = 1 To k + 1 x = k + 2 - i a(x)= a(x)+ a(x - 1) If x ＜ n - k Then Exit For sum = sum + a(x) Next i Next k Print sum End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．5B．6C．8D．11
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下： Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后，单击命令按钮，输出结果是A．10B．14C．15D．120
考题
阅读下面的程序： Private Sub Command1_Click() For i=1 To 3 For j=1 To i For k=j To 3 x=x+1 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，窗体上输出的结果是A．3B．9C．14D．21
考题
在窗体上一个名为Commandl的命令按钮，然后编写以下程序：Private Sub Commandl一Click()Dim a(10)As IntegerFor k=10 To 1 Step-1a(k)=20—2*kNext kk=k+7Print a(k—a(k))运行程序．单击命令按钮，输出结果是A．1 8B．12C．BD．6
考题
窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Commandl_Click()Dim a(1 0)，x％a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Print xEnd Sub程序运行后．单击命令按钮，输出结果是A．10个数中奇数的个数B．l0个数中偶数的个教C．10个数中奇数的累加和D．10个数中偶数的累加和
考题
在窗体上添加有一个命令按钮，(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next I MsgBox x End Sub 打开窗体后，单击命令按钮，消息框的输出结果是 ______。A．7B．15C．157D．538
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End SubA．10B．14C．15D．120
考题
在窗体上画一个命令按钮，然后编写如下事件过程: Private Sub CommAnd1_Click() For i=1 To 4 x=0 For j=1 To 3 x=j For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮,输出结果是______ 。A．7B．15C．157D．538
考题
在窗体中有一个名为Command1的命令按钮，事件代码如下： Private Sub Command1_Click（ ） Dim m(10) For k=1 T0 10 m(k)=11=k Next k x=6 MsgBox m(2+m(x)) End Sub 打开窗体，单击命令按钮，消息框的输出结果是（ ）。A.2B.3C.4D.5
考题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) For i =1 To 4 x=4 For j = 1 To 3 x=3 For k = 1 To 2 x=x+6 Next Next Next Print x End Sub 程序运行后，单击命令按钮，输出的结果是A．7B．15C．157D．538
考题
窗体上有一个名为Command1的命令按钮，并有如下程序： Private Sub Command1Click（ ） Dim a(10)，x％ Fork=1 To 10 a(k)=Int(Rnd*90+10) x=x+a(k)Mod 2 Next k Print X End Sub 程序运行后，单击命令按钮，输出结果是（ ）。A.10个数中奇数的个数B.10个数中偶数的个数C.10个数中奇数的累加和D.10个数中偶数的累加和
考题
在窗体中添加一个命令按钮，然后编写如下代码： Private Sub Command1_Click( ) For i=l To 4 x=4 For j=1 To 3 x=3 For k=l To 3 x=x+6 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，输出结果是A．7B．15C．21D．538
考题
窗体上有一个名为Command1的命令按钮，并有下面的程序： Private Sub Command1 Click（ ） Dim arr(5)As Integer ． For k=1 To 5 art(k)=k Next k prog art（ ） For k=1 T0 5 Print art(k)； Next k End Sub Sub prog(a（ ）As Integer) n=UBound(a) For i=n To 2 step-1 if a(j)a(j十1)Then t=a(j)：a(1)=a(j+1)；a(j+1)=t End If Next j Next i End Sub 程序运行时，单击命令按钮后显示的是（ ）。A.12345B.54321C.01234D.43210
考题
在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Private Sub Command1 Click（ ） Dim a(10)As Integer Fork=10 To 1 Step-1 a(k)=20-2*k Next k k=k+7 Print a(k-a(k)) End Sub 运行程序，单击命令按钮，输出结果是（ ）。A.18B.12C.8D.6
考题
窗体上有一个名为Command1的命令按钮，并有如下程序：Private Sub Command1Click（ ）Dim a(10)，x％Fork=1 To 10a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Next kPrint XEnd Sub程序运行后，单击命令按钮，输出结果是（ ）。A.10个数中奇数的个数B.10个数中偶数的个数C.10个数中奇数的累加和D.10个数中偶数的累加和
考题
窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) Fork= 1 To 4 s=s+a(k) Next k Print s End SubA．10B．14C．15D．120
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Dim k As Integer Private Sub Form_Load() k=15 End Sub Private Sub Command1_Click() Static b As Integer b=b+k k=k+1 Print k，b End Sub 程序运行时，两次单击命令按钮Command1后，在窗体上显示的第二行是( )。A．17 31B．15 31C．17 16D．2 1
考题
在窗体中有一个名为Command1的命令按钮，事件代码如下：Private Sub Command1_Click（ ）Dim m(10)For k=1 T0 10m(k)=11=kNext kx=6MsgBox m(2+m(x))End Sub打开窗体，单击命令按钮，消息框的输出结果是（ ）。A.2B.3C.4D.5
考题
(29）在窗体上画一个名为Command 1的命令按钮，然后编写以下程序：Private Sub Commandl_lick()Dim a(10) As IntegerFor k＝10 To 1 Step-1a(k)＝20-2*kNext kk＝k＋7Print a(k-a(k))End Sub运行程序，单击命令按钮，输出结果是A）18B）12C）8D）6
考题
(30）窗体上有一个名为Command 1的命令按钮，并有如下程序：Private Sub Command 1_Click()Dim a(10)，x%For k＝1To10a(k)=lnt(Rnd*90＋10)x＝x +a(k) Mod 2Next kPrint xEnd Sub程序运行后，单击命令按钮，输出结果是A）10个数中奇数的个数B）10个数中偶数的个数C）10个数中奇数的累加和D）10个数中偶数的累加和
热门标签
最新试卷