在文本框textBox1中输入一个正整数，单击“判断”按钮，就可以判断输入的数是否为素数，

Question

判断的结果在label控件中输出。用WINFORM做。财富值就剩这么多了，大家帮帮忙！
界面大概是这个样子的。急急急急急急急急急、、、、、、、

Answer 1

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim m, i As Long
i = 0
m = Val(TextBox1.Text)
For i = 2 To m - 1
If (m Mod i) = 0 Then
Label1.Text = "这个数不是素数"
Exit For
End If
Next
If i = m Then Label1.Text = "这个数是素数"
End Sub

Answer 2

Private Sub command_Click
Dim m, i As Long
i = 0
m = Val(TextBox1.Text)
For i = 2 To m \2
If (m Mod i) = 0 Then
Label1.Text = "这个数不是素数"
Exit For
End If
Next
If i = m Then Label1.Text = "这个数是素数"
End Sub本回答被网友采纳

Answer 3

public MainWindow()
{
InitializeComponent();
}
Boolean b = true;
private void 判断_Click(object sender, RoutedEventArgs e)
{
int s = int.Parse(textBox1.Text);
for (int i = 2; i < s / 2; i++)
{
if (s % i == 0)
b = false;
}
if (b) MessageBox.Show(s + "是素数");
else MessageBox.Show(s + "不是素数");
}