INTRODUCCION A VB6.0 (02)

INTRODUCCION A VB6.0 (01)

HISTORIA DE WILL GATES

RACIONALIZACION

HISTORIA DE LA COMPUTADORA

CONECTAR ACCESS CON .NET

NUMEROS PRIMOS EN VB.NET

Un número es primo únicamente cuándo es divisible entre uno y el mismo, evaluamos este proceso con un if, y un for, y claro se muestra el resultado con un messagebox.show

Diseño:

Codigo:
Dim p As Integer
p = Val(TextBox1.Text)

For i = 1 To p
   If (i <> 1 And i <> p) Then
       If (p Mod i) = 0 Then
           MessageBox.Show("no")
           Exit Sub
       End If
   End If
Next
MessageBox.Show("Si")

Pueden escribir sus comentarios o dudas.