Novità

[AIUTO!] Concatenare stringhe in spaziometria

cybercesare

Junior Member
Salute a tutti.

Volevo cortesemente sapere da voi esperti, in spaziometria, come trasformare in stringa due numeri (ipotizziamo n1, n2), poi concatenare le due stringhe ottenute e infine trasformare l'unione in valore numerico.
GRAZIE.
 
Ultima modifica:
Buongiorno,
Provi queste soluzioni.
Codice:
Option Explicit
Sub Main
    'Volevo cortesemente sapere da voi esperti, In spaziometria, come trasformare In stringa due numeri (ipotizziamo n1, n2),
    'poi concatenare le due stringhe ottenute e infine trasformare l'unione in valore numerico.
    'GRAZIE.
    Dim n1,n2,n3(2)
    Dim num01,num02,num03
    '
    '
    n1 = 10
    n2 = 90
    n3(01) = n1
    n3(02) = n2
    '
    '
    'come trasformare In stringa due numeri (ipotizziamo n1, n2)
    num01 = Array(n1,n2)
    Scrivi StringaNumeri(num01,,True)
    Scrivi StringaNumeri(n3,,True)
    '
    '
    'poi concatenare le due stringhe ottenute
    num02 = n1 & n2
    Scrivi num02
    '
    '
    'e infine trasformare l'unione in valore numerico
    num03 = Fuori90(num02)
    Scrivi num03
End Sub
 

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 18 dicembre 2025
    Bari
    72
    48
    90
    14
    52
    Cagliari
    11
    78
    87
    47
    53
    Firenze
    50
    08
    32
    71
    74
    Genova
    20
    18
    09
    76
    07
    Milano
    13
    34
    68
    07
    16
    Napoli
    75
    61
    50
    16
    10
    Palermo
    32
    44
    38
    16
    70
    Roma
    13
    67
    32
    44
    69
    Torino
    45
    64
    49
    37
    63
    Venezia
    81
    19
    30
    79
    36
    Nazionale
    21
    85
    89
    35
    77
    Estrazione Simbolotto
    Venezia
    38
    12
    34
    27
    24

Ultimi Messaggi

Indietro
Alto