Set frm = New Form_frm1 - создать экземпляр класса формы "frm1"
With frm - объявление работы с объектом (или структурой)
.Caption = .Caption & " (Edit)" - присвоить значение свойству "Подпись" экземпляру класса формы
.AllowAdditions = False - Запретить добавление записи
.AllowEdits = True - Разрешить изменение записи
.Move Forms.Count * 300, Forms.Count * 500 ' просто сдвиг на экране, что-бы экземпляры
не заслоняли друг-друга полностью, так как одновременно можно открыть несколько
экземпляров класса формы (необязательно).
.Visible = True - вывести на экран
End With - конец блока работы с объектом (структурой)
DataEntry (Из справки) - You can use the DataEntry property to specify whether a bound form
opens to allow data entry only. The Data Entry property doesn't determine whether records can be
added; it only determines whether existing records are displayed. Read/write Boolean.
|