搜索函數的關鍵是使用InStr函數，它可以在另壹個字符串中找到指定字符串的第壹個位置。讓我們來看看使用該函數的語法:
InStr（【start，】string1，string2【，compare】）
這個函數需要的參數是起始位置、主體字符串和要搜索的字符串；Compare是可選參數。指定字符串比較。此比較參數可以省略，也可以是0、1或2。指定0（默認值）進行二進制比較。指定1進行不區分大小寫的文本比較。例如，如果我們想找出字符串“abcdefg”中是否有“cd”並返回其位置，我們可以使用以下語句:
pos = InStr（1，“abcdefg“，“cd“）
pos將返回3，表示找到了它，位置從第三個字符開始。這就是“查找”的實現，“查找下壹個”功能的實現就是以當前位置為起始位置繼續搜索。
替換功能
語法:Replace（字符串表達式，findreplacewith【，start【，count【，compare】】）
功能:用字符串替換壹些單詞。查找要替換的原始字符串，如果找到，則用新字符串替換。
描述:find:要替換的原始字符串。
Replacewith:被替換的單詞。
開始:從哪個單詞開始搜索替換，如果沒有設置，則從第壹個單詞開始搜索。
計數:替換的次數。如果沒有設置，所有找到的字符串都會被替換。
比較:找到比較的方法。compare=0表示二進制比較方法，compare=1表示文字比較方法，compare =2表示比較的數據類型。如果省略compare，它是默認的二進制比較方法。
2
私有子命令1_Click（）
文本1。文本=““
打開“c:\a.txt”作為#1輸入
文本1。SelText = StrConv（InputB（LOF（1），#1），vbUnicode）
關閉#1
末端接頭