Msgbox e caselle di testo

[lord_seba]

Uso da poco Visual Basic, e ho un problema: voglio usare un msgbox in modo che mi ricopi il testo scritto nella casella. mi spiego meglio: voglio scrivere un testo in una textbox, metterci di fianco un pulsante che se premuto generi una msgbox con all'interno il testo della casella... come faccio?
Grazie mille

[tas]

Private Sub Button1_Click()
    MsgBox Text1.Text
End Sub

[b.lory]

campo.text = "pippo"

nell'evento click del CommandButton

msgbox(campo.text)

:quote:
... se ho capito bene quello che volevi !!!

[lord_seba]

ok, funziona, grazie mille. un altra cosa: se io voglio aggiungere oltre al testo della casella anche qualcosa di standard come faccio? esempio: nella casella immetto il testo XYZ, voglio che alla pressione del pulsante command1 si generi una msgbox contenente più o meno una cosa così: lei ha digitato il seguente testo: XYZ

[tas]

Private Sub Button1_Click()
    Dim txt As String

    txt = "Lei ha digitato il seguente testo: "
    txt = txt & Text1.Text
    MsgBox txt
End Sub

[lord_seba]

ok, ci siamo quasi... scusate se vi rompo le scatole... se io voglio collegare più di una textbox in questo modo?
cioè: lei ha digitato il testo X, il testo Y e il testo Z
grazie mille ancora, siete troppo gentili

[ladyBlu]

Originariamente inviato da lord_seba
ok, ci siamo quasi... scusate se vi rompo le scatole... se io voglio collegare più di una textbox in questo modo?
cioè: lei ha digitato il testo X, il testo Y e il testo Z
grazie mille ancora, siete troppo gentili

riprendendo il codice di tas:

Private Sub Button1_Click()
    Dim txt As String

    txt = "Lei ha digitato il seguente testo: "
    txt = txt & Text1.Text & vbCrLf
    txt = txt & Text2.Text & vbCrLf
    txt = txt & Text3.Text
    MsgBox txt
End Sub

[lord_seba]

non funzia... il problema è che devo metterci del testo in mezzo...

esempio stupido: il tuo nome è X, il tuo cognome è Y e la tua età è Z

ovviamente i parametri XYZ devono essere inseriti mediante una textbox...

[ladyBlu]

Originariamente inviato da lord_seba
non funzia... il problema è che devo metterci del testo in mezzo...

esempio stupido: il tuo nome è X, il tuo cognome è Y e la tua età è Z

ovviamente i parametri XYZ devono essere inseriti mediante una textbox...

è molto semplice ciò che devi fare, con un po' più di iniziativa personale e risolveresti da solo, in fondo la logica da seguire è tutta nel codice postato da tas e riadattato da me.

cmq, stavolta ti scrivo la soluzione:

Private Sub Button1_Click()
    Dim txt As String

    txt = "Il tuo Nome è: "
    txt = txt & Text1.Text & vbCrLf
    txt = txt & "Il tuo Cognome è: "
    txt = txt & Text2.Text & vbCrLf
    txt = txt & "La tua Età è: "
    txt = txt & Text3.Text
    MsgBox txt
End Sub

vbCrLf serve per andare accapo

[lord_seba]

ma è proprio questo che non funziona! ho provato a farlo, ma tiene in considerazione solo l'ultimo parametro, e quindi nel msgbox c'è scritto solamente la tua età è Z