Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Data_Mining_(Redko-Rudnytskyi)
.pdf
•
•
•
•
Public Function FareBin(Fare As Variant) As String
If Fare < 10 Then
FareBin = "<10"
ElseIf Fare < 20 Then
FareBin = "10-20"
ElseIf Fare < 30 Then
FareBin = "20-30"
Else:
FareBin = ">30"
End If
End Function
Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]