运行如下程序后, 命令窗口(command windows)显示的结果为() k=0; for n=100:200 if rem(n,21)~=0 %R=rem(X,Y),求余数函数,X,Y应该为正数 k=k+1; continue end break; end k
A.105
B.5
C.4
D.101
- · 有4位网友选择 D,占比40%
- · 有3位网友选择 B,占比30%
- · 有2位网友选择 C,占比20%
- · 有1位网友选择 A,占比10%
A.105
B.5
C.4
D.101
A、y=564
B、y=9
C、y=-735
D、y=563
Private Sub Command1_Click()
s1 = "Basic"
For i = 1 To Len(s1)
t = Mid(s1, i, 1)
s2 = s2 + Chr(Asc(t) + 1)
Next i
Debug.Print s2
End Sub
单击Command1命令按钮后,则在立即窗口上输出结果是()。
A.Cbtjd
B.65
C.Basic
D.出错
Private Sub Command1_Click()
Dim c As String,n As Integer
c="ABCDEF"
For n=1 To 5 Step 2
Debug.Print______
Next n
End Sub
程序运行后,单击命令按钮,要求在立即窗口输出如下内容,则程序的空白处应填入( )。
F
DEF
BCDEF
A.left(c,n) B.right(n,C) C.Right(c,n)D.mid(c,n,n)
记录号 名称
1 电视机
2 计算机
3 电话线
4 电冰箱
5 电线
假定名称字段为字符型、宽度为6,那么下面程序段的输出结果是( )。
GO 2
SCAN NEXT 4 FOR LEFT(名称,2)="电"
IF RIGHT(名称,2)="线"
EXIT
ENDIF
ENDSCAN
?名称
A.电话线 B.电线 C.电冰箱 D.电视机
记录号 名称
1 电视机
2 计算机
3 电话线
4 电冰箱
5 电线
假定名称字段为字符型、宽度为6,那么下面程序段的输出结果是( )。
GO 2
SCAN NEXT 4 FOR LEFT(名称,2)="电"
IF RIGHT(名称,2)="线"
LOOP
ENDIF
??名称
ENDSCAN
A.电话线 B.电冰箱 C.电冰箱电线 D.电视机电冰箱
A、y=564
B、y=9
C、y=-735
D、y=563
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!