正文
vb.net组态 vbnet implements
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
在vb模块中怎么定义动态数组？
1、声明数组的语句：
Dim types( ) As integer
2、然后使用ReDim语句来配置数组大小。
ReDim Types(X+1)
3、假设想改变数组大小又不想丢失原来的数据，仅仅要在ReDim语句中包括Preservekeyword就能够，典型语句为：
ReDa_m PresetVe Types(10，23)
对于多维数组，在使用Preservekeyword时，仅仅能改动最后一维的大小。假设改变其它维，那么将出现执行错误。假设不清楚某维的当前大小，能够使用GetI~ength函数来获取。
扩展资料：
数组的使用：
用For Each来循环遍历一个数组。比如：
Dim x As Integer
F0r Each x In arrayl
Console．WriteLine(x)
Next
在使用数组时还要注意，不仅声明语法有变化，并且在执行时处理方式也有了非常大的变化。VB．NET在堆栈中给数组分配地址空间，当向一个方法传递数组类型的参数时，使用的是引用传递而不是值传递。以下是互相传递数组引用的三个方法：
Dim arrayl(3，3)AS Integer
Dim array2 As Integer(，)
Redim array2(3，3)
Dim array3 As Integer(，)={{2，4}，{12，29}}
相关问答
Q1: vb.net 对象数组
你只是定义了一个对象，类而已
首先要给对象设置变量，这个还不是数组
Public class As Single的class 应该是关键字请换一个名字
Dim KidsX(1 to 100) as kids
KidsX(1).classx=1
KidsX(1).grade=1
KidsX(1).name=”张某"
KidsX(2).classx=1
KidsX(2).grade=2
KidsX(2).name=”王某"
……
Q2: 请问.net组态是什么?
组态软件是有专业性的。一种组态软件只能适合某种领域的应用。组态的概念最早出现在工业计算机控制中。如DCS(集散控制系统)组态，PLC（可编程控制器）梯形图组态。人机界面生成软件就叫工控组态软件。其实在其他行业也有组态的概念，人们只是不这么叫而已。如AutoCAD，PhotoShop，办公软件(PowerPoint)都存在相似的操作，即用软件提供的工具来形成自己的作品，并以数据文件保存作品，而不是执行程序。组态形成的数据只有其制造工具或其他专用工具才能识别。但是不同之处在于，工业控制中形成的组态结果是用在实时监控的。组态工具的解释引擎，要根据这些组态结果实时运行。从表面上看，组态工具的运行程序就是执行自己特定的任务。
虽然说组态就是不需要编写程序就能完成特定的应用。但是为了提供一些灵活性，组态软件也提供了编程手段，一般都是内置编译系统，提供类BASIC语言，有的甚至支持VB。
在当今工控领域，一些常用的大型组态软件主要有：WinCC，iFix，Intouch，组态王，力控等。
Q3: vb.net中如何对结构数组进行new初始化
首先你是怎么重写结构的Sub New的呢？不会有这个错误吗：“结构无法声明没有参数的非共享“Sub New”？
结构是值类型，和类不一样，不一定要有构造函数。直接
Dim B(2) As A
如果有一个含参数的Sub New(i As Integer)
Dim B() As A={New A(1), New A(2)}
有时要初始化很多个的时候可以用循环
Dim c As Integer = 50
Dim B(c) As A
For i = 0 To c
B(i) = New A(i)
Next
不过这样是对变量重新赋值，这种方法用在类上比较好。
看看这个有帮助哦：
Q4: vb和vb.net的区别和特点
1、vb.net 完全符合面向对象的编程语言抽象、封装、继承的四大特性，而vb不支持继承。
2、错误处理不同。
vb中只是On Error.....goto和On Errer Resume Next ，这些错误称为非结构化异常处理。而在vb.net中采用的结构化异常处理机制，try...catch....finally控制。
3、两者产生的窗体不同。
vb.net 允许创建不同类型的应用程序，例如，创建ASP.NET和ASP.NET Web 服务应用程序，还允许创建控制台应用程序和作为桌面服务运行的应用程序。但是vb 只能创建Windows窗体。
4、数据库访问的差别。
vb6.0是通过ADO（Active X Data Objext）来实现对数据库访问。而vb.net 是通过ADO.NET来访问数据库。
扩展资料
Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。
“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。
“Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，是一种在计算技术发展历史上应用得最为广泛的语言。
Visual Basic源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用于高效生成类型安全和面向对象的应用程序 。
参考资料：百度百科-Visual Basic
Q5: vb.net有没有类似vb6.0控件数组的功能
可以实现
首先创建一个Button类型控件数组：
1、创建“Windows应用程序”类型的工程，添加名为ButtonArray的类，并使该类继承 System.Collection.CollectionBase 类。System.Collections.CollectionBase类是.NET框架类库中为集合操作提供抽象的基类，通过对它的继承可以为我们的ButtonArray类具备集合增加、删除、索引的功能。
2、为ButtonArray类添加ParentForm属性，即控件组所在窗体，创建初始化函数（构造函数）；
3、为控件数组类增加AddItem方法，该方法在控件数组类中添加成员；
4、为控件数组类增加RemoveItem方法，该方法在控件数组中删除一个成员。
示例代码：
Public Class ButtonArray
Inherits System.Collections.CollectionBase
Private ReadOnly ParentForm As System.Windows.Forms.Form
Public Sub New(ByVal pForm As System.Windows.Forms.Form)
ParentForm = pForm
End Sub
Default Public ReadOnly Property Item(ByVal index As Integer) As System.Windows.Forms.Button
Get
Return Me.List.Item(index) ' ButtonArray的List 属性从CollectionBase 继承
End Get
End Property
Public Sub AddItem()
Dim btnItem As New System.Windows.Forms.Button
Me.List.Add(btnItem)
ParentForm.Controls.Add(btnItem) '向窗体中增加控件
btnItem.Tag = Me.Count 'Count属性从CollectionBase 继承
btnItem.Top = Me.Count * 30
btnItem.Left = 200
btnItem.Text = "Button" Me.Count.ToString
AddHandler btnItem.Click, AddressOf btnItem_Click '绑定事件处理程序
End Sub
Public Sub AddItem(ByVal btnItem As System.Windows.Forms.Button)
Me.List.Add(btnItem)
AddHandler btnItem.Click, AddressOf btnItem_Click '绑定事件处理程序
End Sub
Public Sub RemoveItem()
If Me.Count 0 Then
ParentForm.Controls.Remove(Me(Me.Count - 1))
Me.List.RemoveAt(Me.Count - 1)
End If
End Sub
Public Sub btnItem_Click(ByVal sender As Object, ByVal e As System.EventArgs)
'在这里编写控件数组对点击事件的响应
'例如：
MsgBox("点击：" sender.GetType().ToString CType(CType(sender, Button).Tag, String))
End Sub
End Class
使用创建的控件数组
在Form1中放置两个按钮Button1、Button2，分别测试控件数组的增添、删除。
双击Form添加代码：
Public Class Form1
Inherits System.Windows.Forms.Form
……Windows窗体设计器生成的代码……
Dim Buttons As New ButtonArray(Me)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Buttons.AddItem()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Buttons.RemoveItem()
End Sub
End Class
其他的控件数组也可以用类似的方式来实现
例如 Label控件数组
LabelArray.vb代码如下：
Public Class LabelArray
Inherits System.Collections.CollectionBase
Private ReadOnly ParentForm As System.Windows.Forms.Form
Public Sub New(ByVal pForm As System.Windows.Forms.Form)
ParentForm = pForm
End Sub
Default Public ReadOnly Property Item(ByVal index As Integer) As System.Windows.Forms.Label
Get
Return Me.List.Item(index) ' ButtonArray的List 属性从CollectionBase 继承
End Get
End Property
Public Sub AddItem(ByVal btnItem As System.Windows.Forms.Label)
Me.List.Add(btnItem)
AddHandler btnItem.Click, AddressOf btnItem_Click '绑定事件处理程序
End Sub
Public Sub btnItem_Click(ByVal sender As Object, ByVal e As System.EventArgs)
'在这里编写控件数组对点击事件的响应
'例如：
MsgBox("点击：" sender.GetType().ToString CType(CType(sender, Label).Tag, String))
End Sub
End Class
使用创建的Label控件
在Form1中放置两个按钮Label1、Label2
双击Form添加代码：
Public Class Form1
Inherits System.Windows.Forms.Form
#Region " Windows 窗体设计器生成的代码 "
Public Sub New()
MyBase.New()
'该调用是 Windows 窗体设计器所必需的。
InitializeComponent()
'在 InitializeComponent() 调用之后添加任何初始化
'用来绑定label
BindArray()
End Sub
……Windows窗体设计器生成的其他代码……
#End Region
Dim Labels As New LabelArray(Me)
Public Sub BindArray()
Me.Label1.Tag = "1111"
Me.Label2.Tag = "222"
Labels.AddItem(Me.Label1)
Labels.AddItem(Me.Label2)
End Sub
End Class
然后可以测试点击两个label可以显示相应的Tag的信息。
vb.net组态的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet implements、vb.net组态的信息别忘了在本站进行查找喔。
