自制表格控件的问题

Question

传输结果集对象不能用byval ，请使用 byref 进行传递。

Answer 1

传输结果集对象不能用byval ，请使用 byref 进行传递。

Answer 2

1.
    set Grid1.DataSource = PropBag.ReadProperty("DataSource",Nothing)
Error
---------
2.
    set Grid1.DataSource = PropBag.ReadProperty("DataSource",Null)
Error
---------
对象变量或with块变量未设置

Answer 3

DataSource 根本就不是可保存的。与属性包没有关系。
应该在代码中动态设置。

Answer 4

把WriteProperty与ReadProperty中，关于DataSource的代码删掉。

Answer 5

我希望在属性包中列出DataSource属性,应如何做？！？！
thank you!

Answer 6

除StdFont, StdPicture等系统已定义的对象类型可出现在自定义控件的属性框中，其它自定义的Object类型的属性都无法出现在属性框中。

Answer 7

to: linux_withwind(随风而去)请详细说明
my mail---
[email protected]

Answer 8

我的控件是这样写的：Public Property Get DataSource() As DataSource
 Set DataSource = Grid1.DataSource
End PropertyPublic Property Set DataSource(ByVal New_DataSource As DataSource)
 Set Grid1.DataSource = New_DataSource
 PropertyChanged "DataSource"
End PropertyPublic Sub Refresh()
 MS1.Refresh
End SubPrivate Sub UserControl_ReadProperties(PropBag As PropertyBag)
 Set DataSource = PropBag.ReadProperty("DataSource", Nothing)
End SubPrivate Sub UserControl_WriteProperties(PropBag As PropertyBag)
 Call PropBag.WriteProperty("DataSource", DataSource, Nothing)
End Sub绝对没问题。关键在于As Datasource 而不是As Object

Answer 9

to srxgs() 我试了不可以 error message ： Set DataSource = New_DataSource
 "溢出堆栈空间"可以发完整的程序到我的mail 中吗？
[email protected]: linux_withwind(随风而去)请详细说明
my mail---
[email protected] all:
高高难问题（价值121分，4天无人给出解决办法）详情请见
http://www.csdn.net/expert/topic/903/903052.xml?temp=.3521234
该贴已经结分
签名者给分！（因为虽然您没回答问题但您的签到使我的贴子提前了）
感谢您的帮助！！！

Answer 10

to srxgs() ,linux_withwind(随风而去)请详细说明
签名者给分！（因为虽然您没回答问题但您的签到使我的贴子提前了）
感谢您的帮助！！！

Answer 11

to srxgs() ,linux_withwind(随风而去)请详细说明
签名者给分！（因为虽然您没回答问题但您的签到使我的贴子提前了）
感谢您的帮助！！！

Answer 12

Sub TOkuailexq2000():
    srxgs()所提供的代码是可行的，不会报错。
    你所指的“溢出堆栈空间”，好象是VB的BUG。我仿佛记得以前碰到过类似问题。你下载SP5看看。
    代码我已Mail 给You!
End Sub'同时关注
Sub ToAll()
但是我遇到两个与此相关的问题，困惑以久，希望大家给予帮助。
问题一：关于复杂绑定的数据识别控件的DataSource
    在kuailexq2000()所提问题中，幸好msflexgrid本身有DataSource；
    如果没有呢？要实现这种数据识别控件的复杂绑定该怎样做？假设将本工程中的msflexgrid换成ListView。
问题二：关于DataSource对象
    我个人理解，DataSource对象的确有数据识别的功能（在属性包中能自动监测窗体中可用的数据源）。
    但是，假设一个用户控件中有多个TextBox组合在一起，需要复杂绑定，而DataSource对象本身没有接口，如何在Property Set DataSource中实现控件的DataSource属性？
End Sub'凡给予帮助的，均给分！

Answer 13

you are right!
I have see your source,you are right ,(I can do my programme with you way )thank you!
but,I find you do it with mshflexgrid!
I try it with msflexgrid,but It is error about adodc (message:无数据绑定)
maybe the two control have some differents!(maybe)
我见您引用了 microsoft data source interfaces 我不知道合时用这个引用，有没有资料提供一下。

Answer 14

1、关注你的问题！（ListView有datasource）
你同意现在结贴吗？2、(这个问题可以结贴了！谢谢大家的帮助)3、我发现现在关注控件的人挺多大家可以把这类贴子用一个统一的标题头便于以后整理！例:
自制控件（ListView）：关于datasource的问题！
自制控件（msflexgrid）：关于datasource的问题！

Answer 15

答复kuailexq2000(2002-08-05 09:01:00)帖：
msflexgrid实际上是VB5中使用的FlexGrid控件，在VB6中发布主要是为了向后兼容。我个人理解，msflexgrid相比mshflexgrid主要有两方面的局限性：
1.msflexgrid不能访问包括带区在内的某些功能。
2.对于所识别的数据源有一定的局限性。例如无法识别ADO 1.5以上的版本。
因此，Microsoft在VB6中重新发布了mshflexgrid,同时建议使用mshflexgrid(MSDN中有对此的相关描述)。