• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Takes text out of text box, and places it on the form.

Takes text out of text box, and places it on the form.

Takes text out of text box, and places it on the form.

API Declarations


'Needs:
'One Command Button, "Command1"
'One Text Box, "Text1"



Rate Takes text out of text box, and places it on the form.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

    'Clears form, so that new text can be displayed
    Me.Cls
    'Display's Text on form
    Print Text1.Text
End Sub

Private Sub Form_Load()
    'Set text box location
    Text1.Top = 2850
    Text1.Left = 0
    'Set text box text
    Text1.Text = ""
    'Set text box size
    Text1.Height = 285
    Text1.Width = 2655
    'Set command button's location
    Command1.Top = 2880
    Command1.Left = 2760
    'Set command button's size
    Command1.Height = 255
    Command1.Width = 1215
    'Set command button to default
    Command1.Default = True
    'Set command button's caption
    Command1.Caption = "Display Text"
    'Set form's size
    Me.Height = 3600
    Me.Width = 4800
    'Set form's font
    Me.Font.Bold = True
    Me.FontSize = 24
    'Set form's caption
    Me.Caption = "Print-2-Form"
End Sub