Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Вопрос новичка Добавлено: 29.10.07 02:37  

Автор вопроса:  Patrick | Web-сайт: microsoft.com | ICQ: 4444 
Всем привет!
Решил написать прогу, которая будет делать что-то больше чем ввыводить надпись "хело ворлд".
Использую оператор if-then , проблема в том что я не знаю как сделать чтобы при определенном усливии исполнялся другой оператор? Или например как сделать чтобы с помощью кода имитировать нажатие кнопки?
Надеюсь я доступно объснил))

Ответить

  Ответы Всего ответов: 4  

Номер ответа: 1
Автор ответа:
 Softer



ICQ: 203660381  

Вопросов: 29
Ответов: 205
 Web-сайт: hware.org.ua
 Профиль | | #1
Добавлено: 29.10.07 03:14

X=0
If X=1 Then
   Print "Чето не так... Х почему-то равен 1!"
Else
   Print "Все ОК! Х по прежнему равен 0!!!"
End if


Проверяет равен ли Х нулю...
Вместо Print пиши свой блок операторов.

Ответить

Номер ответа: 2
Автор ответа:
 Patrick



ICQ: 4444 

Вопросов: 3
Ответов: 2
 Web-сайт: microsoft.com
 Профиль | | #2
Добавлено: 29.10.07 03:41
А как сделать чтобы например вместо:
Print "Чето не так... Х почему-то равен 1!"
Была другая функция котороя состоит не из одной строчки, как ее туда правильно вписать?

Другими словами, как к примеру этот кусок кода:
Dim str As String
str = InputBox("Как тебя зовут", "Опрос", "Имя";)
Text1.Text = str

Сделать что бы он исполнялся вместо:
Print "Чето не так... Х почему-то равен 1!"

Ответить

Номер ответа: 3
Автор ответа:
 pheel



Вопросов: 0
Ответов: 1
 Профиль | | #3 Добавлено: 29.10.07 06:24
Просто её туда вставляешь и всё!

Ответить

Номер ответа: 4
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #4 Добавлено: 29.10.07 19:21
private sub form_load()

 X=0
 If X=1 Then
    Print "Чето не так... Х почему-то равен 1!"
 Else
    Call other_func()
 End if

end sub


private function other_func ()
 msgbox "lalalla"
end function

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам