题目
RLE压缩算法是Windows系统中使用的一种图像文件压缩方法,用两个数据表示,第一个记录指定像素重复的次数;第二个记录具体像素的值。
例如,有一表示颜色像素值的字符串RRRRGGBBB,用RLE压缩方法压缩后可用4R2G3B表示。小芳设计了一个VB程序实现RLE算法功能。在Text 1中输入原始数据, 点击“压缩”按钮Command 1后,在text2中显示经过压缩后的数据。程序运行界面如图所示:
(1)
这里采用的压缩技术属于(选填:有损压缩/无损压缩)
(2)
若想修改文本框Text2中字体大小,则需对它的(选填BackColor/Font/Text/)属性值进行修改
(3)
实现上述功能的 VB程序如下,请在划线处填入合适的代码Private Sub Command1_Click()Dim s1 As String, s2 As StringDim c As Integer, p As Integers1=Text1.Texts2=“”c = 1p = 2Do While p <= Len(s1)If Mid(s1, p, 1) = Mid(s1, p- 1, 1) Then c = c + 1Elses2 = s2 + Str(c) + Mid(s1, p-1, 1) End Ifp=p+1LoopText2.Text= End Sub
答案: 【1】无损压缩
【1】Font
【1】C = 1【2】s2 = s2 + Str(c) + Mid(s1, p - 1, 1) 或s2 = s2 + Str(c) + Mid(s1, len(s1), 1)