学进去-教育应平等而普惠
试题
类型:操作题
难度系数:0.15
所属科目:高中信息技术
用VB编写数据解压缩程序,其功能如下:在文本框Text1中字符只能是单个,而数字可以是多位,表示其前面的字符个数。如压缩数据“W3y4”表示有3个“W”和4个“y”,单击命令按钮“解压缩”后,其解压缩后的结果(即原始数据)“WWWyyyy”输出在文本框Text2中,运行界面如图所示。
     
实现上述功能的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

用户名称
2019-09-19

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

用户名称
2019-09-19
我要答疑
编写解析
解析:

奖学金将在审核通过后自动发放到帐

提交
我要答疑
我要答疑:
提交