Вообщем ситуация такая...Последний раз занимался програмированием очень давно..и уже не то что ниче не помню,а заодно ниче и не знаю.Ну тут вдруг приспичило,очень надо.
Мне нужна прога которая решала бы некоторые примеры.
Причем ввывод не досовский а win поэтому я и пошел к вам сообственно говоря.
Короче можете написать мне код ну простого примера.
Хотя бы возьмем вычисления квадрата.
То есть должна быть форма в которой я ввожу переменную x жму далее и появляется ответ.
Не надо красиво оформлять,просто запрос на ввод и сообственно и форма под него ,и вывод в другой форме...

Здесь бала тема про кв.уравнение.Поищи.Там ссылка есть.

Модератор: Название темы должно отражать ее суть!

Цитата(DarkAngel @ 19.3.2005, 07:04)

Хотя бы возьмем вычисления квадрата. То есть должна быть форма в которой я ввожу переменную x жму далее и появляется ответ.

Код

Private Sub Command1_Click() Dim x As String x = InputBox("Введите число:", "Вычисление квадрата") MsgBox "Квадрат числа " & x & " равен " & Val(x) ^ 2 End Sub

Это сообщение отредактировал(а) Run-time error - 19.3.2005, 14:21

Пасибо Всем !
И еще один вопрос тогда,все тоже самое токо теперь при загрузке программы должна появлятся форма в которой я например ставлю галочку выбирая ту задачу которую я например хочу решить то есть применро так:
1 Квадратное уравнение
2 Уравнение Герона
3 Вычисление квадрата
Выбирая один из разделов и кликая далее я получаю форму для этой задачи.

Все последний вопрос и я больше не буду мучить вас своей тупостью.
И так помогли очень сильно.
Возник вопрос почему при алгоритме сложения например d=a+b+c
результатом является не сумма а число abc
И второй какой параметр задать кнопке что б перейти к следуюшей форме?

Цитата(DarkAngel @ 19.3.2005, 16:11)

Возник вопрос почему при алгоритме сложения например d=a+b+c

А как у тебя переменные a, b и с объявлены? + это еще и оператор слепления строк (также как и &).

Цитата(DarkAngel @ 19.3.2005, 16:11)

И второй какой параметр задать кнопке что б перейти к следуюшей форме?

В смысле закрыть эту и открыть другую?

А вообще
Модератор: Пожалуйста, один топик - один вопрос.

Цитата(DarkAngel @ 19.3.2005, 19:11)

Возник вопрос почему при алгоритме сложения например d=a+b+c результатом является не сумма а число abc

Потому что переменные объявлять надо:

Код

Dim a As Integer

, а не

Код

Dim a As String

.
String - это строковой тип данных, а не численный.
Если хочешь, перепишу тот код так:

Код

Private Sub Command1_Click() Dim x As Integer x = Val(InputBox("Введите число:", "Вычисление квадрата")) MsgBox "Квадрат числа " & x & " равен " & x ^ 2 End Sub

А ну все теперь понял я...пасиб благодаря всем вам благополучно написал...немного все неотесано правда...
Да мне надо закрыть эту и открыть другую.

Добавлено @ 19:08

Цитата

В смысле закрыть эту и открыть другую?

Да именно так

http://www.firststeps.ru/vba/excel/r.php?55

Код

Private Sub Cancel_Click() Unload Me End Sub

Ну вот эта закрывает нормально форму

Код

Private Sub Далее_Click() Load Main End Sub

А эта грузить следуюшюю отказывается,че не так?

Цитата

не сумма а число abc

- еще можно Val

Цитата

- еще можно Val

Ну не все же способы перечислять

Цитата(DarkAngel @ 20.3.2005, 09:11)

А эта грузить следуюшюю отказывается,че не так?

Если ты хочешь скрыть Form1 и показать Form2 при нажатии cmdNext, то:

Код

Private Sub cmdNext_Click() Unload Me Form2.Show End Sub

Load только загружает форму в память, не показывая ее.

Цитата

Если ты хочешь скрыть Form1 и показать Form2 при нажатии cmdNext, то: Ъюф Visual Basic 1: 2: 3: 4: Private Sub cmdNext_Click() Unload Me Form2.Show End Sub Load только загружает форму в память, не показывая ее.

А ну теперь все что нужно понял.Еще будут вопросы обращусь!

Еще последний вопрос!!Как посчитать sin или cos или tg числа a.