Program Menampilkan Bilangan Prima

1. Menggunakan Visual Basic yaitu Program Menampilkan bilangan Prima

2. Komponennya terdapat beberapa yaitu
- Label
        -  Button
- Text
- List
        -  Caption
        -  Back color
        -     Font

3. Alur Sistemnya yaitu ketika kita memasukan angka yang akan dicari bilangan prima maka kita harus menginputkan pembatas angka yang akan dicari. Setelah kita melakukan penginputan angka batasan maka klick Search yaitu mencari dimana program akan berjalan dengan mencari bilangan prima yang diinginkan sesuai dengan masukan angka pembatas. Setelah dicari maka terdapatlah output berupa bilangan prima yang terdiri dari angka batasan yang di inputkan. Dan ketika kita ingin mengganti angka masukan maka klik tombol clear yaitu untuk menghapus semua angka dan setelah itu memasukan kembali sesuai dengan angka yang diinginkan.

4. Tampilan Program













Masukan Program













Output Program













5. Berikut adalah listing programnya :

Private Sub cmdBersih_Click()
'Statment Untuk membersihkan form
List1.Clear 'Membersihkan listbox
txtCari.Text = "" 'Mengosongkan Text Cari
txtCari.SetFocus 'Kursor otomatis berada di Text Cari
End Sub

Private Sub cmdCari_Click()
batas = Val(txtCari.Text)
For x = 2 To batas
  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
    List1.AddItem x 'Menampilkan Hasil ke ListBox
    End If
Next x
End Sub

Private Sub cmdKeluar_Click()
'Keluar dari Program
Tutup = MsgBox("Terima Kasih Telah Menggunakan Program ini", vbOKOnly,"rahmat oulia")
Unload M
End Su
\
'Thanks For Using This Program
Private Sub Form_Load()

End Sub

Semoga bermamfaat .

0 komentar:

Posting Komentar