Membuat Bilangan Prima Di Visual Studio 2010
Bilangan prima adalah bilangan lebih besar dari 1 yang hanya dapat dibagi oleh dua bilangan berbeda, yakni bilangan itu sendiri dan 1. Dengan kata lain, bilangan prima tidak dapat difaktorisasi menjadi bilangan lain.
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x
Dim z
Dim y
Dim hasil
ListBox1.Items.Clear()
For x = 2 To 100
z = 0
For y = 2 To x
hasil = x Mod y
If hasil = 0 Then
z = z + 1
End If
Next y
If z <= 1 Then
ListBox1.Items.Add(x)
End If
Next x
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub
End Class
Komentar
Posting Komentar