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
    sabato 11 gennaio 2025
    Bari
    73
    43
    01
    58
    81
    Cagliari
    69
    60
    18
    02
    10
    Firenze
    25
    32
    18
    55
    54
    Genova
    48
    05
    40
    34
    69
    Milano
    10
    07
    70
    44
    79
    Napoli
    11
    89
    01
    34
    80
    Palermo
    37
    80
    82
    44
    77
    Roma
    78
    04
    38
    39
    56
    Torino
    08
    13
    30
    27
    24
    Venezia
    56
    75
    36
    18
    70
    Nazionale
    63
    83
    19
    31
    80
    Estrazione Simbolotto
    Bari
    35
    34
    12
    23
    20

Ultimi Messaggi

Indietro
Alto