Public Class Tester Public Shared Sub Main Dim rightNow As Date = Now Dim result As New System.Text.StringBuilder result.Append("dd: ").AppendLine(rightNow.ToString("dd")) Console.WriteLine(result.ToString) End Sub End Class
dd: 11