Страница: 1 |
Народ, что-то я не пойму... Dim stg As String, stt As String
во первых, надо считать до frmMain.Controls.Count - 1 во вторых, попробуй взять в скобки: Страница: 1 |
Вопрос: Почему?
Добавлено: 31.07.03 14:16
Автор вопроса:
Nio | Web-сайт: www.fea.nxt.ru
stg = c1.Text
On Error Resume Next
For iz = 0 To frmMain.Controls.Count
stt = frmMain.Controls(iz).Name
If stt = stg And frmmain.Controls(iz).Index = Val(c2.Text) Then
MsgBox frmmain.Controls(iz).Name, , c1.Text
End If
Next iz
Как видно, этот код должен выдавать сообщение, если имя контрола совпадает с текстом первого комбобокса, а индекс - второго. Но почему сообщение выдаётся и в противном случае?!
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа: stets
Вопросов: 1
Ответов: 1
Web-сайт:
Профиль | | #1
Добавлено: 01.08.03 11:48
If (stt = stg) And (frmmain.Controls(iz).Index = Val(c2.Text)) Then
VB не совсем корректные приоритеты. я один раз тоже долго мучался.