| Вопрос: Гидравлическая машина(помогите) | Добавлено: 14.05.07 14:00 |
Автор вопроса:  SKuLL | Web-сайт: http://agronom.mylivepage.ru/
|
| Ответы | Всего ответов: 23 |
|
Номер ответа: 16 Автор ответа:  Боцман ICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | | #16 | Добавлено: 15.05.07 19:45 |
|
Пока проверяеш формулу вот тебе набросок
Option Explicit
Dim H As Long, F As Long, M1 As Long, M2 As Long, S1 As Long, S2 As Long Private Sub Command1_Click() F = (M1 + M2) \ (S1 + S2) F1 = F * S1 * 9.81 F2 = F * S2 * 9.81 End Sub Private Sub Form_Load() H = 9.81 S1 = 3 S2 = 50 M1 = 20 M2 = 1000 End Sub Создай 2 TextBox_са и назови F1 и F2, ну и кнопку не забудь. А как в BVA пройдет или нет сам смотри. |
||
|
Номер ответа: 17 Автор ответа: Pavel Вопросов: 0 Ответов: 82 |
Профиль | | #17 | Добавлено: 15.05.07 20:58 |
|
В VBA название процедур будут немножко другими
'процедура для кнопки
Private Sub CommandButton1_Click() 'код End Sub 'процедура для инициализации формы Private Sub UserForm_Initialize() 'код End Sub |
||
|
Номер ответа: 18 Автор ответа: SKuLL Вопросов: 1 Ответов: 8 |
Web-сайт: Профиль | | #18 | Добавлено: 16.05.07 11:43 |
|
Всем спа!
Уже вроде как разобрался, если еще будут какие то соображения, то пишите. |
||
|
Номер ответа: 19 Автор ответа: БоцманICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | | #19 | Добавлено: 16.05.07 19:01 |
|
Уже вроде как разобрался, если еще будут какие то соображения, то пишите.
В самом деле? Ну тогда я думаю ты понял, что есть кроме Long еше SINGLE и DOUBLE, а также правописание арифметических знаков. Тогда у тебя уже действительно нет проблем  ))
|
||
|
Номер ответа: 20 Автор ответа: SKuLLВопросов: 1 Ответов: 8 |
Web-сайт: Профиль | | #20 | Добавлено: 17.05.07 18:29 |
|
2 Боцман хахаха)
Вообще то я просто не знал как начать, а терь уже усе вспомнил( че в школе учили) |
||
|
Номер ответа: 21 Автор ответа: SKuLLВопросов: 1 Ответов: 8 |
Web-сайт: Профиль | | #21 | Добавлено: 17.05.07 18:30 |
| И кстати в данном случае лучше использовать Double, чтобы числа не округляла, и точность удвоенная | ||
|
Номер ответа: 22 Автор ответа: БоцманICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | | #22 | Добавлено: 17.05.07 21:50 |
|
И кстати в данном случае лучше использовать Double, чтобы числа не округляла, и точность удвоенная
Так в посте 19 я тебе и намекнул, код выше не ошибка, а попытка заставить тебя думать. У меня есть знакомый и он как то сказал, денег не хватает, сын в универе учится, на что я ему ответил в таком случае универе учишся ты, для учащегося деньги не нужны. Помятуя об этом я не захотел учится за тебя но намек дал. Или лучше в следующий раз написать: так начнем писать код по маленечку. |
||
|
Номер ответа: 23 Автор ответа: SKuLLВопросов: 1 Ответов: 8 |
Web-сайт: Профиль | | #23 | Добавлено: 20.05.07 16:20 |
|
Все, всем спа, сделал программу!
Выложу в примеры, хотите посмотрите. |
||