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
    venerdì 16 ottobre 2026
    Bari
    13
    07
    33
    24
    26
    Cagliari
    41
    25
    22
    86
    82
    Firenze
    29
    82
    19
    73
    22
    Genova
    66
    84
    02
    41
    83
    Milano
    72
    48
    32
    25
    03
    Napoli
    46
    59
    14
    02
    22
    Palermo
    44
    17
    21
    38
    63
    Roma
    05
    47
    75
    34
    87
    Torino
    57
    46
    28
    01
    88
    Venezia
    45
    62
    64
    15
    58
    Nazionale
    28
    90
    30
    40
    36
    Estrazione Simbolotto
    11
    14
    05
    13
    24
Indietro
Alto