.NET

[#1]

Can someone suggest what is wrong here?

Diameter is passed in as 12.7 but it is not acceptint it as a true statement.

    Function Volume(Diameter As Single)
        If Diameter = 12.7 Then
        end if
    End Function

[#2 · Accepted solution]

    Function Volume(ByVal Diameter As Single) As Boolean
        If Diameter = CSng(12.7) Then
            Return True
        Else
            Return False
        End If
    End Function

[#3]

Thanks again!!

[#4]

I think this will do it too:

If Diameter = 12.7# Then end if

[#5]

Hi,

Don't make VB more verbose than it is...

    Function Volume(ByVal Diameter As Single) As Boolean
        Return Diameter = 12.7F
    End Function

 But why using a Single rather than a Double ?