
以下说法正确的是( )
x = 3
y = 9
z = x = y
该程序段执行后,变量z的值是( )
y=30
for i in range(1,4):
x=int(input(“x=”))
if y<x:
y=x
print(y)
程序运行后,依次输入: 36 87 51 运行后输出结果是。
①字符“z”的十六进制机内码是“80”
②图中字符共占16个字节,其中有8个ASCII码
③“!” 的机内码为“A3 A1”
④汉字在计算机内部是用机内码表示的
实现上述功能的VB程序如下,请回答下列问题:
Dim n As Integer
Dim L As String
Dim i as Integer
Dim j as Integer
Dim a(1 To 100) As Integer
Dim b(1 To 100) As Integer
Private Sub Command1_Click()
n = Val(Text1.Text)
Randomize
For i = 1 To n * n
a(i) = + 1
Next i
For i = 1 To n
L = ""
For j = 1 To n
L = L + " " + Str(a((i - 1) * n + j))
Next j
List1.AddItem L
Next i
End Sub
Private Sub Command2_Click()
List2.Clear
For i = 1 To n
L = ""
For j = 1 To n
b((i - 1) * n + j) =
L = L + " " + Str(b((i - 1) * n + j))
Next j
List2.AddItem L
Next i
For i = 1 To n * n
a(i) =
Next i
End Sub
Dim a AsString
Dim c AsString
a = “lianshizhongxue”
c = Mid (a , Len( a) \2 +1, 8)
Text1.Text = c
End Sub
该程序段运行后,在文本框Text1上显示的是( )

为实现上述功能,请在划线处填入合适的代码。
Private Sub Command1_ Click()
Dim a(0 To 9) As Integer, s As String
Dim k As String, i As Integer, max As Integer
s=Text1. Text
List1. Clear
For i=1 To Len(s)
k=Mid(s, I, 1)
If k >=“0”And k <=“9”Then
End If
Next i
max=0
For i=0 To 9
If Then
max= i
End If
List1. AddItem Str(i) &“出现了:”& a(i) &“次”
Next i
Label1. Caption=“出现次数最多的数字是:”&. Str( max)
End Sub