Red de conocimiento informático - Problemas con los teléfonos móviles - VB: ¿Cómo escribir la declaración que crea un documento .doc?

VB: ¿Cómo escribir la declaración que crea un documento .doc?

Private Sub Command1_Click()

Atenuar wrdApp

Establecer wrdApp = CreateObject("Word.application")

Con wrdApp

.DisplayAlerts = False

.Visible = True

.Documents.Add

.Selection.TypeText "Lista de información de la computadora" + Chr(13)

.ActiveDocument.SaveAs "c:\1.CTRL"