Das ist einfach:

Nehmen wir an deine textbox hat den namen txt1

Dann schreibst du in deinen Code:
Sub txt1.Change()
lbl1.Caption = txt1.Text
endSub

Dadurch wird der Text aus der Textbox in dme Label lbl1 dargestellt, sobal der Text geändert wird.