清除TextBox的值

Question

我有一个带有两个TextBox和一个Button的excel UserForm。如何在不使用TextBox1.Value = ""或TextBox1.Text = ""？

的情况下删除TextBox的值

我不能使用这两个操作，因为那时指令：TextBox2.Value = TextBox1.value*2 给我一个错误。 （错误是运行时错误13）

感谢。

Answer 1

尝试以不同的方式查看问题。如果box1为空，那么为什么要将它乘以2？在这种情况下，您应该在将box1乘以它之前检查box1的值。下面的代码检查Textbox1是否为数字，并且在乘以它之前不是空的。

Private Sub CommandButton1_Click()
    'Error check: does textbox1 have a number and is not null
    If IsNumeric(TextBox1.Value) And TextBox1.Value <> vbNullString Then
        TextBox2.Value = TextBox1.Value * 2
    Else
        TextBox2.Value = "Box1 is empty or invalid"
    End If
End Sub

有效号码：

无效或空：