Red de conocimiento informático - Conocimiento del nombre de dominio - ¿Cómo utilizar VB para extraer el contenido requerido de un archivo txt a un nuevo archivo txt? Soy novato y espero que Dios pueda darme el código. Gracias.

¿Cómo utilizar VB para extraer el contenido requerido de un archivo txt a un nuevo archivo txt? Soy novato y espero que Dios pueda darme el código. Gracias.

Subcomando privado 1_Click()

Dim myInput es una cadena, myOutput es una cadena, myTemp es una cadena, myData() es una cadena, I es un número entero

Abra el archivo binario "Ubicación del archivo antiguo" como #1

myInput = Input(LOF(1), 1)

Cerrar

MyData = Split(myInput, "- ") El número de "-" entre comillas es el mismo que el número de "saltos de sección" en el archivo de texto.

Para i = 0 a UBound(misDatos)

Si Len(mis datos(I))-Len(Reemplazar(mis datos(I), "rmdj", " ") = 12, luego myOutput = myOutput & ampMy data (1)& amp"-" 'El número de "-" entre comillas es el mismo que el número de "saltos de sección" en el archivo de texto

<. p> Luego

Abrir "Ubicación del nuevo archivo" como salida n.° 1

Imprimir n.° 1, mi salida

Cerrar

Fin empalme

上篇: ¿Por qué no puedo iniciar sesión en WeChat en otros teléfonos? 下篇: Cómo cambiar el número de teléfono móvil de China Merchants Bank

Artículos populares