（已经解决）敬请各位高手解决“组合框”的显示数据的问题。谢谢。

附件的Form1的代码：
Private Sub Command1_Click()
   For i = 1 To 9
     s = s & Chr(10) & i
   Next
      s
      = 2
     Form2.Show 0
     Unload Me
End Sub
Form2“组合框”的代码：
Private Sub Form_Load()
   With Combo1
    .AddItem Combo1.ItemData(0)'这里有错，如何改，才能显示s
   End With
End Sub

[此贴子已经被作者于2016-5-6 08:53编辑过]