大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
格式就是set A= new [object]
为峡江等地区用户提供了全套网页设计制作服务,及峡江网站建设行业解决方案。主营业务为网站设计、做网站、峡江网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!
比如创建的是系统已有基类的新对象,那就直接使用语句
例如:在一个过程中:
private sub ...
set a = new ADODB.Connection(这是一个用来连接数据库的对象)
...
end sub
你只要输入到new的地方,就会出来自动匹配下拉列表,你可以看见你可以创建哪些可用对象。
如果是自定义的对象,就必须先建立类
要添加类模块创建类
比如类模块Class1.cls
那么在需要引用类中函数时你需要创建这个类的实例对象 set a as new Class1
找个例子自己练习一下就很容易弄清楚了
VB最终的版本是VB6.0。微软早都不支持了。在Win7上VB6.0是可以用的,但是之前在XP下写好的VB程序有些可能会不能用,原因是WIN7中取消了许多之前的DLL。
VS2012上就是VB.Net了,语法和VB类似。
VB6.0是面向过程开发,VB.net是面向对象开发,但是是为了照顾VB6.0程序员的开发习惯,所以有点不伦不类。
定义和实例化可以一步完成:
Dim obj() As New A
使用的时候就不用再一个个去New了。
在.NET中,对象和结构还是有些不同的,定义方式也是其中之一。
像整型、字符串和一些数值类型都属于结构。结构只需要这样定义就可以了:
Dim str As String
系统自动分配内存,然后就可以对它进行访问了。
如果像这样声明普通类:
Dim cla As Class
此时直接访问cla类成员会引发一个null异常。因为你仅仅声明了cla的类型(cla是Class类型的),而内存中没有一个真正的对象(类的实例)。如果你需要一个实例,就需要用New关键字,例如:
Dim cla As New Class("some words")
这时系统会建立一个Class对象,并将cla指向这个对象。这样就完成了一次实例化。这时就可以直接访问cla的成员了。
在实例化时,系统会调用对象的New函数,即构造函数。后面括号里的内容并不是对象的属性,而是要传递给这个构造函数的参数。至于对象的构造函数是否需要参数、需要多少参数以、参数的类型及重载情况等,取决于要实例化的类型。
上面的Class只是例子,代换成实际的类即可。