Double

Example

'!TITLE "Declaration of Double Precision Real Number Type Data"
' Assign a value to declared variable and display it on the message output window
Sub Sample_Double

  ' Declare a variable named aaa in double precision real number type data
  Dim aaa As Double

  ' Declare a variable named aaa in double precision real number type data
  Dim bbb As Double

  aaa = 123456789.888888

  bbb = 123456789.8888888

  ' Display "123456789.88888" on the message output window
  PrintDbg aaa

  ' Display "123456789.88889" on the message output window
  PrintDbg bbb

End Sub