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

ComboBox1.ListIndex = 1

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

放到循环体结速后面一行。

我常用手法是：点击Combo1控件，右边属性栏,把text右边的Combo1改为1。不知是否是你想要的结果

收到的鲜花

• HVB6 于 2016-04-15 15:45 送鲜花  6朵   附言：我很赞同

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

是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

Private Sub Command1_Click()
   For i = 1 To 9
      i
   Next
   Form2.Combo1.ListIndex = 1  '这样有错
     Form2.Show 0
End Sub

循环体结束后，立即让它选择第二个值？？？？
第一个值的 listindex =0  ,
并且你代码里，对象的名字写错了，我红字标了。

收到的鲜花

• HVB6 于 2016-04-15 18:10 送鲜花  6朵   附言：我很赞同