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

[填空题] 在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在Text1中输入的是abDfdb，则单击Commandl按钮后Text1中显示韵字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。Private Sub Commandl_C1ick() 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= 【7】 End Ifc=Chr$(Asc(c) 【8】 ) Wend If s＜＞""ThenText1=s End If End Sub

【7】s+c 或 s&c

【8】-1[评析] 题目要求把输入的字符串中没有的字符显示出来，InStr(str,c)=0就是指字符串中没有该字符，就要把该字符加入到变量s中，即s=s+c(或s=s&c)；题目是从“Z”～“A”循环查找的，找完一个，就找下一个，而从“Z”～“A”字符的ASCII码是逐渐减小的，所以c=Chr$(Asc(c)-1)。