Mi método de extensión JSON
0 Comments
//extensiones [como ToString()] Public Module Extensiones <Runtime.CompilerServices.Extension()> _ Public Function ToJSON(ByVal datos As Agromutua.Entity.DatosBancarios) As String Dim datosBancarios As String Dim prov As New Persistencia.Provincia Dim pk() As Object = New Object() {datos.IdProvincia} datosBancarios = «{Id: ‘» & datos.Id & «‘ ,» _ …