大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
你是指……
我们提供的服务有:成都网站设计、成都网站建设、微信公众号开发、网站优化、网站认证、萍乡ssl等。为成百上千家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务,是有科学管理、有技术的萍乡网站制作公司
Dim 变量名 as 类型 = new 类型(构造参数)
这样么
或者是
Dim 变量名 as new 类型(构造参数)
这样?
还是说
Class 类名
End Class
这样?
不熟悉VB,如有不妥的地方请包涵!
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
.NET 的环境只有一个,就是.NET Framework
如果你是XP系统的话一般要安装4.0版本
下载的软件当然是visual studio;你可以使用visual studio2015,但是要注意开发时要选择对应的目标框架
只要在这里能看到.NET Franmework4.0就表示你安装好了