二级vb考试系统第8次课矩阵和字符串专题124学时.pptVIP

5. 在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入一串英文字母（不区分大小写），单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在Text1中输入的是abDfdb，则单击Command1按钮后Text1中显示的字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。（2005年9月填空题7题） 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 = 【1】  End If  c = Chr$(Asc(c) 【2】 )  Wend  If s Then  Text1 = s  End If End Sub 作业和最后一次课安排 笔试作业：VB笔试教程2009年9月和2010年3月笔试真题。 上机作业：VB上机第十二讲（矩阵）和第十三讲（字符串） * 可留1个专题到第11次课讲 CopyRight@2010 SWPUNCRE All Rights Reser