在VB中，可以使用Dim語句來定義字符串數組并賦值。以下是一個示例：
Dim strArray() As String = {"Hello", "World", "!"}
在上面的示例中，使用Dim語句定義了一個名為strArray的字符串數組，并使用花括號來賦值。數組中包含了三個字符串元素：“Hello”，“World"和”!"。
另外，還可以先定義字符串數組，然后逐個賦值。示例如下：
Dim strArray(2) As String
strArray(0) = "Hello"
strArray(1) = "World"
strArray(2) = "!"
在上面的示例中，先使用Dim語句定義了一個名為strArray的長度為3的字符串數組。然后，通過索引逐個賦值。數組中包含了三個字符串元素：“Hello”，“World"和”!"。
請根據你的具體需求選擇適合的方法來定義和賦值字符串數組。
