Come scrivere KOP Utilizzando Visual Basic

Simulazione logica ladder in Visual Basic aiuta i programmatori a imparare i fondamentali di un linguaggio di programmazione comune con cui possono essere più confortevole . Logica ladder , un linguaggio di programmazione , è spesso usato nei PLC e di altre macchine che dispongono di un sistema di controllo relativamente semplice ma fondamentale , come ad esempio piattaforme petrolifere . Utilizzare una serie di variabili booleane e gli operatori logici di Visual Basic per scrivere la propria logica ladder . Istruzioni
1

Aprire il file di Visual Basic con un editor come Microsoft Visual Studio .
2

Simulare la funzione logica ladder " s = x AND ( y o z ) " aggiungendo il seguente codice nella funzione :

Dim contact_x come booleano

Dim contact_y come booleano

Dim contact_z come booleano

Dim coil_s come booleano

contact_x = True

contact_y = False

contact_z = True

coil_s = ( contact_x AndAlso ( contact_y O contact_z ) ) per

il valore della bobina " coil_s " sarà " vero " e il suo gradino sarà aperto .
3

Simulare la configurazione "run latch = ( avvio o corsa ) e ( NON STOP) " aggiungendo il seguente codice nella funzione :

Dim contact_start come booleano

Dim contact_stop come booleano

Dim contact_run come booleano

Dim coil_run come booleano

Dim coil_m come booleano

contact_start = True

contact_run = False

contact_stop = False

coil_run =
False

coil_run = ( b_start O B_Avviare ) AndAlso (Non b_stop ) per

coil_m = coil_run

coil_run Poi contact_run = True

Il codice simula un sistema con "Start "e " pulsante Stop " . Se il sistema è già in esecuzione , allora continua ad andare . Se il sistema è fermo, premendo il pulsante "Start" si avvia in su. Il pulsante "Stop" arresta il sistema
4

Simulare funzionalità contatore aggiungendo il seguente codice nella funzione : .

Dim counter_a As Integer Dim

counter_b As Integer Dim

counter_c As Integer Dim

contact_r come booleano

Dim contact_i come booleano

counter_a = 0

counter_b = 0

counter_c = 0

contact_r = True

contact_i = True

contact_r Poi

counter_a + = 1

counter_c + = 1

End If

contact_i Poi

counter_b + = 1

counter_c + = 1

End Se

Ogni volta che uno dei contatti è eccitato gli incrementi di sistema corrispondente contatore . I negozi contatore "c" la somma delle "a" e "b" contatori. Questo è utile quando si ha bisogno di sapere quante volte un evento è accaduto .
5

Salvare il file di Visual Basic , compilare ed eseguire il programma per simulare le funzioni di logica ladder .

• Come convertire da VB6 
• Come inviare Vars Da VBScript per un file batch