Visual Basic

SAKryukov wrote:

As to the criticism and possible negative estimates or votes, they are normal,
absolutely unavoidable in any truly creative environment, as well as our
mistakes, and they can be and should be handled in productive and constructive
ways.

Luc Pattyn wrote:

I prefer to eat the pudding, rather than to look for the boxes.

Public Sub ConnectToAccess()
    Dim conn As New System.Data.OleDb.OleDbConnection()
     conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & databasePath.dbPath & ";Persist Security Info=False;"

        Try
       conn.Open()
       .......
    Catch ex As Exception
       conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & databasePath.dbPath & ";User ID=Admin;Password="
    conn.Open()
........
    Finally
       conn.Close()
    End Try
End Sub

HourTextBox : MinuteTextBox : SecondsTextBox AmPmTextBox  UpButton
                                                          DownButton