Public Function STARS(number As Integer)
If number = "1" Then
STARS = "*"
ElseIf number = "2" Then
STARS = "**"
ElseIf number = "3" Then
STARS = "***"
ElseIf number = "4" Then
STARS = "****"
ElseIf number = "5" Then
STARS = "*****"
Else
Print "Error"
End If
End Function