vb.net 初始化数组赋值和循环访问：

在 VB.NET 中，初始化数组并循环访问其元素可以使用以下代码：

' 初始化数组
Dim fruits() As String = {"apple", "banana", "cherry", "date"}

' 循环访问数组元素
For Each fruit As String In fruits
    Console.WriteLine(fruit)
Next

这样就会输出数组中的每一个元素，即“apple”、“banana”、“cherry”和“date”。你也可以根据需要替换字符串为其他类型的元素。如果你想按顺序循环访问数组中的元素，可以使用以下代码：

' 按顺序循环访问数组元素
For i = 0 To fruits.Length - 1
    Console.WriteLine(fruits(i))
Next

这样就会按顺序输出数组中的每一个元素，即“apple”、“banana”、“cherry”和“date”。需要注意的是，数组下标从0开始，最后一个元素的下标为数组长度减1。