Question

vb中如何使窗体内容中的不同行的数字上下对齐

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励20（财富值+成长值）

Answer 1

‘给个例子
Private Sub Command1_Click()
   Dim a(1 To 10, 1 To 10) As Integer, ssj As Long, xsj As Long
   Cls
   Randomize
   For i = 1 To 10
      For j = 1 To 10
         a(i, j) = Int(Rnd * 900 + 10)
         Print Tab(6 * (j - 1)); a(i, j); '主要是tab()控制输出位置
      Next j
      Print
   Next i
End Sub

Answer 2

格式化数字串，可以用format或formatnumber函数。