VERSION 5.00
Begin VB.Form Form1 
   Caption         =   "Form1"
   ClientHeight    =   3090
   ClientLeft      =   60
   ClientTop       =   450
   ClientWidth     =   4680
   LinkTopic       =   "Form1"
   ScaleHeight     =   3090
   ScaleWidth      =   4680
   StartUpPosition =   3  '´°¿ÚÈ±Ê¡
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub Form_Activate()
  Dim N1 As Single
  N1 = 1234.567
  Print Format(N1, "00000.00000")
  Print Format(N1, "00.00")
  Print Format(N1, "######.#####")
  Print Format(N1, "##.##")
  Print Format(N1, "##,##0.00000")
  Print Format(N1, "####.##%")
  Print Format(N1, "$###.##")
  Print Format(N1, "+#####.##")
  Print Format(N1, "-####.###")
  Print Format(N1, "0.00E+00")
  Print Format(N1, "0.00E-00")
End Sub
