下列VB程序运行时，在文本框Text1中输入“h”后，单击命令按钮Command1后，标签框Label1中显示的内容是。 Private Sub Command1_Click（） Dim a As String a = Text1.Text a = Chr（Asc（a） - 32） Label1.Caption = a End Sub

题型：填空题题类：模拟题难易度：普通

浙江省杭州市2015年高考信息技术模拟卷4

下列VB程序运行时，在文本框Text1中输入“h”后，单击命令按钮Command1后，标签框Label1中显示的内容是。

Private Sub Command1_Click（）

Dim a As String

a = Text1.Text

a = Chr（Asc（a） - 32）

Label1.Caption = a

End Sub

举一反三

实现上述功能的VB程序如下，请回答下列问题：

Private Sub Command1_Click()

Dim a(20) As Long

Dim i As Integer, j As Integer, s As String List1.Clear

n = Val(Text1.Text)

a(1) = 1

List1.AddItem Str(a(1)) For i = 2 To n

s = ""

For j = Step -1

a(j) = ①

s = s + Str(a(j))

Next j

② Next i

相关试卷