下記プログラムコードに関する補足・注意事項 動作確認:Windows Vista・Windows 7 (32bit) / VB6.0(SP6) Option :[Option Explicit] 参照設定:追加なし 使用 API:なし その他 : : Option Explicit 'SampleNo:004 2002.04.17 ① 2006.12.28 Private Sub sAmikakeShow(Mystr As String, X As Single, Y As Single) Dim Icount As Single Dim Jcount As Single Dim sngHeight As Single Dim sngWidth As Single Form1.ScaleMode = vbCharacters 'キャラクター単位で統一 Form1.Dra