Page 1 of 1

richiamo di una sub

PostPosted: 29 Apr 2014, 19:08
by suibaf
Ciao,

un semplice richiamo di una sub mi và in errore se lo faccio all'interno di una condizione if:

Code: Select all

      If Contataore_send_plc = 4 Then Print #3 , Makemodbus(2 , 6 , 103 , Credito_per_plc );

      'If Contatore_send_plc = 5 Then

       Call Gestione_ricarica(mes_1)

      'End If



Così non mi và in errore, se abilito l'if e l'end if il compilatore mi dà errore. Perchè?
https://dl.dropboxusercontent.com/u/15219757/errore%20bascom2.jpg

Grazie

Re: richiamo di una sub

PostPosted: 29 Apr 2014, 20:16
by deluca
@suibaf,
quando parliamo di codice ti consiglio di allegare il listato e non una immagine..... non ce ne facciamo nulla e ovviamente non possiamo aiutarti.

Re: richiamo di una sub

PostPosted: 29 Apr 2014, 20:21
by suibaf
Deluca,

infatti ho messo il codice che và in errore. L'immagine era per mostrare l'errore che mi da! Ovviamente non ho messo il codice di tutto il prg perchè sono molte righe. La sub che và in errore è Call Gestione_ricarica(mes_1)
Com'è che non lo vedi il codice?

Re: richiamo di una sub

PostPosted: 30 Apr 2014, 06:47
by deluca
Già risolto
Code: Select all
      If Contataore_send_plc = 4 Then Print #3 , Makemodbus(2 , 6 , 103 , Credito_per_plc );
      If Contatore_send_plc = 5 Then
         Call Gestione_ricarica(mes_1)
      End If

basta cambiare il nome alla variabile "Contatore"_send_plc" ed è tutto risolto :)
Code: Select all
      If Contataore_send_plc = 4 Then Print #3 , Makemodbus(2 , 6 , 103 , Credito_per_plc );
      If Contataore_send_plc = 5 Then
         Call Gestione_ricarica(mes_1)
      End If