Llamar palabra en el programa VB

shell "C:/program files\microsoft office\office11\winword" amp; " " amp app.path amp "\filename"

Esto es para usar el programa de Word para abrir el texto de Word; el directorio del programa actual Método

Si no desea abrirlo en Word, entonces

Abra "c:\1.doc" para la entrada como #1 'Abra el archivo especificado documento en el directorio especificado del documento

p>

Dim str_txt1 As String 'Definir una variable para guardar la cadena en el documento

Hacer mientras no EOF(1) ' Desde la primera línea hasta la última línea del documento

Entrada de línea #1, str_txt1 'En este momento str_txt1 guarda el texto de la línea actual leída

imprimir str_txt1 'Para generar el contenido al formulario, para enviar el contenido al formulario, debe configurar el atributo de dibujo automático del formulario Establecer en verdadero

LoopLoops 'Para enviar el contenido del formulario al formulario, debe configurar el atributo de dibujo automático del formulario en verdadero

LoopLoops 'Para enviar el contenido del formulario al formulario, debe configurar el formulario. La propiedad de dibujo automático está establecida en verdadero

Bucle

Cerrar