Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помагите.... не встает на форму / 4 сообщений из 4, страница 1 из 1
01.04.2008, 12:46
    #35226942
mr Vap
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помагите.... не встает на форму
Задача...
Dllка берет из бд таблицу и на основании типа полей добавляет на форму соответствующие контролы. С vb контролами сложностей нету, а вот чтото покрасивей добавить не получается.
Подскажите, как это выполнить плз.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub Command1_Click()
    Dim s As Object
    'Set s = Me.Controls.Add("vb.textbox", "tttt")             ' работает
    Set s = Me.Controls.Add("MSComCtl2.DTPicker", "fffff")' не работает !?
    With s
        .Top =  100 
        .Left =  100 
        .Visible = True
    End With
End Sub

Если на форме этот объект есть, то код работает, Почему?
...
Рейтинг: 0 / 0
01.04.2008, 13:30
    #35227139
Nikz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помагите.... не встает на форму
ставим Project-Components-Microsoft Windows Common Controls-2 6.0
снимаем Project-Properties-Make-Remove information about unused ActiveX Controls
...
Рейтинг: 0 / 0
01.04.2008, 13:59
    #35227247
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помагите.... не встает на форму
Помагите.... не встает на форму Гыыы ) Сексуальные проблемы решаются не здесь...

По делу.
Не ставим и не снимаем. Вместо этого пишем:
Код: plaintext
1.
    Licenses.Add "MSComCtl2.DTPicker"
    Set s = Me.Controls.Add("MSComCtl2.DTPicker", "fffff") 
...
Рейтинг: 0 / 0
01.04.2008, 14:24
    #35227346
mr Vap
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помагите.... не встает на форму
ну вот, все проблемы решины), спасибо.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помагите.... не встает на форму / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]