在VB编程中，若要将数值设置为两位数，可以使用以下方法：
使用`Format`函数
`Format`函数可以用来格式化数值，使其显示为指定的小数位数。例如，要将数值格式化为两位小数，可以使用以下代码：
```vb
Dim number As Double
number = 123.456
Dim formattedNumber As String
formattedNumber = Format（number, "0.00"）
MsgBox formattedNumber ' 输出为 "123.46"
```
在这个例子中，`"0.00"`指定了两位小数的格式。
使用`Text`属性
对于文本框控件（如`TextBox`），可以通过设置其`Text`属性来显示格式化后的两位数。例如：
```vb
Private Sub Form_Load（）
Dim inputNumber As String
inputNumber = InputBox（"请输入数字!"）
Dim textBox As TextBox
Set textBox = Me.TextBox1
textBox.Text = Format（Val（inputNumber）, "00"）
End Sub
```
在这个例子中，`TextBox1`的`Text`属性被设置为输入数字的两位小数格式。
使用`Round`函数
`Round`函数可以用来将数值四舍五入到指定的小数位数。例如，要将数值四舍五入到两位小数，可以使用以下代码：
```vb
Dim number As Double
number = 123.4567
Dim roundedNumber As Double
roundedNumber = Round（number, 2）
MsgBox roundedNumber ' 输出为 "123.46"
```
在这个例子中，`Round`函数将数值四舍五入到两位小数。
使用`Int`和`Mod`函数
可以使用`Int`和`Mod`函数来生成一个指定范围内的随机两位数。例如：
```vb
Dim random As New Random（）
Dim randomNumber As Integer
randomNumber = random.Next（10, 100） ' 生成10到99之间的随机数
Dim formattedNumber As String
formattedNumber = Format（randomNumber, "00"）
MsgBox formattedNumber ' 输出为 "01" 到 "99" 之间的随机两位数
```
在这个例子中，`random.Next（10, 100）`生成一个10到99之间的随机整数，然后使用`Format`函数将其格式化为两位数。
根据你的具体需求，可以选择以上方法中的任意一种来实现数值的两位数显示。