Novità

domanda strana strana...

lotto_tom75

Advanced Premium Member
E' possibile in qualche modo attivare o disattivare da finestra input... parte del codice, senza dover per forza ricorrere a codici if then duplicati con le modifiche richieste, in fase di run time?

Cerco di spiegarmi con un esempio... 🙃

Se volessi disattivare o meno la visualizzazione in output posso in qualche modo attivare o disattivare la relativa riga in modalità run time senza necessariamente dovermi fare due versioni dello stesso codice (una con output e una senza)?

1° versione

Codice:
scrivi "pippo"

2° versione

Codice:
'non scrivere pippo

E' possibile attivare o meno la scrittura di pippo in run time senza dover implementare i due diversi codici analoghi? 🤔

Vi avevo avvertito che era strana... :LOL:🧑‍🍳
 
Metti, in serie, 2 test condizionali o se preferisci nidificati.

If Test_1

If Test_2

E' evidente che il secondo viene eseguito solo se si è superato il primo dei 2 Test.

Dopo di che Test_1 può essere condizionato, anche da un inputbox ed altri eventi particolari.

:)
 
Metti, in serie, 2 test condizionali o se preferisci nidificati.

If Test_1

If Test_2

E' evidente che il secondo viene eseguito solo se si è superato il primo dei 2 Test.

Dopo di che Test_1 può essere condizionato, anche da un inputbox ed altri eventi particolari.

:)

Ciao joe grazie della risp ma non intendevo questo... Vorrei proprio evitare di scrivere i due if e attivare o disattivare parte dello stesso codice... se ovviamente fosse possibile... :)
 
Effettivamente di Test condizionali ne basta "1".

Ma è chiaro che questo "1" è pilotato da qualcos'altro.

Cioè da un precedente test, o da una condizione preesistente, o da un input esterno,

anche solo dal caso ... ma ci deve essere per dividere le condizioni.

Codice:
Sub Main
   SN = InputBox("Scrivo","S/N","S")
   A = 2
   If SN = "S" And A = 2 Then Scrivi "Pippo On Demand"
   If A = 2 Then Scrivi "Pippo For Ever"
End Sub

:)
 
Effettivamente di Test condizionali ne basta "1".

Ma è chiaro che questo "1" è pilotato da qualcos'altro.

Cioè da un precedente test, o da una condizione preesistente, o da un input esterno,

anche solo dal caso ... ma ci deve essere per dividere le condizioni.

Codice:
Sub Main
   SN = InputBox("Scrivo","S/N","S")
   A = 2
   If SN = "S" And A = 2 Then Scrivi "Pippo On Demand"
   If A = 2 Then Scrivi "Pippo For Ever"
End Sub

:)

Non ho capito come si possa risolvere la mia domanda con l'implementazione di una seconda variabile condizionale fissa... ma grazie lo stesso big joe ;)

Ad ogni modo io cercherei più qualcosa di simile ai comandi ipotetici in run time... che dovrebbero agire sull'unica identica riga di codice target... es (scrivi "pippo") dicendo allo script:

"metti il commento..." = disattivala...

' scrivi "pippo" < la scritta non viene mostrata perchè in run time la riga è stata "commentata"...

"non mettere il commento..." = attivala...

scrivi "pippo" < la scritta si visualizzerà in output in quanto la riga è attiva essendo priva dell'apostrofo iniziale evidenziato sopra in rosso...
 
Ultima modifica:
Mettici un input box dove ti pare anche in mezzo al costrutto se rispondi si o 1 il costrutto prosegue normalmente ,se rispondi no ti evita le attività che avrai inserito tra la condizione dipendente dall'input box.
 
Codice:
Sub Main

   S = InputBox("1 = SCRIVO / 0 = NON Scrivo","SCRIVO ?",1)
   If S Then Scrivi "Pippo On Demand"
  
End Sub
 
Ragazzi non riesco a spiegarmi...,comunque credo non sia possibile nemmeno implementare una cosa del genere... 😣 Pazienza dai 😜 Grazie comunque ad entrambi! (y)👋:)
 
Scusa ma ...

... Luigi ci ha spiegato e fatto esempi sul come ripulire una pagina in html scaricata dal web.

Comprese le tecniche e le condizioni con cui ricavare (o scrivere) SOLO i numeri desiderati.

Devi guardarti tutte le istruzioni per trattare le stringhe ed i testi sui manuali del Basic.

:)
 
Scusa ma ...

... Luigi ci ha spiegato e fatto esempi sul come ripulire una pagina in html scaricata dal web.

Comprese le tecniche e le condizioni con cui ricavare (o scrivere) SOLO i numeri desiderati.

Devi guardarti tutte le istruzioni per trattare le stringhe ed i testi sui manuali del Basic.

:)

Joe, non è una questione strettamente legata alle stringhe... ma all'ipotesi dell'esistenza o meno di un comando per etichettare e attivare o disattivare relative righe di codice fisso... 👋🙂
 
Non capisco perché aggiungi parole che avendo un loro significato intrinseco,

e non utile, alla comprensione, finiscono per essere controproducenti. (Nel particolare mi riferisco all'uso di "Codice Fisso")

Dunque:

Scrivi "Pippo" 'è la riga di comando in oggetto

Scrivi "Paperina" 'è una seconda linea di comando

Lo script una volta eseguito scrive:

Pippo
Paperina

Se anteponi il test condizionale alla prima linea ... Cioè:

If S=True Then "Scrivi Pippo"

Lo script eseguirà il comando "Scrivi Pippo" solo se S = True

e poi ... in ogni caso scriverà

Paperina.

Dunque con il test condizionale "If S= True"

hai la possibilità di attivare e disattivare il contenuto delle linee di comando a tuo volere.

Naturalmente se anteponi lo stesso test anche alla seconda linea

anche questa sarà sensibile alla presenza del valore True/False nella variabile "S"

Dunque quando "S = True" scriverà

Pippo
Paperina

Quando "S = False"

Lo script non scrive nulla

Quando avessi posto il TEST "If S = True" SOLO alla seconda linea,

SOLO "Scrivi Paperina" sarà sensibile al valore contenuto in "S".

Se invece vuoi pre-processare lo script come "se fossi tu" l'interprete Basic,

allora vale il consiglio del messaggio precedente. Bisogna analizzarlo linea per linea.

Cioè individuare quali sono i commenti e gli eventuali caratteri speciali,

da cui trarre le decisioni, sul da farsi.

:)
 
Ultima modifica:
Se invece vuoi pre-processare lo script come "se fossi tu" l'interprete Basic,

allora vale il consiglio del messaggio precedente. Bisogna analizzarlo linea per linea.

Cioè individuare quali sono i commenti e gli eventuali caratteri speciali,

da cui trarre le decisioni, sul da farsi.

:)

Forse è questo... :unsure: quello che vado cercando per questo mio sfizio elaborazionale... 👋:)
 
Ciao a tutti.
Se non vuoi usare la if metti il codice che ti serve in una funzione
Quando lo vuoi utilizzare la Lanci altrimenti la remmi così hai tutto su un rigo.
Tom con i vostri script super segreti è impossibile aiutarvi, non perché il problema sia troppo complicato ma perché non lo conosciamo.
Cmq come ti hanno già suggerito sembrerebbe la soluzione migliore.
L 8input box ti rallenta , vai di codice.
Dim scr
Scr=1' lo cambi in 1 oppure zero
If scr =1 then lancia funzione
Se scr lo imposti a zero l if non produce risultato
Ciao :)
 
Ciao, Tom.
Ci provo anch' io.

Codice:
Sub Main

a= InputBox("Scrivo","10","20")

If a=10 Then
b="' 100"
Else
b=23
Scrivi b
Scrivi b+2
Scrivi 25+25
End If
 
End Sub
 
Nonostante nessuna di quelle qui presentate sia la soluzione a quello che ho immaginato... e che ripeto credo non sia fattibile... GRAZIE mille di nuovo a tutti gli intervenuti 👋:)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 15 luglio 2025
    Bari
    60
    18
    12
    57
    28
    Cagliari
    20
    26
    81
    55
    18
    Firenze
    28
    59
    46
    83
    81
    Genova
    32
    57
    09
    41
    17
    Milano
    58
    31
    49
    38
    63
    Napoli
    36
    58
    57
    45
    59
    Palermo
    03
    05
    48
    86
    62
    Roma
    47
    18
    01
    23
    79
    Torino
    56
    34
    49
    89
    90
    Venezia
    46
    44
    52
    82
    78
    Nazionale
    16
    36
    15
    13
    60
    Estrazione Simbolotto
    Nazionale
    27
    09
    44
    18
    11

Ultimi Messaggi

Indietro
Alto