[填空题] 在窗体上画一个命令按钮和一个文本框。然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，即命令按钮，程序可找出在文本框中输入的其他所有英文字母，并

15 查阅

[填空题] 在窗体上画一个命令按钮和一个文本框。然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，即命令按钮，程序可找出在文本框中输入的其他所有英文字母，并以大小写方式降序显示到Text1中，显示的字符串是ZYXWUTSRQPONMLKJIHGEC。请填空。 Private Sub Oommandl_Click() Dim str As String, s As String, c As String str=UCase(Text1) s="" c="Z" While c＞="A" If InStr(str, c)=0 Then s=【8】 End If c=Chr $(Asc(C)【9】) Wend If s＜＞"" Then Text1=s End If End Sub

参考答案:

[8]s+c [9]-1解析：[分析]： InStr函数返回指定字符串在另字符串中最先出现的位置值(Long)。根据题意，[8]处的内容应该是如果c在字符串中没有找到，即字符串不包含此字符，则将该字符赋给s，所以应填入的内容是“s+c”；然后将c赋予其他字符进行检验，从该题来看，应该是按字母表逆序检验，所以其ASCII码值依次减1，故[9]处应填人的是“-1”。

计算机考试