【ExcelVBA公開模試】１次元配列間の転記

文法を無視して、とりあえず動けばいいという邪道ExcelVBA講座こと「速読VBA単語」に準拠した問題を出題します。

わえなび速読VBA単語【邪道ExcelVBA基本講座】｜わえなび VBA｜note

問題

（１）次のkakko1()を実行すると何が表示されるか。
（２）次のkakko2()を実行すると何が表示されるか。

Sub kakko1()
   s = "百-発-百-中"
   a = Split(s, "-")
   a(0) = "白"
   a(2) = a(3)
   Debug.Print Join(a, "")
End Sub

Sub kakko2()
   s = "百-発-百-中"
   a = Split(s, "-")
   Dim b(8)
   a(0) = "白"
   a(2) = a(3)
   For i = 0 To 2
       b(i) = a(0)
       b(i + 3) = a(1)
       b(i + 6) = a(2)
   Next
   Debug.Print Join(b, "")
End Sub

わえなび式 正解例

（このページの下にあります）

目標回答時間

回答時間無制限です。２つとも正確に答えられたら合格です。

この問題の出題範囲

「速読VBA単語」Program3-6まで

わえなび式ExcelVBA公開模試（無料） - Program3_6｜わえなび VBA｜note

ご案内

ExcelVBAをなんとなく理解できればいいという初心者のための「速読VBA単語」を受講希望の方はカリキュラムをご覧ください。

正解例

（１）
aはハイフンでSplitするので、a(0)～a(3)は、百、発、百、中になります。a(0) に "白"を代入し、a(2) に a(3)を代入するので、「白発中中」になります。

（２）
「白白白発発発中中中」と表示されます。

バックナンバー

わえなび式ExcelVBA公開模試（無料）｜わえなび VBA｜note