ReSQL.ru
     
powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Добавление строк в DataGridView
7 сообщений из 7, страница 1 из 1
Добавление строк в DataGridView
    #38194814
Vova_1805
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vova_1805
Участник
Среда Visual Basic STUDIO’2010 Professional
На форме Form11 имеется кнопка для добавления
Новой строки в DataGridView1, находящийся на Form11
После щелчка на кнопке открывается форма SubFormForEnter22,
На которй находится 11 контролов, которые надо заполнить в том случае,
когда в DataGridView1 отсутствует запись со значением ключа, которое
находится в нолевом столбце DataGridView1. Если же запись
со значением ключа присутствует, то надо выдать пользователю
ссобщение, чтобы ввести правильное значение, а оставшиеся 10 полей
не разумно вводить.
Я поставил в 5-ти событий
Код: vbnet
1.
2.
3.
4.
5.
Private Sub MaskTxtBoxtxtNumPensCertificate_Leave
Private Sub MaskTxtBoxtxtNumPensCertificate_MouseLeave
Private Sub MaskTxtBoxtxtNumPensCertificate_ChangeUICues
Private Sub MaskTxtBoxtxtNumPensCertificate_Validated
Private Sub MaskTxtBoxtxtNumPensCertificate_Validating



MaskTxtBoxtxtNumPensCertificate.Text – В ЭТОТ контрол ввожу значения ключевого
поля, тип которого в таблице - Integer
Ниже приведенный код – и всё НЕ ТО:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Private Sub MaskTxtBoxtxtNumPensCertificate_ChangeUICues(ByVal sender As System.Object, ByVal e As System.Windows.Forms.UICuesEventArgs) Handles MaskTxtBoxtxtNumPensCertificate.ChangeUICues
        Dim Column2 As Byte
        Dim str_find2 As String = MaskTxtBoxtxtNumPensCertificate.Text
        MsgBox("MaskTxtBoxtxtNumPensCertificate.Text" = MaskTxtBoxtxtNumPensCertificate.Text)
        Column2 = 0 ' column in table "Pensioner"
        For Each Row2 In Form11.DataGridView1.Rows
            If (Row2.Cells(Column2).Value.ToString().Contains(str_find2)) Then
                MsgBox("НАЙДЕНО") ' 
  Exit For
            Else
                MsgBox("НЕ НАЙДЕНО") ' продолжаем заполнять оставшихся 10 полей
                Exit Sub
            End If
        Next
    End Sub
Не выводится 
MsgBox("НАЙДЕНО")
Ни 
MsgBox("НЕ НАЙДЕНО")



СПАСИБО!
...
Рейтинг: 0 / 0
22.03.2013, 13:35
| Ответить | Цитировать | Написать  
Добавление строк в DataGridView
    #38194856
фиганыч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
фиганыч
Участник
Vova_1805,

такое возможно только в случае Form11.DataGridView1.Rows = 0,
точку останова на For Each Row2 In Form11.DataGridView1.Rows - и смотри сколько строк

ну и так - у тебя цикл выполнится только для первой строки в коллекции - он её проверит, и в любом случае сразу выйдет.
...
Рейтинг: 0 / 0
22.03.2013, 13:56
| Ответить | Цитировать | Написать  
Добавление строк в DataGridView
    #38194986
Vova_1805
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vova_1805
Участник
авторну и так - у тебя цикл выполнится только для первой строки в коллекции - он её проверит, и в любом случае сразу выйдет.
по моему что-то одно должно быть выполнено
Код: vbnet
1.
2.
3.
MsgBox("НАЙДЕНО")
или
MsgBox("НЕ НАЙДЕНО")



несколько раз выводилось false
нолевой столбец - это число, тогда как записать вместо строки

Код: vbnet
1.
If (Row2.Cells(Column2).Value.ToString().Contains(str_find2)) Then
...
Рейтинг: 0 / 0
22.03.2013, 15:10
| Ответить | Цитировать | Написать  
Добавление строк в DataGridView
    #38195446
carrotik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
carrotik
Участник
Vova_1805,

... а что, номера столбцов Windows Forms байтами считаются?

Код: vbnet
1.
Dim Column2 As Integer
...
Рейтинг: 0 / 0
22.03.2013, 19:22
| Ответить | Цитировать | Написать  
Добавление строк в DataGridView
    #38195747
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cat2
Модератор форума
carrotikVova_1805,

... а что, номера столбцов Windows Forms байтами считаются?

Код: vbnet
1.
Dim Column2 As Integer


На Ваш вкус, барин. Индекс столбца - хоть цифрами, хоть буковками.
...
Рейтинг: 0 / 0
23.03.2013, 08:32
| Ответить | Цитировать | Написать  
Добавление строк в DataGridView
    #38195751
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cat2
Модератор форума
Vova_1805После щелчка на кнопке открывается форма SubFormForEnter22,
На которй находится 11 контролов, которые надо заполнить в том случае,
когда в DataGridView1 отсутствует запись со значением ключа, которое
находится в нолевом столбце DataGridView1.
Не очень понял. А разве нельзя не открывать форму, если значение в нулевом столбце есть, а выдавать пользователю сообщение, что редактирование не требуется?
...
Рейтинг: 0 / 0
23.03.2013, 08:38
| Ответить | Цитировать | Написать  
Добавление строк в DataGridView
    #38207562
Vova_1805
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vova_1805
Участник
Cat2
ИСКРЕННЕ БЛАГОДАРЮ
ЗА ИДЕЮ, всё ОК!
Благодаря ИМЕННО Вашей подсказке проблема решена успешно.
...
Рейтинг: 0 / 0
01.04.2013, 17:00
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Добавление строк в DataGridView
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=20&msg=38195751&tid=1404920]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 67ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 12ms
total:  176ms
созд. / загр.: 176ms
x
x
Закрыть


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