Базы данных и знаний. Мартьянова А.Е. - 163 стр.

UptoLike

ВУЗ: 

АГТУ | Астрахань

Составители: 

Рубрика: 

Мартьянова А.Е. Базы данных и знаний 163
Текстов
н данные [1, 1 о использоват рочном ре-
жиме и для ввода пар в текст и числа. Если для
п на -
х нажатии клавиши е табл.
II.31 [12].
Свойство Опи
ое поле (элемент TextBox) позволяет вводить и выводить
а экран 2]. Его можн ь в многост
аметро . Можно вводить
рочный ввод, то переход
Enter. Свойства объ
оля разрешен многост
одит при
другую строку проис
кта TextBox – см.
Таблица II.31. Свойства объекта типа TextBox
сание
Text
Содержимое поля
MultiLine
Если True, разрешен многострочный ввод
ScrollBars
Нал у тичие или отс тс вие полос прокрутки
Locked
Если True, ввод запрещен
MaxLength
Ограничивает количество символов, которое можно ввести
PasswordChar
Символ забоя при вводе пароля
SelText
Выделенный текст (доступно только в коде программы)
SelLength,
SelStart
Дли ция выделенного текста (доступны
толь )
на и начальная пози
ко при выполнении программы
Свойство MultiL а ивается в True. Для
свойства ScrollBars выбирается положение 2 – Vertical (Вертикальная
полоса прокрутки).
й элемент д
– элемент Data1. Пере го в Data19. В окне нужно
определить следующи
ct – форма чанию Access,
DatabaseName –
RecordSetType – тип набора записей
: Dyna -
б ей, полученн
Установить свой объ и
mfgIn
пку для записи результатов запроса в файл с именем
cmdC
\MyDB\" & "Inquiry" & Day(Date) & Month(Data) & Hour(Time) & _
ine (Много строк) устан вл
Стандартны управления ля подк
именовать е
лючения к базе данных
Properties
е свойства:
т источника данных, по ум
имя базы данных,
Conne ол
set – динамический на
ектов txtInquiry
ор запис ый в результате запроса.
ство DataSource
quiry как Data19.
Создать кнопку для выполнения запроса с именем cmdInquiry, за-
писать в окно кода текст:
Private Sub cmdInquiry_Click()
Data19.RecordSource = txtInquiry.Text
Data19.Refresh
End Sub
Создать кно
reate, записать в окно кода текст:
Private Sub cmdCreate_Click()
fileN = " C:
Minute(Time) & ".txt" 
   Мартьянова А.Е. Базы данных и знаний                                      163


       Текстовое поле (элемент TextBox) позволяет вводить и выводить
на экран данные [1, 12]. Его можно использовать в многострочном ре-
жиме и для ввода параметров. Можно вводить текст и числа. Если для
поля разрешен многострочный ввод, то переход на другую строку проис-
ходит при нажатии клавиши Enter. Свойства объекта TextBox – см. табл.
II.31 [12].
                                    Таблица II.31. Свойства объекта типа TextBox

 Свойство            Описание
 Text                Содержимое поля
 MultiLine           Если True, разрешен многострочный ввод
 ScrollBars          Наличие или отсутствие полос прокрутки
 Locked              Если True, ввод запрещен
 MaxLength           Ограничивает количество символов, которое можно ввести
 PasswordChar        Символ забоя при вводе пароля
 SelText             Выделенный текст (доступно только в коде программы)
 SelLength,          Длина и начальная позиция выделенного текста (доступны
 SelStart            только при выполнении программы)

      Свойство MultiLine (Много строк) устанавливается в True. Для
свойства ScrollBars выбирается положение 2 – Vertical (Вертикальная
полоса прокрутки).
      Стандартный элемент управления для подключения к базе данных
– элемент Data1. Переименовать его в Data19. В окне Properties нужно
определить следующие свойства:
      Connect – формат источника данных, по умолчанию Access,
      DatabaseName – имя базы данных,
      RecordSetType – тип набора записей: Dynaset – динамический на-
бор записей, полученный в результате запроса.
      Установить свойство DataSource объектов txtInquiry и
mfgInquiry как Data19.
      Создать кнопку для выполнения запроса с именем cmdInquiry, за-
писать в окно кода текст:
Private Sub cmdInquiry_Click()
Data19.RecordSource = txtInquiry.Text
Data19.Refresh
End Sub
    Создать кнопку для записи результатов запроса в файл с именем
cmdCreate, записать в окно кода текст:
Private Sub cmdCreate_Click()
fileN = " C:\MyDB\" & "Inquiry" & Day(Date) & Month(Data) & Hour(Time) & _
Minute(Time) & ".txt"

Страницы