Set extension?

I'm making a control. In my code i have this function:

Function openfile(Extension as string,Extension Description as string)
RaiseEvent Isopened
dlg.Filter = "Text Files |*.txt|"
dlg.ShowOpen
RichTextBox1.loadfile dlg.Filename
End Function



How do i make the dialog extension the extension and description that the 2 variables hold?
Ex.
If Extension = *.ccc And Description = "CCC files"


--Ant
--------------------------------------------------
Want a javascript Editor? Visit:
http://members.fortunecity.com/ants12/jeditdload16.htm
Or email me:
[email protected]

dlg.Filter = "Text Files |*.txt|CCC files |*.ccc"