关于外部添加的Combobox无法调用的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于外部添加的Combobox无法调用的问题

共有10770人关注过本帖树形打印复制链接主题：关于外部添加的Combobox无法调用的问题

狐狸爸爸

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2013/4/18 17:57:00 [显示全部帖子]

你可以按照标准的方法来添加：

Dim cb1 As WinForm.ComboBox

cb1 = e.Form.CreateControl("字段", ControlTypeEnum.Combobox)

With cb1

.width = 90

.left = Forms("数据区").Width / 4

.Top = 15

End With

Forms("数据区").Controls("底层面板").AddControl(cb1)

如果你要底层的控件来设置事件,可以：

Dim cb2 As New Windows.Forms.Combobox = e.Form.Controls("ComboBox1").BaseControl

狐狸爸爸

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2013/4/19 10:09:00 [显示全部帖子]

我知道原因了，因为foxtable的ComboBox并非Windows.Forms.Combobox，是一个自定义的控件，所以你添加的Windows.Forms.Combobox，不能遍历获取，Foxtable不认这个控件的。

如果需要在其他地方引用这个控件，只能将其赋值给一个public变量。

狐狸爸爸

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：管理员帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2013/4/19 11:45:00 [显示全部帖子]

不是这个意思。

1、在全局变量中定义一个变量：

Public cb1 As Windows.Forms.Combobox

2、添加控件的代码改为：

With cb1

.left = Forms("数据区").Width / 4

.Name = "字段"

[此贴子已经被作者于2013-4-19 11:45:49编辑过]

主题：关于外部添加的Combobox无法调用的问题