Option Explicit
Public txtSQL As String
Dim mrc As ADODB.Recordset
Dim MsgText As String




Private Sub Form_Load()
    ShowTitle
    ShowData
    flagLedit = True
......................