ник: akkorn
to час
Задаю вопрос заново:
Рекомендуется ли использовать инструкцию
Recordset (Dim rst.. , Set rst=...... Set rst=Nothing)
если можно напрямую присваивать значение
Val = CurrentDb.OpenRecordset("бла-бла-бла") ....
В чем сложность-то?
Я не прошу что-то придумать, я спрашиваю мнение, блин! 
е-мое, ну или так:
какая инструкция вам больше по душе:
Function Func1() As Double
Dim Rst As Recordset
Dim ValRst As Double
Set Rst = CurrentDb.OpenRecordset("бла-бла-бла"))
If Rst.RecordCount > 0 Then ValRst = Rst.Fields(0)
Rst.Close
Set Rst = Nothing
End Function
|
ИЛИ
Function Func2() As Double
On Error Resume Next
Dim ValRst As Double
ValRst = CurrentDb.OpenRecordset("бла-бла-бла").Fields(0)
End Function
|
P.S. Хочу поздравить всех с праздником! Удачи всем, и отличного настроения!