
实现此功能的VB程序段如下,已知程序中两处标记①的位置表达式相同,程序中①、②两处表达式为( )
Dim a(1 To 100) As Sting
For i= 1 To 10
For j=1 To 10
If i=j Or i Mod 10=0 Or i Mod 10= 1
Then
a( ① )="●"
Else
a( ① )="○"
EndIf
Next j
Next i
For i= 1 To 100
s=s+ a(i)
If ② Then
List1.Addltem s
End If
Next i
对于图中信息,有下列说法:
①单击“相似字”栏中的“1枝”,A处的文字被修改为“枝”字
②单击“相似字”栏中的“1技”,B处的文字被修改为“枝”字
③B处显示的是“shici.tif”中的部分内容
④B处显示的是“shici.TXT”中的部分内容
其中正确的有( )
h = int(input("请输入您的身高: "))
if h <= 120 :
p = 0
elif h > 140:
p = 100
else:
p = 50
print("您需要支付的门票价格是: ",p)
要测试所有分支程序代码是否正确。以下测试数据中,最恰当的一组是( )
密码强度判断条件如下:密码长度小于6,则强度为“弱”。在密码长度大于等于 6 的情况下,若只出现一种字符,则密码强度为“弱”;若出现两种不同字符,则密码强度为“中”,出现3种以上不同字符,则密码强度为“强”。
Private Sub Cmd1_Click()
Dim n As Integer, i As Integer, m As Integer, s As String, c As String
If n < 6 Then
Label3.Caption = "弱"
Else
s = "0000"
For i = 1 To n
c = Mid(Text1.Text, i, 1)
If c >= "0" And c <= "9" Then
Mid(s, 4, 1) = "1" '将字符串 s 第 4 位上的字符替换为"1"
ElseIf c >= "A" And c <= "Z" Then
Mid(s, 3, 1) = "1"
ElseIf c >= "a" And c <= "z" Then
Else
Mid(s, 1, 1) = "1"
End If
Next i
m = 0
For i = 1 To 4
If Mid(s, i, 1) = "1" Then
Next i
If m < 2 Then
Label3.Caption = "弱"
ElseIf m = 2 Then
Label3.Caption = "中"
Else
Label3.Caption = "强"
End If
End If
End Sub
Private Sub Command1_Click ()
Dim a(1 To 10) As Integer,i As Integer
For i=1 To 10
a(i)=i^i
Next i
List1.AddItem Str(a(i))
End Sub
运行程序,单击命令按钮Command1后,出现的错误提示为( )
Dim a(1 To n) As Integer
For i=1 To n
For j=i To n
If ① Then
②
End If
Next j
Next i
已知数组a初始值全部为0,模拟灯的状态,0为关,1为开。则划线处正确的是( )
下列说法正确的是( )
|
图a |
|
图b |

下列说法正确的是( )