[asemshahen5]

PHP كود :

Dim OpenAccess As New OpenFileDialog With {.Filter = "Microsost Access 2007-2016|*.Accdb|All File|*.*", .ShowHelp = True}
If OpenAccess.ShowDialog = DialogResult.OK Then
    FileName = OpenAccess.FileName
    Label11.Text = OpenAccess.SafeFileName
End if