试试
Dim k(9) As quality_i = { 。。。 }
把“。。。”替换成你要初始化的数据。一个简单的例子：
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 = ub
nae = ae
End Sub
End Structure
然后以如下方式初始化：
Dim k() As quality_i = {
New quality_i(1, "one"),
New quality_i(2, "two")
}
。
答：在每行后面加个 _ （下划线前要有个空格详情>>
答：我建议你去--天下网吧联盟 这里面都是网吧业主和网管交流的论坛，你可以自己注册一个用户进去看看，你可以和他们交流也可以寻求他们的帮助，我想没有你解决不了的问题，...详情>>
答：格式化文本区域的段落标记，用于规定文本和层的属性和位置等。比如： 新浪网 用来规定 新浪网 这三个字居中显示。 文本中心(CENTER)、左(LEFT)或右(R...详情>>
