在Visual Basic（VB）中，判断一个数是否为素数可以通过以下步骤实现：
1. 获取用户输入的整数。
2. 从2遍历到这个数的平方根。
3. 检查输入的数是否能被遍历中的任何数整除。
4. 如果不能被整除，则该数是素数；否则，不是素数。
```vb
Private Sub Command1_Click（）
Dim n As Integer
Dim i As Integer
n = Val（Text1.Text）
For i = 2 To Int（Sqr（n））
If n Mod i = 0 Then
Text2.Text = n & " 不是素数"
Exit For
End If
Next i
If i > n - 1 Then
Text2.Text = n & " 是素数"
End If
End Sub
```
在这段代码中，`Text1.Text` 是用户输入的数值，`Text2.Text` 用于显示结果。程序首先将输入的字符串转换为整数，然后从2遍历到这个数的平方根，检查是否有因子。如果找到因子，则输出“不是素数”；如果遍历结束都没有找到因子，则输出“是素数”。
请注意，这个算法假设输入的是一个正整数。在实际应用中，你可能需要添加一些错误检查来确保输入的有效性。