ms1

2016-06-23 17:06:40 +02:00
parent c99a281c52
commit 6e715d4d3c
4 changed files with 44 additions and 10 deletions
--- a/app/DD-Record-Organiser/frmMain.vb
+++ b/app/DD-Record-Organiser/frmMain.vb
@@ -752,7 +752,12 @@ Public Class frmMain
        frm.Show()
    End Sub

-    Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
+    Private Sub Button1_Click_1(sender As Object, e As EventArgs)
        ClassJumpRecord.JumpToRecord(0, 95)
    End Sub
+
+    Private Sub Button1_Click_2(sender As Object, e As EventArgs) Handles Button1.Click
+        Dim dt As Date = Date.Today
+        MsgBox(dt.ToString("dd-MM-yyyy", CultureInfo.InvariantCulture))
+    End Sub
 End Class