附件的Form1代码：
Private Sub Command1_Click()
   For i = 1 To 9
      i
   Next
     Form2.Show 0
End Sub
如何使 Form2首先显示所赋的一个值，如：1，而不是显示Combo1。

是Form2中的代码？这样有错，您的代码放哪呢？
Private Sub Form_Load()
   ComboBox1.ListIndex = 1
End Sub

谢谢。这只是权宜之策，如果是不同的数据都要改一次？

是Form1中的代码？这样有错，您的代码放哪呢？
Private Sub Command1_Click()
   For i = 1 To 9
      i
   Next
     Form2.Show 0
      = 1 '这样有错
End Sub
或者
Private Sub Command1_Click()
   For i = 1 To 9
      i
      = 1  '这样有错
   Next
     Form2.Show 0
  End Sub
或者
Private Sub Command1_Click()
   For i = 1 To 9
      i
   Next
    = 1  '这样有错
     Form2.Show 0
End Sub