vb如何调用textbox的数字

在VB（Visual Basic）中，如果你想要获取`TextBox`控件中的数字，你可以使用`Val`函数或者将`TextBox`的`Text`属性转换为整数。以下是一个简单的例子，展示了如何从`TextBox`中获取数字值：

```vb

' 假设有一个名为 TextBox1 的 TextBox 控件

Dim number As Integer

' 使用 Val 函数获取数值

number = Val(TextBox1.Text)

' 或者直接将 Text 属性转换为整数，如果它包含有效的数字

number = CInt(TextBox1.Text)

' 现在number变量包含了TextBox1中的数字值

```

请注意，如果`TextBox`中的文本不是有效的数字，`Val`函数会返回0，而`CInt`函数会抛出异常。在使用`CInt`之前，你可能需要先检查文本是否为有效的数字。

```vb

' 检查 TextBox1 的 Text 是否为有效数字

If IsNumeric(TextBox1.Text) Then

number = CInt(TextBox1.Text)

Else

MsgBox "TextBox 中不是有效的数字"

End If

```

这段代码首先检查`TextBox1.Text`是否为数字，如果是，则将其转换为整数并存储在`number`变量中；如果不是，则弹出一个消息框通知用户文本不是有效的数字。