Question

Como hacer un programa de numeros primos en visual basic 6.0? !

Answer 1

bueno ya lo tengo abre visual y en el formulario vas a colocar un boton un textbox y un label en el boton copiaras el siguiente codigo


Dim r As Double
Dim c, i As Integer
For i = 1 To Val(Text1.Text)
r = Val(Text1.Text)Mod i
If r = 0 Then
c = c + 1
End If
Next
If (c <= 2) And (c <> 1) Then
Label1.Caption = "el número es primo"
Else
Label1.Caption = "el número no es primo"
End If