当鼠标在VB中留下文本框时,如何恢复值?

时间:2012-11-26 19:48:55

标签: vb.net textbox click mouseevent

我的文本框的默认值为“0,00”。我的代码在单击时清除文本框。

  Private Sub Pop1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Pop1.MouseDown
    Pop1.Text = ""

End Sub

现在我想创建一个代码,如果在离开文本框时将texbox留空,则返回默认值(0,00) - 点击其他项目。

1 个答案:

答案 0 :(得分:2)

您可以处理“文本”框的“离开”事件,如果它为空,则将其设置为默认值。

Private Sub TextBox1_Leave(sender As Object, e As System.EventArgs) Handles TextBox1.Leave
    If Me.TextBox1.Text.Equals(String.Empty) Then
        Me.TextBox1.Text = "0,00"
    End If
End Sub