|
|
|
VB
|
|||
|---|---|---|---|
|
#18+
Здравствуйте! Подскажите пожалуйста, у меня написана вот такая элементарная программа, хотя это на программу и мало похоже, но всё же, как прописать строчку после a = InputBox("Тип двигателя"), чтобы после нажатия кнопки Cancel на окне Inputbox окно сварачивалось и не переходило на следующую строчку b = InputBox("Номер двигателя") Private Sub CommandButton1_Click() Dim a As Variant Dim b As Variant a = InputBox("Тип двигателя") ?????????????????????????????? Cells(7, 7) = a b = InputBox("Номер двигателя") Cells(7, 7) = b End Sub Заранее благодарен Всем. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.11.2005, 14:20:33 |
|
||
|
VB
|
|||
|---|---|---|---|
|
#18+
Насколько я знаю, Cancel вернет пустую строку из InputBox. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.11.2005, 14:23:37 |
|
||
|
VB
|
|||
|---|---|---|---|
|
#18+
Т.е. ты хочешь, чтобы при нажатии Cancel, происходил выход из процедуры? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.11.2005, 14:52:14 |
|
||
|
VB
|
|||
|---|---|---|---|
|
#18+
Т.е. ты хочешь, чтобы при нажатии Cancel, происходил выход из процедуры? Да именно так, иначе процедура продолжается ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.11.2005, 16:17:46 |
|
||
|
VB
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.11.2005, 16:22:11 |
|
||
|
VB
|
|||
|---|---|---|---|
|
#18+
Если нажата Cancel или ничего не введено, то происходит выход из процедуры. Private Sub CommandButton1_Click() Dim a As Variant Dim b As Variant a = InputBox("Тип двигателя") If a = "" Then Exit Sub Cells(7, 7) = a b = InputBox("Номер двигателя") Cells(7, 7) = b End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 07.11.2005, 16:23:13 |
|
||
|
|

start [/forum/topic.php?fid=60&msg=33366463&tid=2166903]: |
0ms |
get settings: |
7ms |
get forum list: |
13ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
49ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
44ms |
get tp. blocked users: |
1ms |
| others: | 232ms |
| total: | 360ms |

| 0 / 0 |
