一个简单的例子：
柳州网站建设公司创新互联建站,柳州网站设计制作，有大型网站制作公司丰富经验。已为柳州上千提供企业网站建设服务。企业网站搭建\外贸营销网站建设要多少钱，请找那个售后服务好的柳州做网站的公司定做！
Dim a(3) As Integer = { 0, 1, 2 }**修改**既然有界数组不能初始化，就还缺（省）界数组试试嘛：
Dim a() As Integer = { 0, 1, 2 }
类型不匹配的错误估计是你的结构体缺少构造函数造成的。在你的quality_i结构体定义里面加一个构造函数，如下所示
Public Structure quality_i
Public nub As Integer
Public nae As String
Public Sub New(ub As Integer, ae As String)nub = ubnae = aeEnd SubEnd Structure然后以如下方式初始化：
VB.NET ，结构体要写在所有函数的外部
Public Class Form1
Structure Hate
Dim str As String
Dim i As Integer
End Structure
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a As Hate
a.str = "string"
a.i = 1
MsgBox(a.str a.i)
End Sub
End Class
一个结构,可以理解为结构是将几个变量打包在一起.例如常用到的Point,Size,Location,等等,就是属于一个结构.例如Size的结构原型如下:Structure Size
Dim Width As Integer
Dim Hieght As Integer
End Structure举个例子,一个游戏人物的血,蓝,经验值,打包成一个结构,名称叫"状态",例子如下: Structure 状态
Dim 血 As Integer
Dim 蓝 As Integer
Dim 经验值 As Integer
End Structure就可以这样使用:dim Zt as 状态Zt.血=100Zt.蓝=100Zt.经验值=500到访问属性值的时候:XXX=Zt.血Zt.经验值+=100
结构体无法初始化值，你可以用类实现，或者写一个构造函数，把值传进去。
Public Structure wheelmodel
Public ID As Short
Public swapway() As Short
Public start As Short
Public Sub New(ByVal Size As UShort) 'Size就是传入的数组的大小
swapway = New Short(Size) {}
End Sub
End Structure
调用的时候：
Dim x As wheelmodel = New wheelmodel(10)
1、先定义一个结构体
2、初始化并定义一个结构体的变量
3、使用该变量即可
Dim wheel2(10) As wheelmodel2
不要用 New
结构体是值类型的，当你定义完数组之后，里面的元素（结构体的实例）就已经使用默认的构造函数初始化了
