Что означает ошибка: ByRef несоответствие типов параметра
И почему она исчезает если изменю имя переменной?
AntonGV писал(а):Код показывать небуду он страшно секретный
Ошибка исчезла когда я в своих функциях поствил перед параметром ByVal, кстати что это означает?
Dim asdasd As Integer
asdasd = 65
MsgBox "Мы только что установили значение asdasd = " + cstr(asdasd)
MsgBox "А теперь вызываем функцию ABCD и пердаём ей asdasd (ByVal)"
ABCD asdasd
MsgBox "ABCD успешно выполнилась, после её выполнения значение переменной asdasd стало = " + CSTR(asdasd)
MsgBox "А теперь вызовем процедуру XYZ, точно такую же как ABCD но вместо ByVal будет ByRef"
XYZ asdasd
MsgBox "После вызову XYZ значение asdasd стало = " + Cstr(asdasd)
'-------
Sub ABCD(ByVal Num As Integer)
MsgBox "Я процедура <ABCD>. Вы передали Num = " + CStr(num)
num = 777
End Sub
Sub XYZ(ByRef Num As Integer)
MsgBox "Я процедура <XYZ> Вы передали Num = " + CStr(num)
num = 888
End Sub
Сейчас этот форум просматривают: Yandex-бот и гости: 31