ник: ROM!MDB
Есть запрос содержащий поля:
ID_PISMA K1 K2 K3
1 0,5 0,3
2 0,2 0,1
В данном примере поле K3 не содержит значений, это может бытьс любым из полей (строк полей.
Задача найти значение функции W = к1+к2 +к3
Для решения этой задачи разработана функция:
Public Function W(K1 As Variant, k2 As Variant, k3 As Variant) As Variant
Dim X1 As Variant
Dim X2 As Variant
Dim X3 As Variant
X1 = X2 = X3 = 0
W = 0
If K1 Is Not Null Then
X1 = K1
End If
If k2 Is Not Null Then
X2 = k2
End If
If k3 Is Not Null Then
X3 = k3
End If
W = X1 + X2 + X3
End Function
|
Вопрос в чем ошибка! Помогите разобраться.