设窗体上有text1文本框和Command1命令按钮 并有以下程序：Private Sub Command1_Click（) Temp$=””
按钮,命令,窗体
已帮助 人
设窗体上有text1文本框和Command1命令按钮，并有以下程序：
Private Sub Command1_Click()
Temp$=””
For k=1 to len(text1)
Ch$=mid(text1,k,1)
If not found(temp,ch)then
Temp=temp&【13】
End If
Next k
Text1=【14】
End Sub
Private function found(str as string,ch as string)as Boolean
For k=1 to len(str)
If ch=mid(str,k,1)then
Found=【15】
Exit function
Next k
Found=false
End function
运行时，在文本框中输入 若干英文字母，然后单击命令按钮，则可以删去文本框中所有重复的字母，例如，若文本框中原有字符串为“abcddbbc”则单击命令按钮后文本框中字符串为“abcd”,其中函数found的功能是判断字符串str中是否有字符ch，若有，函数返回true，否则返回false。请填空
-
参考答案：【答案】：【13】ch【知识点】：Mid()函数的用法以及字符串连接的方法
【解析】：ch中存放的是从文本框中取出的一个字符，如果它还没有出现在temp中，则将它连接在temp的后面。【答案】：【14】temp【知识点】：文本框显示内容的方法
【解析】：temp中存放了所有不重复的字符，是我们所需要的内容，因此最后将它显示在文本框中。【答案】：【15】True【知识点】：函数返回值的用法
【解析】：found函数是判断某个字符是否在某个字符串中，如果是则返回True，如果不是则返回False。