Author Topic: [Beginner] Bilangan ganjil atau genap ? - 2  (Read 6536 times)

0 Members and 1 Guest are viewing this topic.

Offline 1nf0rm4t1c5

  • Administrator
  • *
  • Posts: 1148
  • Reputasi: 15
  • Informatics Developer
    • Forum Informatika
  • Lokasi: Indonesia
  • Jenis Kelamin: Laki-laki
[Beginner] Bilangan ganjil atau genap ? - 2
« on: 11 March 2009, 14:05:59 »
Lanjutan dari versi 1 sebelumnya di:
http://if.web.id/visual-basic-vb/(beginner)-bilangan-ganjil-atau-genap/

Sekarang kita buat versi GUI (Graphic User Interface) yang lebih bagus.

1. Ambil satu form
2. Masukkan minimal 3 komponen:
  • Text1 - textbox ini digunakan untuk input data
  • Command1 - Button atau tombol untuk membangkitkan pemeriksaan bilangan yang diinputkan
  • Label1 - Label atau tulisan yang digunakan sebagai keterangan atau output hasil eksekusi

Tampilan awal:



Pada jendela / form Code, masukkan kode berikut:

Code:
Hanya pengunjung TERDAFTAR yang bisa melihat konten. Silakan melakukan Registrasi terlebih dahulu atau Login.
Perhatikan potongan kode bilangan = Val(Text1.Text)

Val digunakan untuk memastikan bahwa data input akan dijadikan data numerik, jadi kalau diisi huruf secara paksa akan otomatis diisi angkan 0 (nol).

Sebagai tambahan masukkan potongan berikut di bawahkode sebelumnya:

Code:
Hanya pengunjung TERDAFTAR yang bisa melihat konten. Silakan melakukan Registrasi terlebih dahulu atau Login.
Yaitu digunakan untuk memastikan bahwa karakter yang diketikkan dalam textbox Text1 adalah numerik.
Namun kekurangannya masih bisa copy/paste data huruf. Nanti kita sampaikan solusi lainnya.  ;)

Tampilan awal program.



Setelah dieksekusi dan diisi angka, akan muncul form seperti tampilan berikut:



Source code terlampir.
« Last Edit: 29 September 2017, 22:29:02 by 1nf0rm4t1c5 »

Forum Informatika

[Beginner] Bilangan ganjil atau genap ? - 2
« on: 11 March 2009, 14:05:59 »
Sponsored Links:


Offline 1nf0rm4t1c5

  • Administrator
  • *
  • Posts: 1148
  • Reputasi: 15
  • Informatics Developer
    • Forum Informatika
  • Lokasi: Indonesia
  • Jenis Kelamin: Laki-laki
[Beginner] Bilangan ganjil atau genap - Looping
« Reply #1 on: 11 March 2009, 14:10:13 »
Bilangan ganjil atau genap - Looping

Lanjutan tulisan sebelumnya, sekarang kita lanjutkan ke lebih berbentuk GUI, dan menggunakan pengulangan (looping)

Tampilan awal:



Di sini kita bisa memasukkan angka mulai dari batas bawah sampai batas atas yang kita kehendaki, sementara ini hanya bilangan bulat positif saja. Sebagai nilai default kita pilih angka 1 - 50, selanjutnya silakan diubah.



Tampilan di atas menunjukkan kita tidak memilih pilihan ganjil atau genap dan juga pilihan habis dibagi angka tertentu, sehingga sama juga kita hanya ingin menampilkan bilangan dari angka 1 sampai 50.



Tampilan di atas contoh kita memilih opsi tampilan bilangan genap saja.

Anda lihat di sebelah kanan form juga ada informasi jumlah bilangan yang ditemukan, total jumlah bilangan, dan rata2 dari deret yang ditemukan.

Gambar berikutnya, lebih ditingkatkan lagi penyaringannya:



Yaitu bilangan genap saja sekaligus yang habis di bagi 5 (dalam contoh), silakan Anda ganti dengan angka bulat positif berapapun.

Contoh terakhir:



Dari deret angka, disaring bilangan yang habis dibagi oleh bilangan yang Anda masukkan, contoh 5, tidak disyaratkan harus ganjil atau genap.

Source Code lengkap:

Code:
Hanya pengunjung TERDAFTAR yang bisa melihat konten. Silakan melakukan Registrasi terlebih dahulu atau Login.
Terlampir di attachment.
« Last Edit: 24 March 2010, 13:47:25 by 1nf0rm4t1c5 »

Offline dedi_alnas

  • Newbie
  • *
  • Posts: 9
  • Reputasi: 0
Re: [Beginner] Bilangan ganjil atau genap ? - 2
« Reply #2 on: 14 September 2009, 13:50:35 »
mana attachment source terlampirnya nih  :(

Offline macfamous

  • Bibit IF
  • *
  • Posts: 20
  • Reputasi: 0
    • Mainan Anak
  • Lokasi: Manchester
Re: [Beginner] Bilangan ganjil atau genap ? - 2
« Reply #3 on: 17 October 2009, 20:51:44 »
wow thx buangeet .. nih pas ma tugas kuliah saya .. hebaat euy :canadian: