|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
07.02.2010, 13:00 | #1 |
Пользователь
Регистрация: 21.12.2009
Сообщений: 47
|
необходимо создать форму, которая открывается автоматически и просит ввести пароль и имя пользователя.
В форме должен содержатся пароль, имя и день недели. Если субота или воскресенье то выход.
саму програму написала, но там необходимо что если первый раз нажимаешь на кнопку ОК то идет проверка данных и пишет "здравствуйте, сегодня...." а 2 раз если нажмешь, то форма закрывается!! Я начала делать через обозначение f-сколько раз нажали на кнопку, но не выходит((( подскажите.... Private Sub CommandButton1_Click() f = 0 If UserForm1.TextBox2.Text = "машуля" And Weekday(Date, vbMonday) = 1 Or Weekday(Date, vbMonday) = 2 Or Weekday(Date, vbMonday) = 3 Or Weekday(Date, vbMonday) = 4 Or Weekday(Date, vbMonday) = 5 Then If f = 1 Then UserForm1.Label3 = "Здравствуйте, " & UserForm1.TextBox1.Text & "!!!! Сегодня: " & Date & ", " & WeekdayName(Weekday(Date, vbMonday)) & " ..." Else UserForm1.Hide End If Else Label3 = UserForm1.TextBox1.Text & ", Вы не знаете пароль!!!! или сегодня выходной!!!! Сегодня: " & Date & ", " & WeekdayName(Weekday(Date, vbMonday)) & " ..." Application.Quit End If End Sub Sub auto_open() f = 0 UserForm1.Show End Sub |
07.02.2010, 14:00 | #2 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Попробуйте так:
Код:
|
07.02.2010, 15:11 | #3 |
Пользователь
Регистрация: 21.12.2009
Сообщений: 47
|
спасибо)))
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
узнать имя пользователя и пароль windows | D1AVOL | Общие вопросы Delphi | 7 | 09.01.2010 12:16 |
при в ходе на половину сайтов просит ввести код активации, получить который можно послав смс | twichska | Свободное общение | 6 | 28.05.2009 23:09 |
Необходимо создать форму для регистрации на сайте | Mirrra | Фриланс | 2 | 28.04.2009 15:28 |
создание учётной записи пользователя в системе с случайными параметрами (имя, пароль). js или vbs | samCS | JavaScript, Ajax | 1 | 22.12.2008 19:36 |
имя пользователя и пароль к бд | Roof | PHP | 4 | 26.11.2008 16:51 |