números primos

[Marcrv]

Estoy intentando hacer un programa que calcule los numeros primos que hay dentro de un intervalo puesto por el usuario y quiero que los muestre en una label. Lo que tengo echo hasta ahora es esto:

Public Class Form1
Dim x As Integer
Dim i As Integer
Dim a As Integer
Dim n As Integer
Dim b As Integer
Dim c As Integer

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

i = Val(TextBox1.Text)
a = Val(TextBox2.Text)
Label1.Text = ""

For x = i To a
x=
b =
If (x / x) = Int(x / x) And (x / b) <> Int(n / b) Then Label1.Text = Label1.Text & x & " "
Next

End Sub
End Class


Quiero hacer algo con este estilo, solo sé lenguaje muy basico y el programa usado es el visual basic 2005.
No se que poner en "x" y "b" para que me detecte si es primo y se muestre depues en una label.

La ayuda es urgente, gracias de antemano.

[seba123neo]

Hola,fijate si te sirve esto:

Código:

Public Class Form1

    Dim x As Integer
    Dim i As Integer
    Dim a As Integer

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        i = Val(TextBox1.Text)
        a = Val(TextBox2.Text)
        Label1.Text = ""

        For x = i To a
            If Primo(x) = True Then
                Label1.Text = Label1.Text & x & " "
            End If
        Next

    End Sub

    Function Primo(ByVal Nro As Integer) As Boolean
        Dim i As Integer
        For i = 2 To Nro / 2
            If Nro Mod i = 0 Then
                Primo = False
                Exit Function
            End If
        Next
        Primo = True
    End Function

End Class

tambien le podrias poner que en el text1 no pueda escribir el 0 o el 1,ya que el primer primo es el 2.

saludos.