¿Cómo escribir cuántas declaraciones generar por línea en VB?

Utilice la función Mid para tomar un grupo de 5 cadenas, agregue vbCrLf para envolver la cadena y envíela al cuadro de texto a través de un bucle. ¿Opción?Explícito

Dim?sj?As?String

Privado?Sub?Command1_Click()

Dim?i?As?Long

For?i?=?1?To?Len(sj)?Paso?5

Texto1?=?Texto1?&?Mid(sj,?i,?5)?&?vbCrLf

Siguiente

End?Sub

Private?Sub?Form_Load()

sj?=?"54 miembros del Consejo Legislativo son Shenzhen se reunió hoy aquí con Wang Guangya, director de la Oficina de Asuntos de Hong Kong y Macao, Li Fei, director del Comité de Ley Básica, y Zhang Xiaoming, director de la Oficina de Enlace del Gobierno Popular Central. En su discurso final, Wang Guangya. Señaló que el proceso democrático de Hong Kong comenzó con el importante punto de inflexión histórico del regreso de Hong Kong a la patria, y exploró gradualmente el proceso durante los últimos 18 años. Un camino de desarrollo democrático que es consistente con las condiciones reales de Hong Kong ha sentado una base sólida. base para lograr el objetivo del sufragio universal estipulado en la Ley Fundamental "

Text1?=?""

End?Sub