题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-11-15 19:26:35

[单选题]题 (1.0分)
以下程序
Option Base 1
Private Sub Command1 _Click()
Dim a%(3,3)
For i=1 To 3
For j=1 To 3
If j>1 And i>1 Then
A(i,j)=a(a(i-1,j-1),a(i,j-1))+1
Else
A(i,j)=i*j
End If
Print a(I,j);"";
Next j
Print
Next i
End Sub
输出结果是
().
A.1 2 3
2 3 1
3 2 3
B.1 2 3
1 2 3
1 2 3
C.1 2 3
2 4 6
3 6 9
D.1 1 1
2 2 2
3 3 3

更多"[单选题]题 (1.0分)以下程序Option Base 1Priva"的相关试题:

[单选题]题 (1.0分)
程序的输出结果是().
OPtion Base1
Private Sub Command1_Click()
Dim Arr1(12),Arr2(4) As Integer
For i=1 To 12
Arr1(i)=I
Next i
For j=1 To 4
Arr2(j)=Arr1(3*j)
Next j
For k=1 To 4
S=s+Arr2(k)
Next k
Print s
End Sub
A.10
B.18
C.30
D.78
[单选题]题 (1.0分)
有以下的语句.
Option Base 1
Dim xscj(3,4,5) As String
声明的数组xscj有()个数组元素.
A.120
B.20
C.12
D.60
[单选题]题 (1.0分)
在窗体上添加一个命令按钮,编写如下代码.
Option Base 1
Private Sub Command1_Click
Dim a
A=Array(1,2,3,4)
J=1
For i=4 To1 Step -1
S=s+a(i)*j
J=j*10
Next i
Print s
End Sub
程序运行后,单击命令按钮,输出结果是
().
A.4321
B.12
C.34
D.1234
[单选题]题 (1.0分)
设有数组声明语句.
Option Base0
Dim b(-l To 10,2 To 9,20)As Integer
则数组B中共有()个元素.
A.1800
B.1848
C.2016
D.2310
[单选题]以下程序调试结果为:
Class Base{
Base(){
Int i = 100;
System.out.print (i);
}
}
Public class Pri extends Base{
Static int i = 200;
Public static void main(String argv[]){
Pri p = new Pri();
System.out.print(i);
}
}
A.编译错误
B.200
C. 100200
D. 100
[单选题] 以下程序的调试结果为?
class Base{
public final void amethod(){
System.out.println("amethod");
}
}
public class Fin extends Base{
public static void main(String argv[]){
Base b = new Base();
b .amethod();
}
}
A.编译指示带有 final 方法的类自己必须定义为 final
B.编译指示不能继承含有 final 方法的类
C.运行错误,原因是 Base 类没有定义为 final 类
D.运行输出 amethod
[单选题]以下程序的编译和运行结果为?
Abstract class Base{
Abstract public void myfunc();
Public void another(){
System.out.println("Another method");
}
}
public class Abs extends Base{
public static void main(String argv[]){
Abs a = new Abs();
a .amethod();
}
public void myfunc(){
System.out.println("My Func");
}
public void amethod(){
myfunc();
}
}
A.输出结果为 My Func
B.编译指示 Base 类中无抽象方法
C.编译通过,但运行时指示 Base 类中无抽象方法
D.编译指示 Base 类中的 myfunc 方法无方法体,没谁会喜欢该方法。
[单选题]以下程序的循环次数是().
Private Sub Command1_Click()
For j=8 To 35 Step 3
Print j;
Next j
End Sub
A.10
B.9
C.27
D.8
[单选题]以下程序的输出结果是().
Private Sub Command1_Click()
a=100
Do
s=s+a
a=a+1
Loop Until a>100
print a
End Sub
A.100
B.120
C.201
D.101
[单选题]当输入4时,以下程序的输出结果是().
Private Sub Command1_Click()
x=InputBox(x)
If x^2<15 Then y=1/x
If x^2>15 Then y=x^2+1
Print y
End Sub
A.4
B.17
C.18
D.25
[单选题]第187题 (1.0分)
以下程序的循环次数是().
Private Sub Command1_Click()
For j=8 To 35 Step 3
Print j;
Next j
End Sub
A.10
B.9
C.27
D.8
[单选题]第220题 (1.0分)
以下程序的输出结果是().
Private Sub Command1_Click()
a=100
Do
s=s+a
a=a+1
Loop Until a>100
print a
End Sub
A.100
B.120
C.201
D.101
[单选题]第244题 (1.0分)
当输入4时,以下程序的输出结果是().
Private Sub Command1_Click()
x=InputBox(x)
If x^2<15 Then y=1/x
If x^2>15 Then y=x^2+1
Print y
End Sub
A.4
B.17
C.18
D.25
[单选题]有如下程序,该段程序将().
Private Sub Command1_Click()
Dim i AS Integer, k AS Integer
For i=1 To 10 Step 0
K = k + 2
Next i
End Sub
A.形成无限循环
B.循环体执行一次后结束循环
C.语法错误
D.循环体不执行即结束循环
[单选题]第233题 (1.0分)
有如下程序,该段程序将().
Private Sub Command1_Click()
Dim i AS Integer, k AS Integer
For i=1 To 10 Step 0
K = k + 2
Next i
End Sub
A.形成无限循环
B.循环体执行一次后结束循环
C.语法错误
D.循环体不执行即结束循环

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码