コーディングのあれこれ

一応サンプルコード置いてますが、解説とかがメインです。 'メインプロシージャ（ByRef） Sub test_sub() Dim a as Long Dim b as Long Dim c as Long b = 10 c = 5 a = test_calc(b,c) MsgBox("a=" & a) MsgBox("b=" & b) MsgBox("c=" & c) End Sub '計算するプロシージャ（ByRef） Function test_calc(ByRef d as Long, …