| 
    
     |  | '*************************************************************** '* 面積取得
 '***************************************************************
 Function menseki(ByVal tate As Long, _ ' 縦
 ByVal yoko As Long _ ' 横
 ) As Long       ' 面積
 と書くとエラーになります。
 
 
 '***************************************************************
 '* 面積取得
 '* 引数  tate : 縦
 '*    yoko : 横
 '* 戻り値 面積
 '***************************************************************
 Function menseki(ByVal tate As Long, ByVal yoko As Long) As Long
 
 と書くと、引数が変わったときにコメントを直し忘れないか心配です。
 と言いますか直し忘れる自信が有ります。(^^;
 
 うまいコメントの書き方があればご教示下さい。
 
 (実際に作ってるものは結構複雑です。守秘義務で書けないので単純化したサンプルで質問しています。)
 
 
 |  |