Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.04.2011, 09:19   #1
Maleta
Новичок
Джуниор
 
Регистрация: 09.04.2011
Сообщений: 1
Вопрос Очень нужно написать программу в VBA!

Вот задачка:
Арифметические действия над числами пронумерованы следующим образом: 1 - сложение, 2 - вычитание, 3 - умножение, 4 - деление. Дан номер действия N (целое число в диапазоне 1-4) и вещественные числа А и В (В не равно 0). Выполнить над числами указанное действие и вывести результат.

Заранее спасибо!
Maleta вне форума Ответить с цитированием
Старый 11.04.2011, 12:02   #2
EL_MoC
Пользователь
 
Регистрация: 06.04.2011
Сообщений: 15
По умолчанию

Код:
Sub Арифмет()
Dim a, b As Integer, c As String
a = InputBox("Введите первое число", "Первое число")
b = InputBox("Введите второе число", "Второе число")
c = InputBox("Введите номер действия(1-4)", "Выбор арифметдействия")
Select Case c
    Case 1
        MsgBox "a-b=" & (a - b), , "Rasnica"
    Case 2
        MsgBox "a+b=" & (a + b), , "Summa"
    Case 3
        MsgBox "a*b=" & (a * b), , "Proizved"
    Case 4
        MsgBox "a/b=" & (a / b), , "Delenie"
    Case Else
        MsgBox "Введено неправильное число арифм действия"
End Select
End Sub
НА-ка)
EL_MoC вне форума Ответить с цитированием
Старый 11.04.2011, 12:42   #3
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,166
По умолчанию

он если бы был нормальным парнем отписался бы мол ответ получил, а то вон оно как
http://www.cyberforum.ru/vba/thread272708.html
Ципихович Эндрю вне форума Ответить с цитированием
Старый 11.04.2011, 12:54   #4
EL_MoC
Пользователь
 
Регистрация: 06.04.2011
Сообщений: 15
По умолчанию

Цитата:
Сообщение от Ципихович Эндрю Посмотреть сообщение
он если бы был нормальным парнем отписался бы мол ответ получил, а то вон оно как
http://www.cyberforum.ru/vba/thread272708.html
Да, нехорошо получилось...

Глобально парень работает, а еще со студенческих лет помню - "глобальные переменные - это зло".
EL_MoC вне форума Ответить с цитированием
Старый 11.04.2011, 13:37   #5
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,166
По умолчанию

Цитата:
Сообщение от EL_MoC Посмотреть сообщение
Да, нехорошо получилось...

Глобально парень работает, а еще со студенческих лет помню - "глобальные переменные - это зло".
Вы о Variables?, развейте тему, в чём зло?
Ципихович Эндрю вне форума Ответить с цитированием
Старый 11.04.2011, 13:54   #6
EL_MoC
Пользователь
 
Регистрация: 06.04.2011
Сообщений: 15
По умолчанию

Цитата:
Сообщение от Ципихович Эндрю Посмотреть сообщение
Вы о Variables?, развейте тему, в чём зло?
Задание глобальных переменных плана Public.
Variables сюда тоже думаю можно отнести, правда несколько иначе, исходя из количества ресурсов, которые они жрут.

А насчет глобальных переменных - их объявление желательно там и только там, где это действительно необходимо. А так желательно обходиться локальными.
EL_MoC вне форума Ответить с цитированием
Старый 11.04.2011, 14:04   #7
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,166
По умолчанию

а что, Variables 7000 штук у меня закинуто в документе, открыл документ и можно с ними тут же работать, что может сравниться с ними?, имеется ввиду то, что документ закрыл, открыл, а они живут
Ципихович Эндрю вне форума Ответить с цитированием
Старый 11.04.2011, 14:31   #8
EL_MoC
Пользователь
 
Регистрация: 06.04.2011
Сообщений: 15
По умолчанию

Ну вообще Variables штука хорошая тем, когда не знаешь точно диапазон, в котором будет располагаться переменная.
Да и тем более это все зависит от компьютера.
А плох он не живучестью, а количеством выделенной под эту переменную памяти. Взять компьютер 2000 года выпуска и нагрузить на него 7, а то и больше тыс. вариаблов - и хана.
EL_MoC вне форума Ответить с цитированием
Старый 11.04.2011, 14:38   #9
Ципихович Эндрю
Старожил
 
Регистрация: 24.01.2011
Сообщений: 3,166
По умолчанию

количеством выделенной под эту переменную памяти

соль вопроса Вариаблес понял, попробую. Спасибо, ну если не они то в моём вопросе что может заменить, как загрузить и откуда 7000 переменных быстро?
Ципихович Эндрю вне форума Ответить с цитированием
Старый 11.04.2011, 14:48   #10
EL_MoC
Пользователь
 
Регистрация: 06.04.2011
Сообщений: 15
По умолчанию

Цитата:
Сообщение от Ципихович Эндрю Посмотреть сообщение
количеством выделенной под эту переменную памяти

соль вопроса Вариаблес понял, попробую. Спасибо, ну если не они то в моём вопросе что может заменить, как загрузить и откуда 7000 переменных быстро?
Можно создать массив и уже объявлять массив, а не каждую переменную в отдельности.
EL_MoC вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ребята очень нужно! составить программу решения задачи в VBA MS EXCEL ~Doka~ Помощь студентам 6 24.01.2011 17:11
Нужно сделать программу!очень надо Сергей7609 Фриланс 10 14.09.2010 22:15
Нужно написать функцию на VBA Оля575 Microsoft Office Access 2 30.05.2010 00:14
Очень нужно исправить программу в Delphi !!! Grifon_666 Помощь студентам 0 12.05.2010 21:42