Red de conocimiento informático - Problemas con los teléfonos móviles - Pregunta de programación de VB: tome los caracteres del contenido de un cuadro de texto con un número par de caracteres desde el principio hasta el medio para formar una nueva cadena str2 y envíela

Pregunta de programación de VB: tome los caracteres del contenido de un cuadro de texto con un número par de caracteres desde el principio hasta el medio para formar una nueva cadena str2 y envíela

a = Text1.Text

For i = 1 To Len(a)

Si IsNumeric(Mid(a, i, 1)) Entonces

b = b amp; Mid(a, i, 1)

Finalizar si

Siguiente i

Texto2.Text = bp>