vb.net中创建类

不熟悉VB,如有不妥的地方请包涵!

创新互联公司专注为客户提供全方位的互联网综合服务，包含不限于网站制作、成都网站设计、濠江网络推广、小程序设计、濠江网络营销、濠江企业策划、濠江品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等，从售前售中售后，我们都将竭诚为您服务，您的肯定，是我们最大的嘉奖；创新互联公司为所有大学生创业者提供濠江建站搭建服务，24小时服务热线：18980820575，官方网址：www.cdcxhl.com

Public Class Stack

Dim aryData() As Integer

Sub New(ByVal Num As Integer)

Dim aryData(Num) As Integer

End Sub

Function Pop() As Integer

If (aryData.Length = 0) Then

Return 0

Else

Dim a As Integer

a = aryData(aryData.Length)

aryData(aryData.Length) = Convert.ToInt32(DBNull.Value)

Return a

End If

End Function

Sub Push(ByVal n As Integer)

For Each i As Integer In aryData

If (aryData(i) = Convert.ToInt32(DBNull.Value)) Then

aryData(i) = n

End

Else

Continue For

End If

Next

End Sub

Sub PrintStack()

For Each i As Integer In aryData

If (aryData(i) = Convert.ToInt32(DBNull.Value)) Then

End

Else

Print(aryData(i))

End If

Next

End Sub

End Class

vb.net怎么添加类

模块：相当于全局级变量。

类：可以实例化，继承等。

对于你这样的初学者来说，可以视作 模块变量=类的public shared变量。

最好的方法是：项目-添加-类-粘贴代码。

vb.net创建类引用类

你是指……

Dim 变量名 as 类型 = new 类型（构造参数）

这样么

或者是

Dim 变量名 as new 类型(构造参数)

这样？

还是说

Class 类名

End Class

这样？