Public Class Tester
Public Shared Sub Main
Dim someInt As Integer = 123
Dim someDouble As Double = Math.PI
Dim someString As String = "Testing"
Dim someDate As Date = #7/4/1776 9:10:11 AM#
Dim someDecimal As Decimal = 1D / 3D
Dim result As New System.Text.StringBuilder
result.Append("someInt.ToString ")
result.AppendLine(someInt.ToString())
result.Append("someDouble.ToString ")
result.AppendLine(someDouble.ToString())
result.Append("someString.ToString ")
result.AppendLine(someString.ToString())
result.Append("someDate.ToString ")
result.AppendLine(someDate.ToString())
result.Append("someDecimal.ToString ")
result.Append(someDecimal.ToString())
Console.WriteLine(result.ToString())
End Sub
End Class
|