当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 设窗体上有Text1文本框和Command命令按钮,并有以下程序:Private Sub Command1_Click()Iemp$=“”For k=1 To Len(Text1)Ch$=Mid(Text1,k,1)If Not found(temp,ch)ThenTemp=temp&( 13 ) End ifNext kText1= ( 14 ) End SubPrivate Function found(str As String,ch As String)As Boolean

  

参考答案:

ch

  参考解析

【解析】ch中存放的是从文本框中取出的一个字符,如果它还没有出现在temp中,则将它连接在temp的后面。

微信端