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

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

s+c 或 s & c , -A

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