代码：
Function 客户分类(s)
Dim score, level, s
score = s
If score < 30 Then
level = "温柔型"
ElseIf score < 60 Then
level = "冲动型"
ElseIf score < 90 Then
level = "暴躁型"
Else
level = "狂暴型"
End If
客户分类 = level
End Function
运行结果为“=客户分类(b2)”，没有显示按理说应该是“冲动型”，我确定b2是数字格式，然后客户分类这个自定义函数也是从自定义函数”直接引用的。所以大佬能不能帮忙想想到底是哪里出问题了呢。

交代一下背景:在学习调用子函数，然后老师让我们用以下的vba代码展示后，又要用函数形式再试一遍。
全部代码如下：
Sub 客户分类解决方案()
Dim i, score, level
i = 2
Do While Cells(i, 1) <> ""
score = Cells(i, 2)
level = 客户分类(score)
Cells(i, 3) = level
i = i + 1
Loop
End Sub
Function 客户分类(s)
Dim score, level ，s
score = s
If score < 30 Then
level = "温柔型"
ElseIf score < 60 Then
level = "冲动型"
ElseIf score < 90 Then
level = "暴躁型"
Elselevel = "狂暴型"
End If
客户分类 = level
End Function