將Calendar改成民國年

Dim info As New Globalization.CultureInfo("zh-TW")
info.DateTimeFormat.Calendar = New Globalization.TaiwanCalendar() System.Threading.Thread.CurrentThread.CurrentCulture = info

如何再函數中設定二維陣列

Dim para(1, 4) As String
Sub TestPara(ByRef para(,) As String)
para(0, 0) = "1"
para(0, 1) = "2"
para(1, 0) = "A"
para(1, 1) = "B"
End Sub