Novità

aiuto script stringa

lottofortune

Advanced Member >PLATINUM<
Salve qualcuno può aiutarmi,ho trovato uno script in rete e vorrei modificarne solo una stringa dei calcoli..

nu1=Fuori90 (a+b+c+d)

al risultato vorrei fare il complemento a 90 come faccio?
 
ciao prova a fare così

nu1=Fuori90 (a+b+c+d)
nu2=90 - nu1 'complemento a 90
if nu2 = 0 then nu2 = 90 : end if

Francesco
 
Buona sera a tutte/i.

Propongo come soluzione alternativa a quella proposta da Francesco,

l'utilizzo dell'apposita istruzione di Spaziometria "ComplAdX".

Codice:
Option Explicit
Sub Main
Dim A,B,C,D
A = 10 : B = 20 : C = 60 : D = 90
Scrivi ComplAdX (Fuori90(A + B + C + D))
End Sub

Nel caso specifico essendo un "Complemento a 90"

il parametro X (di default 90) può essere omesso.

:)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 13 giugno 2026
    Bari
    25
    62
    86
    19
    37
    Cagliari
    03
    65
    84
    69
    63
    Firenze
    84
    34
    83
    08
    26
    Genova
    19
    29
    90
    53
    32
    Milano
    75
    70
    86
    51
    35
    Napoli
    46
    48
    68
    37
    19
    Palermo
    16
    39
    87
    84
    74
    Roma
    29
    42
    65
    54
    80
    Torino
    77
    67
    68
    57
    45
    Venezia
    05
    82
    85
    42
    19
    Nazionale
    75
    27
    45
    33
    39
    Estrazione Simbolotto
    Napoli
    42
    15
    27
    08
    41
Indietro
Alto