Question

我有一个文本框输入一个数字，如果输入的数字是一位数字我想要自动添加前导零。我怎么能这样做？这是什么代码？

请帮忙

Answer 1

使用Validating事件确保您的代码始终触发。并使用x2格式指定您需要2位数字。

Private Sub TextBox1_Validating(ByVal sender As Object, ByVal e As CancelEventArgs) Handles TextBox1.Validating
    If IsNumeric(TextBox1.Text) Then
        TextBox1.Text = CInt(TextBox1.Text).ToString("x2")
    End If
End Sub

Answer 2

Protected Sub TextBox1_TextChanged(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles TextBox1.TextChanged
If TextBox1.Text.Length = 1
   TextBox1.Text = "0" + TextBox1.Text
End if
End Sub

Answer 3

这应该有用，它也应该从文本框的末尾开始。

  Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
    If TextBox1.Text.Length = 1 Then
        TextBox1.Text = "0" + TextBox1.Text
        TextBox1.SelectionStart = TextBox1.TextLength + 1
    End If
End Sub

如何自动将前导零添加到文本框中的数字

3 个答案: