在Visual Basic（VB）中打印数量，你可以使用`Print`语句结合循环结构来实现。以下是一个简单的示例，展示了如何使用`For`循环来打印从1到10的数字，并在每个数字之间添加空格：
```vb
Private Sub Command1_Click（）
Dim i As Integer
For i = 1 To 10
Print i, " " ' 打印数字i和一个空格
Next i
End Sub
```
如果你想要在每行打印5个数字后换行，可以使用`Space`函数来添加空格，并使用`If`语句来判断是否已经打印了5个数字：
```vb
Private Sub Command1_Click（）
Dim i As Integer
Dim count As Integer
For i = 1 To 50
Print i, Space（8） ' 打印数字i，后面跟8个空格
count = count + 1
If count Mod 5 = 0 Then
Print "" ' 当打印了5个数字后换行
End If
Next i
End Sub
```
在这个例子中，`Space（8）`会生成一个包含8个空格的字符串，这样每个数字之间就会有8个空格的间隔。`count`变量用于跟踪已经打印的数字数量，当`count`能被5整除时，就会换行，开始新的一行。
如果你想要打印特定数量的数字，只需将循环的结束条件（`To`后面的数字）修改为你想要的数量即可。例如，如果你想要打印从1到20的数字，可以将循环改为`For i = 1 To 20`。
这些示例适用于VB的窗体应用程序。如果你是在进行其他类型的编程，比如控制台应用程序，那么打印数量的方法会有所不同。在控制台应用程序中，你通常会使用`Console.WriteLine`方法来打印输出。