单项选择题
阅读程序:
Sub Form_Click()
a=10 : b=15 : c:20 : d=25
Print a;Spc(5);b;Spc(7);c
Print a;Space(8);b;Space(5);c
Print c;Spc(1);"+";Spc(1);d;
Print Spc(1);"=";Spc(1);c+d
End Sub
运行上面的程序,单击窗体后,第三行输出的结果是
A.■20■+■25■=■45■
B.20+25=45
C.10 15 20
D.20 25 45
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为 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.5
B.6
C.8
D.11
点击查看答案&解析
单项选择题
在窗体上画一个名称为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.4
B.6
C.9
D.15
点击查看答案&解析
相关试题
以下程序的功能是:将当前目录下的顺序文件...
运行下列程序,单击Command1命令按钮后,...
斐波那契(Fibonacci)数列的构成规律是:...
在Visual Basic中,用于文件复制的命令是...
Visual Basic识别对象靠的是对象的 【7...