Info




SELAMAT DATANG DI WEB Haris Gudang Ilmu



Selamat datang di Web Side saya , saya harap anda senang berada di Web sederhana ini. Web ini saya tulis dengan komputer yang sederhana dan koneksi internet yang juga sederhana. Saya berharap Anda sering datang kembali. Silahkan anda mencari hal-hal yang baru di blog saya ini. Terima Kasih



SEKILAS HARIS GUDANG ILMU



Nama saya Mohammad Haris saya seorang yang mempunyai Web Side ini . Saya mulai belajar blogger sejak bulan Oktober 2009, dan blog ini saya buat pada bulan January 2009. Terimakasih Atas Kunjungannya.Follow Grup saya di https://www.facebook.com/harisgudangilmu?ref=hl







Exit
Jangan Lupa Klik Like Ya

Social Icons

My Biodata Admin



Nama:Muhammad Haris Yuliandra
Angkatan Ke 2 Anak Didikan Dari
Sekolah SMK Negri 1 Kutalimbaru
Sudah Tamat

Selamat Bergabung Di Blog Saya






selamat berkujung di blog saya semoga apa yang saya berikan kepada anda semoga bermanfaat

Jumat, 01 November 2013

CARA MEMBUAT PROGRAM PEMESANAN MAKANAN DENGAN VB


kali ini saya akan menjelaskan bagaimana caranya untuk membuat program

yang berfungsi untuk memesan menu makanan secara Online atau  saya sebut dengan “Café Harajuku”.mungkin seringkali kita melihat pemesanan  makanan via telpon ataupun secara langsung.di program kali ini saya membuat login untuk member tetap atau bisa disebut pelanggan “Café Harajuku” agar bisa masuk dan memesan secara online.karena itu saya membuat program ini pada Microsoft visual basic dengan menggunakan Teknik Percabangan “Select ….Case” untuk menseleksi beberapa statement saat kondisi berlangsung atau sedang diproses misal saat kita memilih menu 2 maka otomatis statement 1 akan terlewati dan mengeksekusi statement 2 sehingga kondisi terpenuhi
Maka dari itu saya membuat beberapa menu sebagai pilihannya untuk itulah diperlukan Teknik percabangan untuk menseleksi menu-menu tersebut.pertama hal yang dilakukan ialah menyusun desain pada form 1 yang berfungsi untuk login saat ingin menggunakan aplikasi seperti pada Gambar2 lalu masukan komponen-komponen berikut dengan mendrag komponen tersebut ke dalam form yang telah kita buat ,berikut komponen-komponenya:
Text1(user)                         Command3(keluar)
Text2(pass)                             Label1(judul)                 
Command1(ok)
Command2(hapus)
Lalu setelah itu dimulai dari tombol login yang berfungsi untuk masuk atau mengaktifkan login saat kita selesai mengisikan nama dan password dengan cara mendouble klik pada Command1(login) lalu masukan koding berikut:
Private Sub ok_Click()
If user.Text = "Jhens" And pass.Text = "999" Then
MsgBox "Hai" + " " + user.Text, 3, "Welcome to my kafe"
Unload Me
Form2.Show
Else:
MsgBox "Wrong Input", 3, "try again"
End
End If
End Sub
Disini fungsi “IF” sendiri adalah untuk mengaktifkan tombol login saat diklik sehingga memunculkan Message dengan cara menambahkan MessageBox pada statement .namun kita harus menutup password  tersebut agar saat diketik menjadi tidak terlihat atau menjadi tanda * dengan cara klik komponen Text2(password)lalu klik password char pada properties dan ubah teks kosong menjadi * dengan mengklik dan ketik * seperti gambar berikut.
 




setelah itu beralih ke tombol hapus yang berfungsi untuk menghapus riwayat pada saat user salah memasukan password atau user name maupun lainnya dengan cara menambahkan 
Koding pada tombol Command3(hapus) double klik lalu masukan koding berikut:
Private Sub hapus_Click()
nama.Text = ""
password.Text = ""
End Sub
Setelah itu beralih ke tombol keluar dengan cara mendouble klik komponen Command2(keluar)
Lalu masukan koding berikut dengan mendouble klik
Private Sub keluar_Click()
End
End Sub
Namun di program login kali ini saya tidak melakukan perubahan pada tulisan di label dengan mengklik namun menggunakan koding agar lebih bagus lagi cara nya dengan mengetikan koding berikut di dalam form1 :
Private Sub Form_Load()
judul.Caption = "LOGIN HARAJUKU CAFE"
Label2.Caption = "USERNAME"
Label3.Caption = "PASSWORD"
judul.Font.Size = 14
judul.Font = "Castelar"
Label2.Font.Size = 12
Label2.Font = "Times New Roman"
Label3.Font.Size = 12
Label3.Font = "Times New Roman"
ok.Font.Size = 12
ok.Font = "Comic Sans Ms"
keluar.Font.Size = 12
keluar.Font = "Comic Sans Ms"
hapus.Font.Size = 12
hapus.Font = "Comic Sans Ms"
End Sub
Setelah itu beralih ke aplikasi utama yang menggunakan teknik percabangan Select…case fungsi teknik ini sendiri ialah untuk menyeleksi menu saat dipilih jika memilih 2 maka statement menyeleksi statment1.maka dari itu hal pertama yang dilakukan ialah buat desain seperti Gambar3  lalu masukan komponen-komponen berikut dengan cara mendragnya kedalam form2
Text1(makanan)                      Command1(masuk)                
Text2(minuman)                      Command2(hapus)
Text3(hasil)                             Command3(keluar)
Lalu double klik pada Command1(masuk) yang berfungsi untuk memproses Text1(makanan) dan Text2(minuman)            saat di input dan masukan koding berikut ini
Dim food As String
Dim drink As Integer
Dim a As Integer
Dim b As Integer
Dim total As Integer
Dim totalharga As String
Private Sub masuk_Click()
Dim a As Integer
Dim b As Integer
Dim food, drink As String
Dim total, totalharga As String
Select Case makanan.Text
Case Is = 1
food = Label4.Caption
a = 15000
Case Is = 2
food = Label5.Caption
a = 10000
End Select
Select Case minuman.Text
Case Is = 1
drink = Label6.Caption
b = 7000
Case Is = 2
drink = Label7.Caption
b = 5000
End Select
totalharga = a + b
hasil.Text = food + " dan " + drink + " Total harganya adalah " + totalharga
End Sub
Fungsi DIM sendiri adalah untuk mendeklarasikan variable misal kita ingin mengalikan a dengan b yang merupakan variabel yang bisa dihitung maka kita harus mendeklarasikan variable itu dengan ”Dim a as  integer” dan fungsi percabangan Select…Case sendiri ialah agar saat kita menginput pilihan menu 1 otomatis select case akan mengeksekusi statement 1 yaitu
 food = Label4.Caption
a = 15000
bila tidak maka statement yang lain akan terus diseleksi hingga kondisi terpenuhi.
Begitu juga seterusnya pada kotak text minuman setelah selesai dengan tombol choice maka kita beralih ke tombol hapus yang berfungsi untuk menghapus riwayat saat kita selesai menginput yaitu dengan cara mendouble klik pada Command2(hapus) dan masukan koding berikut ini :
Private Sub hapus_Click()
makanan.Text = " "
minuman.Text = " "
hasil.Text = " "
End Sub
Lalu setelah selesai otomatis pelanggan akan kembali ke awal login bukan untuk itu kita harus memberi perintah pada tombol back agar saat di klik tombol tersebut memindahkan aplikasi café harajuku ke menu login kembali maka masukan koding berikut ini dengan cara mendouble klik pada Command3(keluar)
Private Sub keluar_Click()
Form1.Show
Form2.Hide
End Sub
Lalu jalankan program tersebut dengan mengklik start atau F5 lalu hasil dan output nya adalah seperti berikut

Kamis, 31 Oktober 2013

16 Tense cara cepat menguasai Bahasa Inggris

Tenses bahasa Inggris - Pada pelajaran kali ini saya akan menjelaskan tentang 16 rumus tenses dalam bahasa Inggris terlebih dahulu, jika anda sudah benar benar paham, maka anda bisa lanjut ke bagai mana cara menghafalkannya yang mudah. Sebelum anda mempelajari ini, sebaiknya anda menyempatkan untuk membaca tentang tenses terlebih dahulu, karena jika anda mengalami istilah yang anda tidak tahu, anda bisa melihatnya disana. Saya sudah menjelaskan semuanya secara sangat rinci disana. Jika anda belum membacanya, silahkan lihat => di bawah ini


LInk Tense English

Future perfect continuous tense 

Tenses bahasa Inggris – Pada kesempatan kali ini saya akan menjelaskan tentang Future perfect continuous tense. . Sebelumnya saya sarankan

Future perfect Tense 

Tenses bahasa Inggris – Dalam pelajaran kali ini kita akan membahas tentang Future perfect Tense.  Sebelumnya saya sarankan anda tela...

Future perfect continuous tense


Ada kesempatan kali ini saya akan menjelaskan tentang Future perfect continuous tense.. Sebelumnya saya sarankan anda telah membaca pelajaran sebelumnya mengenai simple present tense, karena semua penjelasan detail mengenai unsur unsur yang ada dalam present continoous tense ini sudah dipaparkan secara rinci disana. Seperti apa itu kalimat verbal dan kalimat nominal, penempatan subjek, pasangan to be yang digunakan dan lain lain. Jika anda belum pernah membuka pelajaran tersebut sebelumnya, silahkan anda baca terlebih dahulu simple present tense.
Jika anda sudah selesai membaca, mari kita simak pemaparan berikut.

Future perfect Tense

Dalam pelajaran kali ini kita akan membahas tentang Future perfect Tense.  Sebelumnya saya sarankan anda telah membaca pelajaran sebelumnya mengenai simple present tense, karena semua penjelasan detail mengenai unsur unsur yang ada dalam present continoous tense ini sudah dipaparkan secara rinci disana. Seperti apa itu kalimat verbal dan kalimat nominal, penempatan subjek, pasangan to be yang digunakan dan lain lain. Jika anda belum pernah membuka pelajaran tersebut sebelumnya, silahkan anda baca terlebih dahulu simple present tense
Jika anda sudah selesai membaca, mari kita simak pemaparan berikut.

Future Continuous Tense

Dalam pelajaran kali ini saya akan menjelaskan tentang Future Continuous Tense. Sebelumnya saya sarankan anda telah membaca pelajaran sebelumnya mengenai simple present tense, karena semua penjelasan detail mengenai unsur unsur yang ada dalam present continoous tense ini sudah dipaparkan secara rinci disana. Seperti apa itu kalimat verbal dan kalimat nominal, penempatan subjek, pasangan to be yang digunakan dan lain lain. Jika anda belum pernah membuka pelajaran tersebut sebelumnya, silahkan anda baca terlebih dahulu simple present tense.
Jika anda sudah selesai membaca, mari kita simak pemaparan berikut.

Simple Present Tense

Simple Present Tense adalah waktu sekarang dalam bentuk sederhana. Seperti yang telah saya jelaskan sebelumnya bahwa kalimat ada 2 macam, yaitu kalimat Verbal dan kallimat Non-verbal (Nominal). Kalimat verbal adalah kalimat yang menggunakan kata kerja, sedangkan kalimat nominal adalah kalimat yang tidak menggunakan kata kerja. Untuk lebih jelasnya mengenai kalimat verbal dan kallimat non-verbal, selahkan klik disni => Kalimat verbal dan kalimat nominal. Setiap bentuk tenses bisa dipastikan mempunya 2 jenis rumus, jenis verbal dan jenis nominal.

Cara Merubah Background/Layout Facebook (KHUSUS BUAT PC)


Pada saat ingin merubah layout Facebook, kmu harus menggunakan PC dan browsernya harus Mozilla Firefox. lagsung aja nih caranya...

1. masuk ke Mozilla Firefox, lalu download add-ons mozzila yang bernama "Stylish". downloadnya disini

2. jika pada saat setelah men-Download stylish dan disitu muncul perintah untuk me-Restart Mozilla ikuti aja. tinggal klik tombol "restart now" yg ada disitu.

3. setelah Stylish tadi udah berhasil terinstall, lanjut ke jenis layout/tema yang ingin kmu pake, layout ini juga harus download dulu. downloadnya disini. ada ratusan jenis tema yg bisa kmu pake. cara downloadnya, pilih dulu jenis layout, lalu klik "install with stylish"/"Load Into Stylish".

4. login ke facebook kamu, apabila berhasil secara otomatis tanpilan facebookmu udah berubah...
contoh:


Senin, 28 Oktober 2013

MEMBUATPROGRAM PORT PARALEL LED BERJALAN DENGAN VB

1. Buatlah hardwarenya dengan 12 buah led dimana 8 led pertama sambungkan dengan pin data (2-9) dan 4 led trakhir sambungkan dengan pin control (1,14,16,17) jangan lupa tambahkan resistor dan penyambungan system katoda.
2. Buat project baru kemudian tambahkan 12 shape untuk simulasi lednya, 1 label untuk judul kemudian 5 commandbutton dan 4 buah timer.
3. Kemudian desain lah menjadi seperti gambar berikut :
4. Atur properties masing-masing komponen seperti untuk shape backstyle ubah menjadi 1-opaque kemudian backcolornya pilih warna putih kemudian unutk timer semua interval beri nilai 100 dan dalam keadaan false.
5. Save project dan Form di folder yang sama lalu copykan inpout32.dll pada folder tempat penyimpanan tersebut.

MEMBUAT PROGRAM SIMULASI LAMPU LALU LINTAS DENGAN VISUAL BASIC


1.     Langkah pertama buka program Visual Basic
2.     Pilih standar.exe untuk New Project kemudian Klik Open

VB 6.0

3.     Tambahkan 5 Label 1 label untuk judul dan 4 label untuk waktu masing-masing simpang, 4 frame untuk masing-masing simpang dan 12 shape dimana atur properti fillstyle mendaji solid dan fillcolor pilih warna yang sesuai serta satu buah timer dan desainlah menjadi seperti gambar dibawah ini :

simulasi lampu lalu lintas dengan vb

4.     Ubah Properti Interval pada control Timer dengan memasang nilai 1000 dan dalam keadaan false.
5.     Masukkan kode program seperti dibawah ini :

MEMBUAT PROGRAM KALKULATOR DENGAN VISUAL BASIC

Bagi anda yang sering memanfaatkan kalkulator yang merupakan bagian adri aksesoris Windows, mungkin pernah berkeinginan untuk membuat kalkulator sendiri dan mungkin pula keinginan anda tersebut belum terwujud, karena anda belum tahu cara membuatnya.
          Dengan Tip berikut ini, anda akan dapat mewujudkan keinginan tersebut, karena membuat kalkulator dengan visual basic tidak sesulit bayangan anda.