Somma valori provenienti da dde

[drxouse]

Private Sub Form_Load()
Text1.LinkMode = 0
Text1.LinkTopic = "DDEXT|DR"
Text1.LinkItem = "FESX060900"
Text1.LinkTimeout = 100
Text1.LinkMode = vbLinkAutomatic

Text2.LinkMode = 0
Text2.LinkTopic = "DDEXT|DR"
Text2.LinkItem = "FESX060900"
Text2.LinkTimeout = 100
Text2.LinkMode = vbLinkAutomatic

Text3.text = Val(Text1.Text) + Val(Text2.Text)
End Sub

Ho creato un form con 3 text box , il primo e il secondo text box mostrano i valori ricevuti dalla banca con il dde , mentre il terzo textbox fa la somma del text 1+text 2 .questo codice fatto in VB5 , funziona perfettamente , l'unico problema , è che fa la somma solo quando apro il programma cioè carico il form , ma poi non aggiorna più la somma , nonostante i valori del textbox 1 e 2 continuano a cambiare .

Potete aiutarmi grazie in anticipo.

Ciao

[Pirelli72]

Se magri inserisci un refresh della TextBox3 oltre che nel Form_Load da qualche altre parte

Text3.text = Val(Text1.Text) + Val(Text2.Text)

magari si aggiorna anche quella...

[drxouse]

Ciao grazie della rispsota ma ho provato con refesh non si aggiorna

text3.refresh

grazie

[drxouse]

il refresh lo messo sia nel load_form che in un modulo richiamandolo dal form ma non fa il refresh , semmai postami un ipotetico codice
grazie

[Pirelli72]

Non ci siamo, ma scusa se nel'evento Form_Load metti:

Text3.text = Val(Text1.Text) + Val(Text2.Text)

durante tale evento la Text3 si popola con la somma dei due valori. Se non la richiami più non si aggiornerà mai!!! Usa un Timer che aggiorna la Text3 a intevalli predifiniti.