すべてのカテゴリ

Option Explicit Option Base 0 ' Public Sub 水仙の花描画マクロ()     Const NARCLEFT = 100　　　　    '描画開始位置Ｘ     Const NARCTOPP = 100 　　　　  '　　　　　　Ｙ     '     Const NARCCOLS = 4                  '横/描画数     Const NARCROWS = 3                 '縦/描画数     '     Const NARCVPIT = 70                 '横/描画間隔     Const NARCHPIT = 60                '縦/描画間隔     '     Const NARCBZMG = 0.2              'ベジュ曲線描画倍率     Const NARCFRAD = (77.4 * NARCBZMG)      '花びら     Const NARCGRAD = (90.1 * NARCBZMG)      '筋     Const NARCMRAD = 11               '中側花びら半径     Const NARCORAD = 2                 'おしべ描画半径     Const NARCARAD = 3     '     Const NARCLNWE = 1 '線の太さ     '---------------------------------------------------