CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Pasar de VB6 a C# y/o VB .net

(1/1)

Meta:
Hola:

Quiero cambiar el código de VB6 a C# y/o VB .net en esta web pero me da error porque solo acepta VB .net
http://www.developerfusion.com/tools/co ... arp-to-vb/

El código que deseo cambiar de VB6 a C# es este de aquí abajo.


--- Código: Text ---Private Sub conectar_Click()'comprueva que el puerto este cerrado para poder abrirloIf MSComm1.PortOpen = False Then'determina el puerto que hemos seleccionado.If COM_sel.ListIndex = 0 ThenMSComm1.CommPort = 1End IfIf COM_sel.ListIndex = 1 ThenMSComm1.CommPort = 2End IfIf COM_sel.ListIndex = 2 ThenMSComm1.CommPort = 3End IfIf COM_sel.ListIndex = 3 ThenMSComm1.CommPort = 4End IfIf COM_sel.ListIndex = 4 ThenMSComm1.CommPort = 5End IfIf COM_sel.ListIndex = 5 ThenMSComm1.CommPort = 6End IfIf COM_sel.ListIndex = 6 ThenMSComm1.CommPort = 7End IfIf COM_sel.ListIndex = 7 ThenMSComm1.CommPort = 8End IfIf COM_sel.ListIndex = 8 ThenMSComm1.CommPort = 9End IfIf COM_sel.ListIndex = 9 ThenMSComm1.CommPort = 10End IfIf COM_sel.ListIndex = 10 ThenMSComm1.CommPort = 11End IfEnd If MSComm1.OutBufferSize = 1 'tamaño del dato a transmitir.MSComm1.InBufferSize = 23MSComm1.InputMode = comInputModeText 'los datos se recuperan en modo texto.MSComm1.InputLen = 23 ' BUFFER DE ENTRADA SE PUEDE DEJAR AL MAXIMO.MSComm1.PortOpen = TrueMSComm1.RThreshold = 23 'son 23 caracteres.End Sub Private Sub Form_Load()COM_sel.AddItem "COM1"COM_sel.AddItem "COM2"COM_sel.AddItem "COM3"COM_sel.AddItem "COM4"COM_sel.AddItem "COM5"COM_sel.AddItem "COM6"COM_sel.AddItem "COM7"COM_sel.AddItem "COM8"COM_sel.AddItem "COM9"COM_sel.AddItem "COM10"COM_sel.AddItem "COM11"COM_Sel.ListIndex = 0End Sub Private Sub MSComm1_OnComm()Dim InBuff As StringSelect Case MSComm1.CommEventCase comEvReceiveInBuff = MSComm1.InputDebug.Print InBuffTexto.Text = ""Texto.Text = Left$(InBuff, 23) ' se recorta los caracteres basuraMSComm1.PortOpen = False 'cierra el puerto y vacia el bufferEnd SelectEnd Sub  
Saludo.

kaidok:
En esta página se ofrece un conversor que realiza esa función, pero es de pago así que no creo que te interese. Creo que el Microsoft Visual Studio también incluye una herramienta para realizar la conversión que pides, pero el Microsoft Visual Studio tampoco es gratis.

Me temo que no hay nada gratuito que realice la conversión que pides, en todo caso te dejo esta información.

Navegación

[0] Índice de Mensajes