新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
如上面所说,你可能还不太了解类、函数等的作用。
目前创新互联公司已为近千家的企业提供了网站建设、域名、网站空间、网站托管、服务器托管、企业网站设计、武昌网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。
类可以用来封装一系列操作,或者是一类对象的特性。像上面的描述,有可能是滥用类了。
建议你这样,弄一个专门的运算类,里面有四个运算的函数,比如:
Class 运算
Shared Function 加(ByVal 加数1 As Decimal, ByVal 加数2 As Decimal) As Decimal
'举个例子
Return 加数1 + 加数2 '百度打不出英文加号,你自己改一下
Exit Function
End Function
Shared Function 减(ByVal 被减数 As Decimal, ByVal 减数 As Decimal) As Decimal
'举个例子
Return 被减数 - 减数
Exit Function
End Function
End Class
上面我写了两个例子,你可以照抄然后自己写乘除的,总之不要滥用类就行。
PS:Shared函数的使用不需要类被实例化,可以直接这样使用:
Msgbox(运算.加(1,2).ToString)
你会发现“运算”是蓝色的
应该是一样的,createobject(“”)
不过你还是要添加引用的,否则那个调用对象是不行的。
建议你还是引用的好,这样容易查错,object对象无法继承,所以就没有下拉菜单的索引帮助。这样往往运行时才会引发错误,且这种错误不方便查询定位。
在项目A里添加引用,在“添加引用”对话框里找到项目B就可以了。也可以先把项目B生成dll文件,然后在项目A中添加对这个dll文件的引用。
你是指……
Dim 变量名 as 类型 = new 类型(构造参数)
这样么
或者是
Dim 变量名 as new 类型(构造参数)
这样?
还是说
Class 类名
End Class
这样?