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

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

[填空题] 在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在 Text1中输入的是abDfdb，则单击Command1按钮后Text1中显示的字符串是

ZYXWVUTSRQPONMLKJIHGEC。请填空。

Private Sub Command1_Click()

Dim str As String，s As String，c As String

str=UCase(Textl)

s = " "

c = "Z"

While c＞="A"

If InStr(str，c)=0 Then

s = ______

End If

c = Chrs(Asc(c) ______)

Wend

If s＜＞" " Then

Text1 = s

End If

End Sub

正确答案：

s+c或s&c -1

参考解析：

本题是一个综合性题目，难度较大，需要仔细分析题意。首先应清楚UCase函数，InStr函数，Chr$函数和Asc函数的概念。UCase函数是返回以大写字母组成的字符串；InStr函数可以找到指定的字符串在另一字符串中最先出现的位置。Chr$函数将Ascii代码转换成字符串。Asc函数将字符串转换成Ascii代码值。程序首先将文本框中的字符串转换为大写，然后从A到Z循环，判断每个字符是否存在于文本框字符串中，如果有则循环，如果没有则将字符串连接起来赋给变量s，循环结束后，将s输出。