How do l change a textbox's label

[DragonFly]

Depending on what is put in a textbox l want to change the label, (what appears in the window) of a second text box. Is this possible?

[mendhak]

not quite sure what that means... but i've guessed


Dim strabc as string
strabc = text1.text

select case strabc

case "":
text2.text = "empty"

case "goo goo dolls":
text2.text = "the best!!!"

case "whatever"
text2.text = "hey yo!"

end select




Is this what you meant? or could u be a bit more clear?

[Bruce Fox]

Try:

IF Something.... Then
Text2.Text = Text1.Text ' Or what ever u need to do
End IF

________
Washington dispensaries

[DragonFly]

To clarify - it's not what appears in the text box - but what appears in the text box's label

Sorry it's probably a bit lame - but I am a newbie at this!

[GlenW]

I didn't think Text Boxes had labels

[darre1]

i think he means the InputBox() function... dont you?

here's an example of what you mean...

Private Sub Form_Load()
    Dim str As String
    
    str = InputBox("Enter title of next input box", "Input")
    InputBox "OK?", str
End Sub

[Jethro]

Simple really,

Private Sub Text1_LostFocus()

   If Text1 = "Something" Then
       Label2.Caption = "Whatever"
   End If

End Sub

[DragonFly]

Originally posted by Jethro
Simple really,

Private Sub Text1_LostFocus()

   If Text1 = "Something" Then
       Label2.Caption = "Whatever"
   End If

End Sub

Thank you will give it a go