Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
beh forse dovresti fare cosė, se i due numeri sono le variabili Primo e Secondo
Private Sub Form_Load()
Dim i As Long, j As Long, Primo As Integer, Secondo As Integer, Mcm As Integer
Primo = 6
Secondo = 8
For i = 1 To 10000000
For j = 1 To Primo * i
If Primo * i = Secondo * j Then
Mcm = Primo * i
MsgBox Mcm
GoTo Fine
End If
Next j
Next i
Fine:
End Sub
ho fatto 5 o6 prove e dovrebbe andare attento a che numeri metti pero' casomai si impalla tutto!!!
