如何在VBA中删除文本 - 以编程方式？

Question

有没有办法以编程方式在VBA （Access）中搜索文本？

例如;当我点击某个按钮时，我想将Hello World!更改为H̶e̶l̶l̶o̶ ̶w̶o̶r̶l̶d̶!̶

由于

编辑＃1：刚刚意识到VBA中没有删除可能性（据我所知），所以回答了这个问题。对于那些怀疑是否可能的人来说......很可能不是。

Answer 1

在谷歌搜索时遇到同样的问题：

1. 创建名为txtText和txtOverlay的2个文本框。
2. 通过代码或手动使这两个文本框的大小完全相同。
3. 将txtOverlay完全放在txtText之上，再次通过代码或 手动。

4. 在适当的地方运行以下代码：

   Const conTransparent = 0
   
   'Should be a Fixed Width Font
   Me![txtText].FontName = "Courier New"
   Me![txtText].FontSize = 12
   Me![txtText] = "Your text"
   
   Me![txtOverlay].FontName = "Courier New"
   Me![txtOverlay].FontSize = 12
   Me![txtOverlay].BackStyle = conTransparent
   Me![txtOverlay] = String(Len(Me![txtText]), "-")
   

归功于想出它的人： https://bytes.com/topic/access/answers/722250-strikethrough-text

希望它有所帮助！