Membuat Program Menentukan Bilangan Prima di Visual Basic 6.0
Dalam matematika, bilangan prima adalah bilangan asli yang lebih besar atau sama dengan 1, yang faktor pembaginya hanya bilangan 1 dan bilangan itu sendiri. 2 dan 3 adalah bilangan prima. 4 bukan bilangan prima karena 4 bisa dibagi habis 2. Bilangan prima merupakan salah satu jenis bilangan yang bisa dibilang cukup banyak bermanfaat dan penerapannya dalam kehidupan sehari-hari. Meskipun disamping itu belum ada formula khusus yang dapat digunakan untuk menentukan bilangan prima secara umum.
Jika kita sudah mengenal bilangan prima, maka ada pula bilangan dimana bilangan tersebut lebih besar dari satu dan bukan merupakan bilangan prima, bilangan itu disebut bilangan komposit.
Cara paling sederhana untuk menentukan bilangan prima yang lebih kecil dari bilangan tertentu adalah dengan menggunakan saringan Eratosthenes yang ditunjukkan oleh gambar berikut.
Selain itu untuk memudahkan, kamu bisa membuat sendiri aplikasi di PC untuk menentukan apakah sebuah bilangan merupakan bilangan prima atau buka. Dengan kata lain membuat aplikasi prime number checker, yang mampu memeriksa suatu bilangan prima atau bukan. Silakan ikuti langkah-langkah berikut ini:
- Buka aplikasi Visual Basic 6.0 di PC kamu
- Buatlah sebuah project yang berisi sebuah form
- Tambahkan sebuah Textbox, sebuah Command Button, dan sebuah Label
- Susun sesuai keinginan kamu, contohnya seperti gambar berikut:
- Masukkan kode berikut pada project tersebut
- Setelah itu coba jalankan dan lihat hasilnya
Private Sub Command1_Click()
Dim a As Integer
Label1.Caption = ""
a = Val(Text1.Text)
If Text1.Text = "" Then
Label1.Caption = "Masukkan bilangan yang benar"
Label1.ForeColor = &HFF&
ElseIf a < 2 Then
Label1.Caption = (Str(a) + " bukan bilangan prima")
Label1.ForeColor = &HFF&
ElseIf a = 2 Then
Label1.Caption = ("2 adalah bilangan prima")
Label1.ForeColor = &HC000&
Else
n = 2
Do
h = a Mod n
If h > 0 Then
n = n + 1
Else
Label1.Caption = (Str(a) + " bukan bilangan prima")
Label1.ForeColor = &HFF&
n = n + a
End If
Loop Until n >= a
If n = a Then
Label1.Caption = (Str(a) + " adalah bilangan prima")
Label1.ForeColor = &HC000&
End If
End If
Text1.Text = a
End Sub
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 8 Then
KeyAscii = KeyAscii
ElseIf KeyAscii = 46 Then
KeyAscii = KeyAscii
ElseIf KeyAscii < 47 Or KeyAscii > 58 Then
KeyAscii = 0
End If
End Sub
Dengan menggunakan program tersebut kamu bisa menentukan apakah sebuah bilangan merupakan bilangan prima atau buka dengan mudah dan cepat. Selain itu untuk lebih mudahnya, kamu bisa download hasil program tersebut secara langsung melalui link: Google Drive.
Itulah beberapa langkah yang bisa kamu lakukan untuk membuat program prime checker menggunakan aplikasi Visual Basic 6.0, atau dengan kata lain aplikasi yang dapat memeriksa bilangan prima.
Semoga artikel ini bisa bermanfaat untuk kamu, jika ada hal yang kurang jelas, maka jangan sungkan untuk menyampaikan komentar kamu di bawah atau melalui halaman contact blog ini. Terima kasih dan sampai jumpa!
Posting Komentar untuk "Membuat Program Menentukan Bilangan Prima di Visual Basic 6.0"
Silakan sampaikan komentar kamu dengan mematuhi syarat dan ketentuan berikut:
Diperbolehkan menggunakan link, selama tidak mengarah pada situs yang mengandung perjudian, pornografi, dan konten ilegal lain. Tidak diperbolehkan promosi jualan, produk, jasa, dsb.
Tidak boleh menggunakan kata-kata yang kasar, tidak pantas, mengandung SARA, atau penghinaan. Diharapkan saling menghargai satu sama lain.
Setiap komentar segera diterbitkan setelah moderasi, pastikan komentar kamu sudah benar sebelum dipublikasikan dan backlink tidak akan dihilangkan oleh admin. Admin berhak menghapus komentar yang melanggar.
Blogwalking dan saling memberi salam diperbolehkan. Menerima pemasangan backlink dofollow, tautan ada di menu navigasi.
Gunakan <i rel="code">Text here</i> untuk komentar yang berisi kode singkat.
Gunakan <i rel="pre">Text here</i> untuk komentar yang berisi kode panjang.
Setiap komentar yang mengandung kode/sintaks dengan rel code/pre di atas, wajib di-parse terlebih dahulu pada menu Alat > Script Parse di menu navigasi di atas.
Kamu juga bisa memberikan komentar bergaya <b>cetak tebal</b> maupun <i>cetak miring</i>. Komentar dengan kode HTML selain cetak tebal/miring atau link tidak diperbolehkan untuk dipublikasikan.