Something like this should work for you:
Code:
    MyForm.MyDialog.DefaultExt = "TXT"
    MyForm.MyDialog.Filter = "Text Files(*.TXT)|*.TXT"

------------------
Marty