试题 试卷
题型:单选题 题类:常考题 难易度:普通
内蒙古巴彦淖尔市临河三中计算机班2018-2019学年高二上学期信息技术期中考试试卷VB
图a
图b
图c
414243
ABC
758927
不合法
小明编写了一个压缩的VB程序,功能如下:在文本框Text1中输入需压缩数据(偶数个字符),单击“压缩”按钮Command1,程序对压缩数据依次进行压缩处理,压缩数据显示在文本框Text2中。程序运行界面如图所示:
Dim a(1 To 15) As Integer
Private Sub Form_Load()
Dim i As Integer, t As Integer
Dim s1 As String, s2 As String
Randomize
s1 = ""
For i = 1 To 15
a(i) = ①
s1 = s1 + Str(a(i))
Next i
Text1.Text = s1
End Sub
Private Sub Com1_Click()
s2 = ""
s2 = ②
Text2.Text = s2
试题篮