社区 › VB › 在运行时填充窗体控件

Bryco 发表于 2007-4-26 15:03:02

在运行时填充窗体控件

有些事情似乎很简单，但我却找不到。我有一个名为＜strong＞frmSetup
因此，鉴于该示例，为什么我不能获取值以转到cbo框
这些是我迄今为止尝试过的
      frmSetup.frmBusCenterLine.cboBCLHighBus.AddItem "7'-6"""
      frmSetup.cboBCLHighBus.AddItem "7'-8"""
      frmSetup.frmBusCenterLine.Controls.Item("cboBCLHighBus").AddItem "dsh"
      
      cboBCLLowBus.AddItem "8'-0"""
      cboBCLLowBus.AddItem "8'-6"""
**** Hidden Message *****

jjs 发表于 2007-4-26 15:13:31

您是否单击了组合框以检查信息是否真的进入那里？ 如果您不添加....ListIndex = 0，则组合框将显示为空。 见下文...这对我有用。
Public Sub Main()
    Load frmSetup
    frmSetup.cboBCLHighBus.AddItem "7'-8"""
    frmSetup.cboBCLLowBus.AddItem "8'-0"""
    frmSetup.cboBCLLowBus.AddItem "8'-6"""
   
    frmSetup.cboBCLHighBus.ListIndex = 0
    frmSetup.cboBCLLowBus.ListIndex = 0
   
    frmSetup.Show
End Sub

jjs 发表于 2007-4-26 15:27:55

马特，你在用镜框吗？我从来没有任何问题填补一个国会预算办公室的盒子。我试着添加listindex部分，但还是不行。
这是表格

jjs 发表于 2007-4-26 15:31:36

这是我整理的小程序。

jjs 发表于 2007-4-26 15:35:17

好的，我看到我们正在做的不同事情是你从模块加载，因为我尝试不使用FormInitialize区域。 顺便说一句，你的工作。 让我看看我是否能很快适应我的。

jjs 发表于 2007-4-26 15:40:45

好的，这很有效。我的问题是为什么…从模块传递到表单与通过表单初始化加载相比有什么不同？

jjs 发表于 2007-4-26 15:44:19

这里它使用了初始化事件。仍然有效。不确定你有什么不同？你能把它贴出来或者用代码PM我吗？

jjs 发表于 2007-4-26 15:57:16

没必要，只是用棒球棒打我：生气：：生气：：愤怒：＜br＞我去把代码复制给PM you，发现我无意中选择了错误的事件，而这段时间，我一直在为表单填充不同的事件，一个从未运行过的事件，所以它从来没有填满盒子。呸<我想我应该去那里看看。习惯的力量，刚刚错过了鼠标。

jjs 发表于 2007-4-26 15:58:02

谢谢你让我放慢速度，重新审视代码

jjs 发表于 2007-4-26 16:02:02

没问题...我以前去过那里(很多次)。

查看完整版本: 在运行时填充窗体控件