リスト２：小数部切り捨てのテスト 　　Dim sglNum As Single 　　Dim intNum As Integer 　　 sglNum = 100 / 3 　　 intNum = 100 / 3 　　 Debug.Print "Single型", sglNum 　　 Debug.Print "Integer型", intNum 本文へ戻る