Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


29373 / 76732 ←次へ | 前へ→

【52641】Re:OptionBaseステートメント
質問  MMG  - 07/11/23(金) 13:54 -

引用なし
パスワード
   ▼neptune さん:
質問させていただきます。

>実際問題、私は殆ど必要性は感じません。
>dim a(1 to 10)・・・
>と同じことですから。
>
>MyWeek = Array("日", "月", "火", "水", "木", "金", "土")
> For i = 1 To 7
>  MyDay = MyWeek(i)
>  msg = msg & vbCrLf & MyDay
>  MsgBox msg
> Next i
>も
>'Option Base 1 なしで
>MyWeek = Array("日", "月", "火", "水", "木", "金", "土")
> For i = 0 To 6
>  MyDay = MyWeek(i)
>  msg = msg & vbCrLf & MyDay
>  MsgBox msg
> Next i
>でも問題はないですし。。。


このコードで上の方ですが、エラーが出ました。
MyWeek = Array("", "日", "月", "火", "水", "木", "金", "土")
に変更すると、正しく動きました。
こんな考えで正しいのでしょうか?

0 hits

【52620】OptionBaseステートメント MMG 07/11/21(水) 20:06 質問
【52621】Re:OptionBaseステートメント かみちゃん 07/11/21(水) 20:20 発言
【52623】Re:OptionBaseステートメント りん 07/11/21(水) 20:25 発言
【52625】Re:OptionBaseステートメント neptune 07/11/21(水) 20:38 発言
【52630】Re:OptionBaseステートメント Yumi 07/11/21(水) 21:49 お礼
【52641】Re:OptionBaseステートメント MMG 07/11/23(金) 13:54 質問
【52642】Re:OptionBaseステートメント neptune 07/11/23(金) 14:04 回答
【52658】Re:OptionBaseステートメント りん 07/11/24(土) 9:52 発言
【52660】Re:OptionBaseステートメント ichinose 07/11/24(土) 10:09 発言
【52662】Re:OptionBaseステートメント りん 07/11/24(土) 10:34 発言

29373 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free