'-- Simple demo DIM OpenDialog AS QOpenDialog IF OpenDialog.Execute THEN ShowMessage "You selected "+OpenDialog.FileName END IF '-- Using filters DIM OpenDialog AS QOpenDialog OpenDialog.Filter = "Picture files|*.BMP;*.ICO|All Files|*.*" OpenDialog.FilterIndex = 2 '' Use "All Files" as our default IF OpenDialog.Execute THEN ShowMessage "You selected "+OpenDialog.FileName END IF