Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / пожалуйста подскажите - обработка(описание) ошибок / 10 сообщений из 10, страница 1 из 1
19.12.2007, 20:12
    #35021744
Tinysik
Tinysik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
помогите пожалуйста студентке 3 курса:(

на форме текстовые поля, они "ссылаются" на БД.
Нужно сделать так, чтобы допустим нажим. на кнопку СОЗДАТЬ при вводе в текстовое поле чисел - была ОШИБКА например "Неправильный ввод данных" или что-ниб. в этом роде
или например - нажимая на кнопку СОХРАНИТЬ - если совсем ничего в поля не вводить - появл. ОШИБКА "Неверная запись" или "Пустая форма"

как это воплотить в коде?


заранее спасибо, что потратили свое время на написание мне ответа :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.12.2007, 22:19
    #35021871
gjghjc
gjghjc
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
авторили например - нажимая на кнопку СОХРАНИТЬ - если совсем ничего в поля не вводить - появл. ОШИБКА "Неверная запись" или "Пустая форма"

private sub AddData_Click () ' Типа обработка события кнопки

IF len(text_1.text) = 0 OR len(text_2.text) =0 .... OR len(text_N.text) =0 Then msgbox "Не все данные введены корректно" : Exit Sub

' Здесь код по добавлению данных в базу

End sub

что касается
авторНужно сделать так, чтобы допустим нажим. на кнопку СОЗДАТЬ при вводе в текстовое поле чисел - была ОШИБКА например "Неправильный ввод данных" или что-ниб. в этом роде

самое первое что приходит на ум это использовать INSTR и искать в текстовом поле ЦИФРЫ . Можно почитать про оператор LIKE или про РЕГУЛЯРНЫЕ ВЫРАЖЕНИЯ
зы поиск по ВЫДЕЛЕННЫМ СЛОВАМ
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.12.2007, 22:29
    #35021879
Tinysik
Tinysik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
спасибо вам.... хоть кто-то "отозвался"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2007, 09:02
    #35022251
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Private Sub CommandButton1_Click()
 
 If TextBox1 = "" Or TextBox2 = "" Then
    MsgBox "не все заполнены"
    Exit Sub
 End If
 
 If IsNumeric(TextBox1) Then
    MsgBox TextBox1.Name & " - введено число, а нужен текст"
    Exit Sub
 End If
  
 If Not IsNumeric(TextBox2) Then
    MsgBox TextBox2.Name & " - необходимо число"
    Exit Sub
 End If
 
 Range("A65536").End(xlUp).Offset( 1 ).Value = TextBox1
 Range("B65536").End(xlUp).Offset( 1 ).Value = TextBox2

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2007, 16:58
    #35024181
Tinysik
Tinysik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
попробую...... спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2007, 17:44
    #35024367
Tinysik
Tinysik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
а что это обозначает?---->

Range("A65536").End(xlUp).Offset(1).Value = TextBox1
Range("B65536").End(xlUp).Offset(1).Value = TextBox2

простите, за вопрос. мы просто такого не изучали еще
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2007, 18:23
    #35024486
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
Tinysikа что это обозначает?---->

Range("A65536").End(xlUp).Offset(1).Value = TextBox1
Range("B65536").End(xlUp).Offset(1).Value = TextBox2

простите, за вопрос. мы просто такого не изучали еще

Не обращайте внимание, это из Экселя. Добавляет значения текстбоксов на лист в плоский файл.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2007, 18:37
    #35024520
Tinysik
Tinysik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
аааааааа... ясно


огромное спасибо, что помогли.... все получилось....:)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2007, 19:17
    #35024637
Tinysik
Tinysik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
а как описать ошибку....
если когда создаю нов. запись и ничего в поля не ввожу.... как сделать так, чтоб ошибка выскакивала когда буду нажимать на СОХРАНИТЬ например "Пустая форма - введите данные"


вот чтоб хотя бы одно не было заполнено я поняла.... а тут не знаю как.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.12.2007, 19:37
    #35024684
Tinysik
Tinysik
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
пожалуйста подскажите - обработка(описание) ошибок
посл. вопрос не считается - я все сделала!


большое спасибо,что помогли мне
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / пожалуйста подскажите - обработка(описание) ошибок / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 366ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2162916]:
 0ms
get settings:
 12ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 93ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 198ms
total:  366ms
x
x
Закрыть


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