敬请各位高手解决组合框的显示问题。谢谢。

HVB6 发布于 2016-04-15 08:41， 2369 次点击

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

只有本站会员才能查看附件，请登录

7 回复

yuk_yu2016-04-15 11:32

回复楼主 HVB6

ComboBox1.ListIndex = 1

HVB62016-04-15 12:04

回复 2楼 yuk_yu

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

风吹过b2016-04-15 13:31

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

chen35232016-04-15 14:24

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

HVB62016-04-15 15:44

回复 5楼 chen3523

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

HVB62016-04-15 15:54

回复 4楼风吹过b

是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

风吹过b2016-04-15 17:35

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

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