Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Lukas Вставка многа лейблов в форму, уже открытую в режиме конструктора:
Public Sub Addlbl(strFormName As String) Dim i As Integer Dim j As Integer Dim str As String Const Sp = 105 Const Wid = 1020 Const Heig = 420 For i = 0 To 9 For j = 0 To 19 str = "lbl" & j & i With CreateControl(strFormName, acLabel, , , , Sp + i * (Sp + Wid), Sp + j * (Sp + Heig), Wid, Heig) .Name = str End With DoCmd.Restore Next j Next i End Sub
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.