arthur2 писал(а):Я имел ввиду, чтобы придумать какой-нибудь трюк.
Private Sub Test(ByVal z As Long, Optional ByRef q As Long, Optional ByRef s As Single)
Dim lplpq As Long
Dim lplps As Long
lplpq = VarPtr(z) + 4
lplps = lplpq + 4
End Sub
Кривоус Анатолий писал(а):Получить адреса можно, но что это даст?
arthur2 писал(а):Есть функция с опциональными параметрами. Как узнать, был послан конкретный параметр в функцию или нет? IsMissing работает только для варианта.
Vi писал(а):Нет способа в реализации метода f отличить вызов f(p1,,p3) и f(p1,7,p3)
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 27