【说明】单击窗体上的“测试”(cmdTest)按钮，出现一个输入框

问题问答题

【说明】单击窗体上的“测试”(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”。