SQL CLR - Creating UDF with VB.NET 2005 !!

Hi,
I am using DOT NET CLR in SQL Server 2005. I am creating an UDF in VB.NET 2005. I am getting error in the "FillRow" method (Error in declaration etc...). Can you please modify the code?

Partial Public Class UserDefinedFunctions

    <Microsoft.SqlServer.Server.SqlFunction(TableDefinition:="id Char(2), name varchar(50), sal money", FillRowMethodName:="FillRow", DataAccess:=DataAccessKind.Read)> _
    Public Shared Function GetRowsBySalary(ByVal salary As SqlMoney) As IEnumerable
    'Some code goes here
    End Function

    Public Shared Sub FillRow(ByVal obj As Object, ByRef id As SqlChars, ByRef name As SqlChars, ByRef sal As SqlMoney)
        Dim Row As DataRow = CType(obj, DataRow)
        id = CType(Row("id"), SqlChars)
        name = CType(Row("name"), SqlChars)
        sal = CType(Row("sal"), SqlMoney)
    End Sub

End Class

I have problems (Errors) while deploying this UDF. Can you please modify the code?

Thanks