如果你在自定义函数中是要
c = DataIn.Point(i1, i2)
那么这个DataIn就是个图片框控件,那么函数的声明语句就是:
Public Function 自定义函数(DataIn As PictureBox) As String
调用的时候应该是:
自定义函数(Picture1)
但是,如果你在函数体中需要这样的效果:
Picture2.Picture = DataIn
那么这个DataIn就应该是图片框控件的Picture属性!函数的声明就应该变为:
Public Function 自定义函数(DataIn As stdPicture) As String
调用方法则变为:
自定义函数(Picture1.Picture)
其实,如果函数的参数是个对象,而你又不知道这个对象的具体类型是什么,那么有个偷懒的方法,就是都声明为Object:
Public Function 自定义函数(DataIn As Object) As String
甚至乎啥类型也不用,让VB去自动转换也可以!
Public Function 自定义函数(DataIn) As String