
实现上述功能的VB程序如下,请回答下列问题:
(1)由代码可知,命令按钮“解压缩”的对象名是____________。
(2)实现上述功能的VB程序如下,请在划线处填入合适的代码。
Private Sub Comd1_Click()
Dim i As Integer, j As Integer,n As Integer
Dim ch As String, s As String, s1 As String
s = Text1.Text + "."
Text2.Text = ""
n = 0
s1 = Mid(s, 1, 1)
i = 2
Do While i <= Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
n =___________
Else
For j = 1 To n
Text2.Text =_________
Next j
s1 = ch
______
End If
i = i + 1
Loop
End Sub
(3)若删除加框处代码,而压缩数据依然为“W3y4”,则解压缩后的数据为____________。

同类型试题

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

