判断整数 n 能否被 m 整除,下列哪个选项表达式功能错误的是( )
A.n \ m = 1 | B.n Mod m = 0 |
C.n / m = Int(n / m) | D.n \ m = n / m |
更新时间:2020-08-25 23:34:20
|
【知识点】 VB程序的调试
相似题推荐
选择题
|
较易
(0.85)
【推荐1】阅读如下程序,Label1中显示的是( )
Dim a (1 To 10) As Integer
Dim s As String
For i=1 To 10
Next i
For j=1 To 5
Next j
For i =1 To 10
Next i
Dim a (1 To 10) As Integer
Dim s As String
For i=1 To 10
a(i)=1
Next i
For j=1 To 5
For i=1 To 10
If i Mod j=0 Then
a(i)=1-a(i)
End If
Next i
Next j
For i =1 To 10
Label1.Caption=Label1.Caption & a(i)
Next i
A.0110100010 | B.0110100000 |
C.1010100000 | D.1001011101 |
您最近一年使用:0次
选择题
|
较易
(0.85)
【推荐2】不能正确表示条件“两个整型变量 A 和 B 之一为 0,但不能同时为 0”的布尔表达式是( )
A.A*B=0 And A+B<>0 | B.(A=0 Or B=0) And (A<>0 Or B<>0) |
C.Not(A=0 And B=0) And (A=0 Or B=0) | D.A*B=0 And (A=0 Or B=0) |
您最近一年使用:0次
选择题
|
较易
(0.85)
【推荐3】有一 VB 程序的功能如下:在文本框 Text1 中输入一个单词,在文本框 Text2 中输入一 行以句号结尾的句子(所有单词均由小写字母组成且句子中各个单词之间仅用空格隔 开),单击命令按钮 Command1,在文本框 Text3 中统计单词在句子中出现的次数,VB 程序段如下:
s = Text2.Text
i = 1: k = 0: x = 0
Do While i <= Len(s)
c = Mid(s, i, 1)
If c >= “a” And c <= “z” Then
k = k + 1
Else
![](https://img.xkw.com/dksih/QBM/2021/2/2/2649645983580160/2652224831045632/STEM/1330ad1fc95245908f6129f126e28128.png?resizew=163)
If word = Text1.Text Then x = x + 1
![](https://img.xkw.com/dksih/QBM/2021/2/2/2649645983580160/2652224831045632/STEM/6b958e055e6942fbae36ead2c79d5a42.png?resizew=163)
End If
i = i + 1
Loop
Text3.Text = Str(x)
加框处①、②应填入的代码为( )
s = Text2.Text
i = 1: k = 0: x = 0
Do While i <= Len(s)
c = Mid(s, i, 1)
If c >= “a” And c <= “z” Then
k = k + 1
Else
![](https://img.xkw.com/dksih/QBM/2021/2/2/2649645983580160/2652224831045632/STEM/1330ad1fc95245908f6129f126e28128.png?resizew=163)
If word = Text1.Text Then x = x + 1
![](https://img.xkw.com/dksih/QBM/2021/2/2/2649645983580160/2652224831045632/STEM/6b958e055e6942fbae36ead2c79d5a42.png?resizew=163)
End If
i = i + 1
Loop
Text3.Text = Str(x)
加框处①、②应填入的代码为( )
A.word = Mid(s, i - k, k) k = 0 |
B.word = Mid(s, i - k, k) k = 1 |
C.word = Mid(s, i - k + 1 , k) k = 0 |
D.word = Mid(s, i - k + 1 , k) k = 1 |
您最近一年使用:0次