●试题六 阅读以下应用说明及Visual Basic部分程序代码,将应填入(n)处的字句写在答题纸的对应栏

●试题六

阅读以下应用说明及Visual Basic部分程序代码，将应填入(n)处的字句写在答题纸的对应栏内。

【说明】

单击窗体上的"测试"(cmdTest)按钮，出现一个输入框，要求输入一串字符，将该字符串中的非字母字符删除后，显示在窗体中的一个文本框(txtShow)中。

【程序代码】

Private Sub cmdTest_Click()

Dim strT1，strT2 As String

Dim strCh As (1)

Dim intL As Integer

Dim intI As Integer

strT1= (2) ("请输入一串字符"，"字符串输入")

intL= (3)

strT2=″″

For intI=l To intL

strCh=Mid(strT1，intI，1)

If(strCh>"A"And (4) ) Or (strCh>"a" And suCh<"z")Then

strT2=strT2+strCh

End If

Next intI

txtShow．Text= (5)

End sub

●试题六【答案】(1)String(2)InputBox(3)Len(strT1)(4)strCh<"Z"(5)strT2【解析】VB中字符和字符串属于同一类型，所以(1)空填"String"。(2)空应填VB的输入对话框函数"InputBox"。根据题意，(3)空是求输入的字符串长度，故用"Len(strTl)"。(4)空处的条件是判断是否是字母字符，所以填"strCh<"Z"；删除非字母字符后的结果在strT2中，而题意是要显示在窗体中的文本框(txtShow)中，故