退格键上的文本框更改事件错误 --VBA 用户窗体

Question

我在用户表单上有 2 个文本框：tbQty1、tbQty2。我希望 tbQty2 的值​​等于 tbQty1.value * 2。以下简单代码 [_Change()] 有效，除非我删除或退格出 tbQty1 的值。我收到 运行 时间错误 13 类型不匹配

Private Sub tbQty1_Change()

tbQty2.Value = tbDoorQty.Value * 2

End Sub

我已经尝试过使用 tbQty1.value = "" 等和 Keypress (IF KeyAscii = 8 Then tbQty1 = "") 的 IF 语句。一切都以同样的方式爆炸，我只是错过了一些东西。感谢帮助

Answer 1

If isnumeric(tbQty1.value) then
 'statements
end if