Элемент управления CommonDialog

При открытии файла необходимо задать его полное имя.

pathfile = "C:\WINDOWS\Рабочий стол\primer\primer.txt"

или

pathfile = App.Path &”\primer.txt"

App.Path– это адрес папки проекта.

Для вызова стандартного диалогового окна Windowsоткрытия файла на запись или чтение вVBиспользуется специальный элемент управленияCommonDialog. Если такого объекта нет на панелиToolBox, то его можно подключить с помощью компонентыMicrosoftCommonDialogControl6.0.

Методы объекта:

ShowOpen– открывает диалоговое окно загрузки файла с диска;

ShowSave– открывает диалоговое окно сохранения файла на диске.

Свойства объекта:

CancelError– если пользователь закрыл окно, нажав кнопку Отмена, имеет значениеTrue;

DialogTitle– заголовок диалогового окна. По умолчанию –«Открыть»;

FileName–имя файла, которое появляется в поле Имя файла;

Filter– фильтр, используемый для ограничения списка видимых файлов;

FilterIndex– определяет номер файла, используемый по умолчанию;

Flags– значение, которое позволяет использовать в диалоговом окне дополнительные возможности.

Итак, диалоговое окно открытия файлов предоставляет пользователю механизм определения имени открываемого файла.

Пример на открытие файла с помощью окна диалога:

Private Sub Command2_Click()

CommonDialog1.ShowOpen ‘ применения метода для отображения окна на экране

pathfile = CommonDialog1.FileName ‘запомнить имя выбранного файла в переменной

Open pathfile For Input As #1 'открытие файла на чтение

Do While Not EOF(1) 'организация цикла на чтение файла до конца

Line Input #1, strfile 'построчное чтение записей из файла в переменную

Text1.Text = Text1.Text + strfile + Chr(13) + Chr(10) 'формирование очередной строки TextBox

Loop

Close #1

End Sub

Графика в vb

Форма и элемент управления – PictureBox(графическое окно) обладают методами, работа которых заключается в том, чтобы рисовать на поверхности своего хозяина точки, отрезки, прямоугольники, окружности, эллипсы, дуги и секторы.

Методы графики в vb

Точка рисуется методомPset

[объект.]Pset(x,y)[,цвет]

- где (x,y) - координаты точки

Отрезок прямой, прямоугольникрисуется методомLine.

[объект.]Line[(x1,y1)]-(x2,y2)[,Цвет][,B[F]]

- где (x1,y1) - координаты начальной точки отрезка. Если они не указаны, отрезок начинается от текущей позиции. Координаты конечной точки отрезка (x2,y2) нужно указывать обязательно.

Если указан параметр B(Box-прямоугольник), то вместо линии вычерчивается прямоугольник; пары координат определяют положение его противоположных по диагонали углов. Прямоугольник заполняется цветом, если указан параметрF, то прямоугольник закрашивается тем же цветом, что и границы. ПараметрFиспользуется только вместе с параметромB.

Окружность, дуга, сектор, эллипс рисуется методом Circle.

Circle(x,y), R [,Цвет][[-]n1,[-]n2 [,n3]]

- где (x,y) - координаты центра окружности (дуги, сектора, эллипса)

Параметры n1иn2определяют углы начала и конца дуги в радианах и отсчитываются против часовой стрелки. Знак минус перед параметрами является признаком сектора, а при его отсутствии вычерчивается дуга.

Параметр n3определяет коэффициент сжатия при вычерчивании эллипса. Если его значение меньше 1 то осуществляется сжатие в вертикальном направлении, если больше 1 - сжатие в горизонтальном направлении.