Traduccion de C# a Visual Basic .Net

[jetzona]

y por ultimo

Public Function GetItemName(ByVal orderItem As String) As String
Dim delimitado() As String = orderItem.Split(delimitador)
Return delimitado(1)
End Function

Public Function GetItemPrice(ByVal orderItem As String) As String
Dim delimitado() As String = orderItem.Split(delimitador)
Return delimitado(2)
End Function

Public Function GenerateItem(ByVal cantidad As String, ByVal itemName As String, ByVal price As String) As String
Return (cantidad _
+ (delimitador(0) _
+ (itemName _
+ (delimitador(0) + price))))
End Function
End Class

Public Class OrderTotal

Private delimitador() As Char = New Char() {Microsoft.VisualBasic.ChrW(63)}

Public Sub New(ByVal delimit As Char)
MyBase.New()
delimitador = New Char() {delimit}
End Sub

Public Function GetTotalName(ByVal totalItem As String) As String
Dim delimitado() As String = totalItem.Split(delimitador)
Return delimitado(0)
End Function

Public Function GetTotalCantidad(ByVal totalItem As String) As String
Dim delimitado() As String = totalItem.Split(delimitador)
Return delimitado(1)
End Function

Public Function GenerateTotal(ByVal totalName As String, ByVal price As String) As String
Return (totalName _
+ (delimitador(0) + price))
End Function
End Class
End Namespace


AHORA UNA MANITO PORFIS ES DE UTILIDAD PUBLICA A CUALQUIERA LE PUEDE SERVIR....SORRY POR TANTA INFO PERO NO CABIA EN UN SOLO POST...