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
    martedì 04 agosto 2026
    Bari
    40
    77
    49
    65
    43
    Cagliari
    75
    06
    03
    62
    15
    Firenze
    42
    04
    69
    27
    43
    Genova
    05
    47
    57
    50
    89
    Milano
    37
    88
    01
    85
    42
    Napoli
    33
    28
    45
    18
    23
    Palermo
    04
    70
    38
    58
    85
    Roma
    62
    18
    28
    59
    43
    Torino
    86
    24
    40
    34
    61
    Venezia
    25
    12
    78
    53
    39
    Nazionale
    49
    07
    65
    62
    70
    Estrazione Simbolotto
    Nazionale
    35
    24
    36
    05
    12
Indietro
Alto