vb Active 控件 集合类 问题
引言:
做一个控件, 用于 数据采样如示波器, 可以添加,删除曲线, 设置曲线的相关属性: 线型,颜色,等...
过程:
先创建 线 类, 在用户控件里实现 线 对象创建, 并声明一个 集合, 用于 存放建立的线对象.
问题:
在应用程序中, 无法显示 集合中对象的 属性. 如: usercontrol1. lines(1).???
其中 lines 是个对象集合.
而且 在应用程序中添加线， 直接操作集合的方法也不好， usercontrol1.lines.Add
(item,key,before,after)
其实我想实现是个类似 ToolBar 的功能, Toolbar1.buttons(0).属性 ，
Toolbar1.buttons.Add( index,key ,...)
这样用户交互直观，安全．
解决：
期待高手给点建议，
看ＭＳＤＮ 似乎可以 声明 安全类集合， 这样就可以实现 用户程序里显示属性， 但Ａdd 方法不知道怎么做．
相关文档：
看了别人写的C#的 自己转了一下 然后后重新改了改 写成了这个
另外还有一个我写的验证日期是否合法的代码 在后面 都是vb的 c#只会看不会写
'判断闰年=======================
Private Function CheckLeap(ByVal year As Integer) As Boolean
If (year Mod 4 = 0) AndAlso (year Mod 100 <> ......
使用VB把Excel导入到Sql数据库中，其实有几种方法。
下面我介绍的这种方法，较为简单。
其实这种方法的话，是直接使用T-SQL操作的，因此，到了VB里面，直接eccute这个代码就OK了的。
-----------------------------------------------------下面是在T-sql中的语句
if object_id('NewTable') is not null/*判断表NewTabl ......
在开发IP-MAC扫描监视器时，设置了开机自动运行，但是当WINDOWS启动后，程序运行后却打开窗体了，不是最小化运行的。这怎么办呢？于是想到加一个参数给程序启动时，但不知道怎么实现，结果发现VB中有command，是可以接受参数的。直接：AAA.EXE xxx,
在程序中用一个变量得到这个参数，那就可以了。做法：
1、在注册表自启� ......
Option Explicit
Function Delete3(Arr As Variant) As Variant
Dim i As Integer
For i = LBound(Arr) To UBound(Arr)
If i > UBound(Arr) Then Exit For
If Arr(i) = 3 Then
Do
Dim j As Integer
For j = i To UBound(Arr) - 1
......
