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.