题目内容:
在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到Text1中。例如,若在Text1中输入的是abDfdb,则单击Command1按钮后Text1中显示的字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。
PrivateSubCommand1_Click()
DimstrAsString,sAsString,cAsString
str=UCase(Text1)
s=""
c="Z"
Whilec>="A"
IfInStr(str,c)=0Then
s=【7】
EndIf
c=Chr$(Asc(c)【8】)
Wend
Ifs<>""Then
Text1=s
EndIf
EndSub
参考答案:
答案解析: