搜索
VB程序如下，请回答以下问题：
Private Sub Command1_Click()
Dim s As String, ch As String
Dim i As Integer
Dim r As Integer, result As Integer
Dim flag As Boolean
s = Text1.Text
i = 1:result = 0:flag = True
Do While 
ch = Mid(s, i, 1)
r = ①
If r > 9 Or r < 0 Then
flag = False
Else
②
End If
i = i + 1
Loop
Text2.Text = Str(result)
End Sub
（1）窗体对象的Caption属性值为：_____________________（2）加框处语句有错，请改正：______________________
（3）请将①处的语句补充完整：______________________
（4）请将②处的语句补充完整：______________________
同类型试题
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
y = sin x， x∈R， y∈[–1，1]，周期为2π，函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x， x∈[–1，1]， y∈[–π/2，π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
