Vb Homeplc, Far Apparire Immagini

[sergio.marcianelli]

Buongiorno,

ho bisogno di far apparire una certa immagine dalla supervisione del mio impianto domotico con Hplc, quando un certo evento accade. Precisamente voglio far apparire l'immagine Processo1 (che sarebbe il simbolo del bruciatore nella libreria processi di VB) quando l'uscita 2 del PLC è true (X1), ma non conosco precisamente i comandi in VB if, else, ecc. Ho fatto qualche tentativo ma nulla. Utilizzo Visual Basic 6.0

Grazie

Sergio Marcianelli

[AVC_Veronica]

Se lo scopo è far apparire o scomparire un'immagine da Vb è abbastanza semplice,

puoi condizionare la proprieta oggetto "visible" con il tuo bit,

se variabile a bit:

If ValoreTuaVariabile = True Then

Image1.Visible = False

Else

Image1.Visible = True

End If

dove Image1 nome tua immagine, per rendere sempre attiva la comparazione inseriscila in un Timer()

[sergio.marcianelli]

Ciao,

il mio è problema è dire "quando l'uscita 2 dell'hplc è true" allore image 2 = visibile . Non so come formulare correttamente il codice.

Grazie

[bumbi]

ciao Sergio,

il principio di codice e' questo, ovviamente da ottimizzare...

Private Sub Timer1_Timer()

'legge uscita Y0.1

a = XComm1.PLC_OUT(Y1, 1, 1)

If a = True Then

image1.Visible = True

Else

image1.Visible = False

End If

End Sub

come appunto diceva Veronica....

e ricordati di mettere l'oggetto Xcomm nel form se no ti risponde picche...

bye

[del_user_56966]

a = XComm1.PLC_OUT(Y1, 1, 1)

ok, ma metti solo l'uscita in formato Hex e non mettere la Y dato che usi una funzione specifica d'uscita è solo una ripetizione che ABS non decodifica....

[sergio.marcianelli]

Grazie mille,

Appaena posso faccio delle prove e vi farò sapere

Sergio Maricanelli

[giuseppecardace]

e ricordati di mettere l'oggetto Xcomm nel form se no ti risponde picche..

naturalmente anche l'oggetto timer o di VB 6 o ABS

.