函数定义 function FunctionName(args)     --code     --[return ReturnValue] end 函数特殊 在函数中，一般都要写出一对空括号 除非函数只有一个参数，并且此参数是一个字面字符串或table构造式 eg: print "Hello,world" dofile 'a.lua' type{} f{x=10,y=20} 面向对象式调用  提

这类控件毕竟有商业用途的，不好开源，望谅解。参考我发布的其他控件，自己模仿着写一个吧。 不过我这个控件基本上已经提供了所有常用接口，比网上其他人提供的要大方的太多太多了。 下面公开测试程序，里面有相关接口的使用。 由于VB6对鼠标滚轮的支持不好，测试程序里使用了外挂式的方法用于支持鼠标滚轮。   建一个标准工程，部件中加载我的控件mylist.ocx，窗体代码如下：   Private Sub F