Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Visual Basic недавно начал заниматься VBA и столкнулся с проблемой после проверки can't execute code in break mode

asdfasd adsfsadf Ученик (166), на голосовании 3 года назад
Подскажите в чем ошибка
Option Explicit
Sub Result()
Dim x, y
Call Ввод (x, y)
Call Расчет (x, y)
End Sub
Sub Ввод (x, y)
x = Worksheets("Лист1").Range("B2")
y = Worksheets("Лист1").Range("B3")
End Sub
Sub Расчет (x, y)
Dim a
a = Log(y ^ -Sqr(Absx)) * (x - y / 2)
Worksheets("Лист1").Range("B4") = a
End Sub
Голосование за лучший ответ
Lans Rover Гуру (3137) 3 года назад
Ты бы еще фортраном увлекся. Это мертвый язык, кто же тебе подскажет.
Полосатый жираф Алик Искусственный Интеллект (313068) 3 года назад
А вот что значит
Absx
???
asdfasd adsfsadfУченик (166) 3 года назад
Модуль
asdfasd adsfsadf, А написан как НЕ модуль, а как переменная Absx Используйте Option Explicit в коде в самом начале.
Abram Pupkin Высший разум (101953) 3 года назад
Sub Расчет (x, y)
Dim a
a = Log(y ^ -Sqr(Abs(x))) * (x - y / 2)
Worksheets("Лист1").Range("B4") = a
End Sub

так проще
Sub Result()
Dim x, y, a As Integer
x = Val(InputBox("Bведите значение X"))
y = Val(InputBox("Bведите значение Y"))
a = Log(y ^ -Sqr(Abs(x))) * (x - y / 2)
MsgBox a
End Sub
asdfasd adsfsadfУченик (166) 3 года назад
Спасибо
Александр Романенко Ученик (134) 3 года назад
Как это относится к SQL я не знаю, но ты бы еще начал учить 1C или паскаль...
Похожие вопросы