![[填空题] 在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E7%94%BB%E4%B8%80%E4%B8%AA%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%E5%92%8C%E4%B8%80%E4%B8%AA%E6%96%87%E6%9C%AC%E6%A1%86%EF%BC%8C%E7%84%B6%E5%90%8E%E7%BC%96%E5%86%99%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%E7%9A%84Click%E4%BA%8B%E4%BB%B6%E8%BF%87%E7%A8%8B%E3%80%82%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E5%90%8E%EF%BC%8C%E5%9C%A8%E6%96%87%E6%9C%AC%E6%A1%86%E4%B8%AD%E8%BE%93%E5%85%A5%E4%B8%80%E4%B8%B2%E8%8B%B1%E6%96%87%E5%AD%97%E6%AF%8D%28%E4%B8%8D%E5%8C%BA%E5%88%86%E5%A4%A7%E5%B0%8F%E5%86%99%29%EF%BC%8C%E5%8D%95%E5%87%BB%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%EF%BC%8C%E7%A8%8B%E5%BA%8F%E5%8F%AF%E6%89%BE%E5%87%BA%E6%9C%AA%E5%9C%A8%E6%96%87%E6%9C%AC%E6%A1%86%E4%B8%AD%E8%BE%93%E5%85%A5%E7%9A%84%E5%85%B6%E4%BB%96%E6%89%80%E6%9C%89%E8%8B%B1%E6%96%87%E5%AD%97%E6%AF%8D.png "[填空题] 在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母,第1张")
[填空题] 在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母(不区分大小写)，单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在Text1中输入的是abDfdb，则单击Comrnand1按钮后Text1中显示的字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。Private Sub Command1_Click()Dim str As String，s As String，c As Stringstr=UCase(Text1)S=""C="Z"While c＞="A"If lnStr(str,C)=0 Thens= 【1】 End Ifc=Chr$(Asc(C) 【2】 )WendIf s＜＞""ThenText1=SEnd IfEnd Sub
正确答案：[1]S+C或s&c；[2]-1
参考解析：[评析] 题目要求把输入的字符串中没有的字符显示出来，InStr(sb，c)：0就是指字符串中没有该字符，就要把该字符加入到变量s中，即s=s+c(或s=s & c)：题目是从“z”～“A”循环查找的，找完一个，就找下一个，而从“Z”～“A”字符的ASCII码是逐渐减小的，所以c=ChrS(Asc(c)-1)。
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）