VBA提示文本中的文本文本框中的文本

Question

如何在userform中将提示文本添加到textbox中，该一旦用户键入任何内容就会消失？

Answer 1

1. 添加标签元素。

• 键入提示文本。
• SET BackColor，高度，左，top和width属性匹配该属性textbox将在以后添加。

注意：设置backcolor 窗口背景（从下拉列表中）将与文本框的常见背景颜色匹配。

• SET forecolor属性（与textbox文本颜色不同，可以将提示文本与输入的文本区分开）。

2. 添加Textbox元素。

• SET BackColor，高度，<代码>左，top和width属性。
• SET Backstyle属性属于fmbackStyletRansparent。

3. 将以下代码添加到sub textbox_change：

   If TextBox.Value = "" Then
     TextBox.BackStyle = fmBackStyleTransparent
   Else
     TextBox.BackStyle = fmBackStyleOpaque
   End If

这是结果：