2016-05-10 8 views
1

Я работаю над проектом VB6, и я курсирую по чему-то, что я не могу решить. В моем проекте я использую 2.0 comboboxes. Все работает отлично, с точки зрения загрузки combobox с данными, выбора его и всей группы. То, что я пытаюсь сделать, - как только данные были выбраны, я уверен, что одни и те же данные не были выбраны в обоих списках. Я пытаюсь написать инструкцию быстрого сравнения IF в LOST FOCUS для одного из cbo, но, похоже, это не работает.VB6 - комбобокс потерял фокус

Private Sub cbo1_LostFocus() 
if cbo1.text<>"" and cbo2.text<>"" then 
    if cbo1.text = cbo2.text then 
     MSGBOX "Duplicate Values" 
    else 
     exit sub 
    End if 
end if 
End Sub 

это не совсем понимает, что утрачивается FOCUS - Я не думаю, что я когда-либо делал, что к СВ, как правило, текстовым полям и тому подобным. Любая помощь приветствуется.

ответ

1

Вместо этого вы можете попробовать GotFocus. Кажется, что событие LostFoucs может быть переопределено или замаскировано в некоторых случаях. В этой статье показана аналогичная проблема: http://www.vbforums.com/showthread.php?396536-RESOLVED-VB6-LostFocus

Конечно, вы всегда можете перейти на новейший VB, но я предполагаю, что у вас есть причины.

+0

Я поддерживаю устаревшее приложение vb6. GotFocus У меня уже есть по другой причине. LostFocus не запускается вообще, также не проверяет. – FatBoySlim7

+1

Вы всегда можете поместить этот код в отдельную функцию и вызвать его внутри своего GotFocus. Если вы не говорите, что ваш существующий код GotFocus мешает этой функции. –

+0

Я думаю, что это можно было бы сделать также. Я действительно пытаюсь сделать это, когда он теряет фокус, потому что таким образом я могу выбрать одно значение в cbo1, после выбора значений в cbo2 - i проверить, совпадают ли оба. Я просто попытался ИЗМЕНИТЬ, и это работает, но LOST FOCUS поможет мне больше, потому что он будет постоянно напоминать им, что значения разные, поэтому они не случайно его сохраняют. С Change я использую msgbox, чтобы сообщить пользователю, что у них есть 2 значения - но это все. – FatBoySlim7