请问:如何定义常量数组,或者其它方法实现下面问题
后面附有我想改进的代码。我的问题是:我不想在程序中对字符串做初始化,因为觉得浪费了执行时间。记得C语言中的全局变量数组和局部的静态变量数组是可以定义初始值的,并且是在编译时赋初值而不是执行时,VB中有没有这种语法?或者有没有如题目中所说的常量数组?
Private Sub sbqx_Click(Index As Integer)
Dim str(1 To 3) As String
str(1) = "设备缺陷登记"
str(2) = "设备缺陷审核"
str(3) = "设备缺陷验收"
Dim frm As New frm_gyjc_wh
frm.Index = Index
frm.titlename = str(Index)
frm.Show
End Sub