by JV. Soft (1 Submission)
Category: Miscellaneous
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Sun 2nd February 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Write some text in a textbox and see it written in a Word window
API Declarations
Dim x As Integer
Dim T() As Byte
Dim DocWord As Word.Application
Set DocWord = New Word.Application
DocWord.Application.Visible = True
DocWord.Documents.Add
DocWord.Selection.Font.Size = "48" 'optional
End Sub
Private Sub Form_Resize()
Text1.Height = ScaleHeight
Text1.Width = ScaleWidth
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
DocWord.Selection.Font.ColorIndex = Int(Rnd * 8) 'optional
DocWord.Selection.InsertAfter Chr$(KeyAscii)
End Sub
No comments have been posted about Write some text in a textbox and see it written in a Word window. Why not be the first to post a comment about Write some text in a textbox and see it written in a Word window.