[VB.NET] Traduzione da VB6 a VB.NET

[MItaly]

Al di là del fatto che per VB e .NET esiste un subforum apposito, mi sfugge dove sia la difficoltà nella traduzione di questa classe...

Class SerialCheck
Public Sub New()
End Sub
Public Function GetDllVersion() As Short
    Return 1
End Function

Public Function GetSerialOK(Wnd As Integer, Serial As String, User As String, Company As String) As Short
If (Serial = "1234") Then
Return 1
Else
Return = 0
End If
End Function 
End Class