Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / inputbox / 16 сообщений из 16, страница 1 из 1
26.04.2007, 10:55
    #34488849
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Как обработать кн. Отмена у inputbox?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:08
    #34488915
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
А зачем? При отмене inputbox возвращает пустую строку, даже если в него было что-то введено.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:24
    #34488992
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Так в том то и дело:

Private Sub List1_DblClick()
Dim nameField As String
Dim i As Integer
i = List1.ListIndex
nameField = InputBox("Ââåäèòå íîâîå èìÿ", "Ëîãàñòèê")
End Sub

При отмене в inputbox-е старое значение в листе затирается
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:27
    #34489006
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Да неужели??? А что мешает сначала проверить то, что возвращает inputbox?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:32
    #34489030
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
oldName = List1.List(i)
...
If nameField = "" Or IsNull(nameField) Then nameField = oldName
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:37
    #34489053
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Ну проще же нужно думать...
Код: plaintext
1.
2.
s = InputBox(...)
If s = "" then Exit Sub 'удобно, если потом много действий
nameField = s
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:41
    #34489078
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Ага, если бы ...
В списке пустые занчения тоже могут и будут присутствовать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:42
    #34489085
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
то бишь вводиться
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:55
    #34489145
Granata005
Granata005
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
jhonkukАга, если бы ...
В списке пустые занчения тоже могут и будут присутствовать
Ну тогда следует рассмотреть запрет использования пустых значений... или сделать свой ИнпутБокс - так надёжней будет...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 11:58
    #34489163
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Да вот то то и оно, блин ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 12:05
    #34489193
Ashton
Ashton
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
1. Разработай форму, которая и будет твоим InputBox.

2.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Sub X()
    Dim str As String
    
    str = InputBox("Введите")
    
    If Len(str) =  0  Then
        If StrPtr(str) =  0  Then
            MsgBox "Cancel"
        Else
            MsgBox "OK"
        End If
    End If
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 12:13
    #34489228
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
2 - красиво. Одно дополнение. Переменную str нельзя использовать до inputbox, иначе она будет инициализирована и получит адрес.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 12:39
    #34489357
Ashton
Ashton
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Все верно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 13:17
    #34489522
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Понял, спасибо всем.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.04.2007, 17:16
    #34490603
Ламер Ламерович
Ламер Ламерович
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
не пользуетесь поиском, а то нашли бы много топиков с этим решением, например
InputBox
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2007, 08:02
    #34491525
jhonkuk
jhonkuk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
inputbox
Искал, но много топиков выдает
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / inputbox / 16 сообщений из 16, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 496ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2164129]:
 0ms
get settings:
 8ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 161ms
get topic data:
 11ms
get forum data:
 2ms
get page messages:
 67ms
get tp. blocked users:
 2ms
others: 220ms
total:  496ms
x
x
Закрыть


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