题目

删除重复字符的VB程序,程序功能如下:在文本框Text1中输入字符串,单击“删除重复字符”按钮,在文本框Text2中输出处理后的结果。程序运行效果如图所示,实现上述功能的VB代码如下,但加框处代码有错,请改正。 Private Sub Command1_Click() x = Text1.Text n = Len(x) s=s+Mid(x,1,1) For i = 2 To n flag =0 For j = 1 To Len(s) If  Then ' flag = 1: Exit For End If Next j If  Then ' s = s + Mid(x, i, 1) End If Next i Text2.Text = s End Sub 答案:【1】Mid(x,i,1)=Mid(s,j,1)【2】flag=0
信息技术 试题推荐
最近更新