要刪除文本中的指定內容,可以使用Replace
方法來替換指定內容為空字符串。下面是一個示例代碼,演示如何刪除文本中的指定內容:
Dim myText As String
Dim searchText As String
Dim newText As String
myText = "這是一個示例文本,包含指定內容。"
searchText = "指定內容"
' 使用Replace方法刪除指定內容
newText = Replace(myText, searchText, "")
' 輸出刪除指定內容后的文本
MsgBox newText
在上面的示例中,我們首先定義了一個包含指定內容的文本myText
和要刪除的內容searchText
。然后使用Replace
方法將searchText
替換為空字符串,最終得到刪除指定內容后的新文本newText
。