当前位置: 高中信息技术 / 综合题
  • 1. (2020高二上·衢州期末) 小李编写了一个实现字母字符串去重功能的VB程序(只输入大小写字母,大小写字母视为同一字符,只保留第一次出现的字符),运行界面如图所示,程序运行时,在文本框Text1中输入字符串,单击“去重”按钮,将字符串中重复的字符去除,在标签Label1中显示去重之后的结果(已知“a”的ASCⅡ值为97,“A”的ASCIⅡ值为65),实现上述功能的VB程序如下,请回答下列问题:

    Private Sub Comand1_Click( )

        Dim s As String, c As String

        Dim t As Integer, I As  Integer

        Dim a(1 To 26)As Integer

        s=Text1.Text

        For i=1 to 26

            a(i)=0

        Next i

        i=1

        Do While i<=Len(s)

            c=Mid(s, i, 1)

            If    ①     Then

                t=Asc(c)-96

            Else

                t=Asc(c)-64

            End If

            If a(t)=0 Then

                a(t)=1

            Else

               

                     ②    

            End If

            i=i+1

        Loop

        Label1.Caption=s

    End Sub

    1. (1) 根据代码可知,“去重”按钮的对象名为
    2. (2) 请在划线处填入合适的代码

       ② 

    3. (3) 加框处代码有误,请改正

微信扫码预览、分享更方便