|
分類:[.NET 全般]
質問致します。
以下のような構文を作りましたが、name1・name2は宣言されていないとエラーになります。
if構文で囲わずに、Dim name1() As String = { "鈴木", "佐藤"} Dim name2() As String = { "和夫", "剛史"}
で条件が男だけの場合は正常になります。
下記の条件によりname1、name2を変更したいのですがネットで検索してもヒットしません。
エラーにならない構文の書き方をご教授願います。
Dim Fname as String
'seibetuは前の構文で男、女がランダムになります。
If seibetu = "男" Then
Dim name1() As String = { "鈴木", "佐藤"}
Dim name2() As String = { "和夫", "剛史"}
Else
Dim name1() As String = { "山田", "北野"}
Dim name2() As String = { "順子", "裕子"}
End If
For i = 0 To UBound(name1)
Fname = name1(i) & name2(i) 'ファイル名
next
|