问题 问答题

【说明】
单击窗体上的“测试”(cmdTest)按钮,出现一个输入框,要求输入一串字符,将该字符串中的非字母字符删除后,显示在窗体中的一个文本框(txtShow)中。
【程序代码】
Private Sub cmdTest_Click( )
Dim strT1 ,strT2 As String
Dim strCh As (1)
Dim intL As Integer
Dim intl As Integer
strT1 = (2) ("请输入一串字符","字符串输入")
intL = (3)
strT2 = " "
For intl = I To intL
strCh = Mid ( strT1, intl, 1 )
If(strCh>"A"And (4) ) Or (strCh >"a" And suCh <"z" )Then
strT2 = strT2 + strCh
End If
Next intl
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(strT1)”。(4)空处的条件是判断是否是字母字符,所以填strCh<“Z”;删除非字母字符后的结果在strT2中,而题意是要显示在窗体中的文本框(txtShow)中,故(5)空填“strT2”。

选择题
单项选择题