隐藏TextBox值

Question

这就是我的想法。

Private Sub TextBox_Enter()
     TextBox.value.Visible = False
End Sub

Answer 1

如果您想再次使用该值，请将其暂时存储在控件的Tag属性中，然后在Exit上恢复。

Private Sub TextBox_Enter()
     With TextBox
        .Tag = .Value
        .Value = Null
    End With
End Sub

如果值为Null，则恢复它：

Private Sub TextBox_Exit(Cancel As Integer)
     With TextBox
        If IsNull(.Value) Then .Value = .Tag
    End With
End Sub