Excel VBA質問箱 IV

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

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


62292 / 76732 ←次へ | 前へ→

【19047】Re:同じような 追伸
回答  [名前なし]  - 04/10/20(水) 1:08 -

引用なし
パスワード
   ▼ponpon さん:
ByValだと「値渡し」、ByRefだと「参照渡し」です。

Sub Main()
Dim Test1 As Long
Dim Test2 As Long

Test1 = 100
Test2 = 100

Call Test(Test1, Test2)
MsgBox Test1 & "/" & Test2

End Sub

Sub Test(ByVal a As Long, ByRef b As Long)
 a = a * 1.05
 b = b * 1.05
End Sub

として、Mainを実行してみてください。
bの方だけ値が変わると思います。
このように、引数に変数を使用し、プロシージャの中で引数に代入すると、
変数の中身まで変わってしまうのがByRef(参照渡し)です。

0 hits

【19035】同じような ponpon 04/10/19(火) 23:25 質問
【19037】Re:同じような ichinose 04/10/19(火) 23:39 発言
【19038】Re:同じような 追伸 ichinose 04/10/19(火) 23:47 発言
【19040】Re:同じような 追伸 ponpon 04/10/20(水) 0:07 発言
【19041】Re:同じような 追伸 [名前なし] 04/10/20(水) 0:14 回答
【19045】Re:同じような 追伸 ponpon 04/10/20(水) 0:36 お礼
【19047】Re:同じような 追伸 [名前なし] 04/10/20(水) 1:08 回答
【19050】Re:同じような 追伸 ponpon 04/10/20(水) 7:55 お礼
【19042】Re:同じような 追伸 ichinose 04/10/20(水) 0:15 発言
【19043】Re:同じような 追伸 ponpon 04/10/20(水) 0:18 発言
【19044】Re:同じような 追伸 ichinose 04/10/20(水) 0:24 回答
【19046】Re:同じような 追伸 ponpon 04/10/20(水) 0:45 お礼
【19048】Re:同じような 追伸 ichinose 04/10/20(水) 1:10 発言
【19049】Re:同じような 追伸 ichinose 04/10/20(水) 1:22 発言
【19051】Re:同じような 追伸 ponpon 04/10/20(水) 8:09 お礼

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