Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
yutrans
85 / 84 / 34
Регистрация: 10.11.2011
Сообщений: 391
#1

Проверка на заполнение полей формы - Visual Basic .NET

15.06.2018, 06:22. Просмотров 163. Ответов 8
Метки нет (Все метки)

Добрый день.
На форме есть поля к заполнению .В процессе работы можно исключить некоторые поля к необязательному заполнению(два textBox.)
Как подкорректировать код ,что бы не отображалось сообщение что не все поля заполнены.
Прикладываю файл . Проект на visual Basic 2010 Express.
vb.net
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
               Dim X As Object
        For Each X In Controls
            If TypeOf X Is TextBox Or TypeOf X Is ComboBox Then
                If X.Value = "" And X.BackColor = Color.Window Then
                    MsgBox("Все обязательные поля должны быть заполнены!", vbExclamation, "Заполните поле!")
                    Exit Sub
                End If
            End If
        Next
        MsgBox("Все обязательные поля  заполнены!", vbExclamation, "Сообщение")
    End Sub

http://www.cyberforum.ru/vb-net/thread945443.html
0
Вложения
Тип файла: rar Проверка на заполнение полей формы.rar (75.4 Кб, 0 просмотров)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.06.2018, 06:22
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Проверка на заполнение полей формы (Visual Basic .NET):

Заполнение полей формы через элемент webbrowser
Через элемент WebBrowser открываю сайт На сайте форма На форме есть текстовые...

Операции с Web-страницей: Заполнение полей
Вообщем сабж. Самое легкое что надо,это копировать содержимое страницы,в...

Заполнение Динамических полей на WEB Форме
Всем доброго времени суток. На веб форме имеются поля,которые постоянно меняют...

Чтение из файла построчно и заполнение полей окна стороннего приложения
Привет уважаемые форумчане. Нужна ваша помощь. Нужно чтобы прога читала...

Проверка полей на наличие точки для значений Double
Имеется код для проверки и замены точки на запятую Private Function...

8
Step_UA
1408 / 543 / 185
Регистрация: 09.06.2011
Сообщений: 1,163
15.06.2018, 09:59 #2
Достаточно для необязательных полей установить BackColor отличный от Color.Window
0
Yury Komar
Модератор
Эксперт .NET
2364 / 2169 / 346
Регистрация: 27.01.2014
Сообщений: 3,898
Завершенные тесты: 1
15.06.2018, 10:23 #3
yutrans, добавьте в условие проверку имени контрола и те имена, что нужно исключить из проверки, укажите.

Добавлено через 4 минуты
например вот так:
vb.net
1
2
3
4
5
6
7
8
9
10
11
12
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    'объявление переменной Х в данном случае необязательно.
        For Each X In Controls
            If TypeOf X Is TextBox Or TypeOf X Is ComboBox And (Not X.Name ="TextBox1" Or Not X.Name = "TextBox2") Then
                If X.Value = "" And X.BackColor = Color.Window Then
                    MsgBox("Все обязательные поля должны быть заполнены!", vbExclamation, "Заполните поле!")
                    Exit Sub
                End If
            End If
        Next
        MsgBox("Все обязательные поля  заполнены!", vbExclamation, "Сообщение")
    End Sub
в данном случае имена контролов TextBox1 и TextBox2 будут исключены из проверки.
0
yutrans
85 / 84 / 34
Регистрация: 10.11.2011
Сообщений: 391
15.06.2018, 10:51  [ТС] #4
Yury Komar ,Step_UA спасибо за помощь. Вечером протестирую и отпишусь.
0
yutrans
85 / 84 / 34
Регистрация: 10.11.2011
Сообщений: 391
17.06.2018, 14:50  [ТС] #5
Yury Komar,проверил Ваш код и выдает ошибку :общий член Value для типа TextBox не найден. Как можно исправить эту ошибку. Заранее благодарен.
0
Yury Komar
Модератор
Эксперт .NET
2364 / 2169 / 346
Регистрация: 27.01.2014
Сообщений: 3,898
Завершенные тесты: 1
17.06.2018, 15:55 #6
yutrans, вместо Value напишите Text
0
yutrans
85 / 84 / 34
Регистрация: 10.11.2011
Сообщений: 391
17.06.2018, 16:03  [ТС] #7
Добрый день.
Исправил на Техt,но все та же ошибка (подчеркнуто волнистой линией: Color.Window
0
Yury Komar
Модератор
Эксперт .NET
2364 / 2169 / 346
Регистрация: 27.01.2014
Сообщений: 3,898
Завершенные тесты: 1
17.06.2018, 18:29 #8
а для чего вообще делается проверка цвета фона элемента управления, может стоит ее убрать?
0
ViterAlex
6347 / 3551 / 1457
Регистрация: 11.02.2013
Сообщений: 7,816
Завершенные тесты: 3
17.06.2018, 18:44 #9
Цитата Сообщение от yutrans Посмотреть сообщение
ошибка (подчеркнуто волнистой линией: Color.Window
Такого цвета нет. Есть SystemColors.Window
1
17.06.2018, 18:44
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.06.2018, 18:44
Привет! Вот еще темы с решениями:

Обновление столбца полей со списком datagridview из другой формы
Связь с БД выполнена конструктором. В datagridview, в форме поверх основной...

Заполнение ProgressBar' а и показ формы по окончанию заполнения
Подскажите пожалуйста как сделать такой момент-на форме есть timer button1 и...

Заполнение DataGrid при закрытии дочерней формы
Доброго времени суток, коллеги. Подскажите с хитрой задачкой. Есть...

Вывести с текстовых полей формы данные в форму текстового документа odt
Есть форма справки в формате odt (форму справки прилагаю) и форма vb.net с...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru