| |
|
|
| | Никогда со списками не связывался , да вот пришлось
MsgBox Nz(Список4.Column(1))
Что-то ничего не показывается.
Нул да нул во всех колонках, как проверить , что там что-то есть - что не пуст список...  | |
| |
| |
| |
|
|
| | Сколько колонок в списке? | |
| |
| |
| |
|
|
| | Четыре штуки...
присоединён первый. | |
| |
| |
| |
|
|
| | MsgBox Nz(Список4.Column(0))
MsgBox Nz(Список4.Column(1))
MsgBox Nz(Список4.Column(3))
MsgBox Nz(Список4.Column(4))
все нулл - хотя на экране видно данные выбраны.. | |
| |
| |
|
|
| |
|
|
| | Спасибо - пробую...  | |
| |
| |
| |
|
|
| | Знаешь куда меня послали с этой интрукцией
MsgBox Nz(Список4.Column(3, 2))
на error 424
обидно... | |
| |
| |
| |
|
|
| | у меня работает 
в чем ты сейчас пишешь? access или vb? | |
| |
| |
| |
|
|
| | В access...
я поторопился...
вот щас ошибок нет , но и данных нет  | |
| |
| |
| |
|
|
| | MsgBox Nz(Список4.Column(1, 1))
MsgBox Nz(Список24.Column(2, 1))
MsgBox Nz(Список24.Column(1, 2))
MsgBox Nz(Список24.Column(0, 1))
фиг вам......... | |
| |
| |
| |
|
|
| | MsgBox Nz(Список24.Column(0, 0))
вот как работает.....
офигеть | |
| |
| |
| |
 10 Кб. |
|
| | я тоже
вот как ОНО у меня:
на форме список L1
кнопка K1
список - тип источника строк - список значений
список - источник строк - 1a;1b;1c;1d;2a;2b;2c;2d;3a;3b;3c;3d
список - число столбцов - 4
Private Sub K1_Click()
Dim a1 As String
a1 = Nz(L1.Column(5, 0))
If Len(a1) > 0 Then MsgBox a1
End Sub
|
усе работат..  | |
| |
| |
| |
|
|
| | Спасибо за поддержку.
Я чуть со стула не упал.
Кода оно заработало...........  | |
| |
| |
|
|
| |
|
|
| |
MsgBox Nz(Список24.Column(0, 0))
вот как работает.....
|
тама все инструкции начинаются не с 1 а с 0  | |
| |
| |
| |
|
|
| | Ясно.....   | |
| |
| |
