


Alexanbar писал(а):CommonDialog1.InitDir = "c:"
CommonDialog1.Filter = "Текстовые файлы(*.txt)|*.txt|Все файлы|*.*"

With dlgMain
.InitDir = "d:\temp"
.Filter = "Файлы (*.bat;*.txt;*.htm)|*.bat;*.txt;*.htm|"
.ShowOpen
End With
Сейчас этот форум просматривают: AhrefsBot, Google-бот, SemrushBot и гости: 7