Thread obsoleto Codice!

[Giosan]

Salve a tutti!
Volevo chiedervi se fosse possibile inviare un messaggio tramite button scritto in una textbox a una textbox di un altro form!
Se è possibile potete scrivermi il codice?
Grazie in anticipo!
Ciao!

 

[-Shield96]

NON CAPISCO O.O vuoi dire il collegamento tra 2 form?

 

[Giosan]

No! scusa se mi sono spiegano male ma vorrei sapere se c'è un codice che invia per esempio sendkeys...... in una textbox in un altro form!

 

[-MetalSnake-]

Ti incollo il codice così come l'ho fatto io...

Public Class Form1
Dim testo As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
testo = TextBox1.Text()
Form2.Show()
If TextBox1.Text <> "" Then
Form2.TextBox1.Text = testo
End If

End Sub


End Class



Se non funziona dimmelo

 

[loryx95]

credo che basti fare (sempre che abbia capito che intendi dire)

sendkeys.send form2.textbox1.text
sendkeys.send ("{ENTER}")

 

[Giosan]

Grazie metal snake!
l'ho fatto così io (ho modificato 2 cose per il mio scopo)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = TextBox1.Text()
Form2.Show()
If TextBox1.Text <> "" Then
Form2.TextBox1.Text = TextBox1.Text
End If

cmq già che ci sono volevo chiedere se si può fare in modo che a quello che arriverà nell'altra text c'è qualcosa prima o dopo!

 

[xBuMbIx]

Comunque rinomina il titolo si deve capire di che cosa si parla

 

[-MetalSnake-]

Grazie metal snake!
l'ho fatto così io (ho modificato 2 cose per il mio scopo)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TextBox1.Text = TextBox1.Text()
Form2.Show()
If TextBox1.Text <> "" Then
Form2.TextBox1.Text = TextBox1.Text
End If

cmq già che ci sono volevo chiedere se si può fare in modo che a quello che arriverà nell'altra text c'è qualcosa prima o dopo!

Di nulla

Non ho capito bene cosa intendi, un altro testo?

 

[Habboworld]

Puoi fare così :

If TextBox1.Text <> "" Then
Form2.TextBox1.Text = "Quello che vuoi prima (fisso)" & TextBox1.Text & "Quello che vuoi dopo (fisso)" & DateAndTime.Now
'Per esempio all'ultima stringa ti ho messo che mostra l'ora di invio all'altro form
End If

 

[Volcomech]

Altrimenti usa += che ti mette il testo che c'era prima nella textbox piu quello inviato, se è quello che intendi..

 

[R3tr0s]

Sposto ;)

 

[Damiano Dotto]

forse intendevi anche in remoto con il winsock ???? se vuoi è possibile