Selasa, 06 Oktober 2015

Terinspirasi Dari Fast & Furious 6

Siapa yang belum nonton Fast & Furious 6 ?
Dalam film ini, Dom (Dominic Toretto) kembali bertemu dengan Letty (Leticia Ortiz) dimana saat itu Letty sedang kehilangan ingatan karena kecelakaan (Cerita Lebih lengkapnya ada di Fast & Furious 4).
Dom ingin untuk mengajak Letty pulang, Demi menyatukan keluarganya kembali.
Satu kata yang sempat saya ingat dan dikatakan oleh Dom adalah "Kau tak boleh mencampakkan keluarga. Bahkan saat keluarga mencampakkanmu."
Kita semua punya keluarga masing - masing, terkadang ada saat dimana kita pernah dimarahi oleh orang tua, dan kita sendiri yang marah (baik langsung atau dipendam).
Saya juga pernah begitu, saya terkadang disaat seperti itu ingin sekali untuk tidak dilihat, tapi terkadang terbayang juga apa yang pernah orangtua lakukan buat saya, semua pengorbanan mereka, semua tawa dan tangis mereka, semua begitu berarti, karena mereka keluarga saya.
Jangan abaikan keluarga, mereka mungkin menyebalkan tapi mereka adalah yang pertama kali ada untukmu.....
Camkan ini, dan ketahuilah bahwa keluargamu begitu berarti......
Karena keluarga adalah anugerah, bersyukurlah selama anda masih memiliki keluarga, karena cinta yang pertama kali anda dapatkan berasal dari sebuah keluarga.....

Fungsi Select Case di Visual Studio 2010

Select case jika diartikan per kata berarti pilih kasus, ya......
Sebenarnya fungsi Select Case sama seperti fungsi If-Then-Else, hanya saja dalam Select Case apa yang akan terjadi selanjutnya menggunakan case
OK, untuk fungsi Select Case saya membuat program untuk mengetahui nilai huruf dari nilai angka, penampakannya seperti ini :
Sederhana bukan? bentuk tampilan formnya seperti ini
berikutnya adalah statement penamaan untuk masing - masing elemen :
Me.Text = "Select Case"
Label1.Text = "Nilai"
Button1.Text = ">"
Label2.Text = "-----"
Agar saat tombol diklik, maka akan keluar nilai hurufnya, saya memasukkan statement ini
Select Case angka
Case 80 To 100
       Label2.Text = "A"
Case 70 To 79
       Label2.Text = "B"
Case 60 To 69
       Label2.Text = "C"
Case 50 To 59
       Label2.Text = "D"
Case 0 To 49
       Label2.Text = "E"
End Select
jadi, syntax dari Fungsi Select Case adalah
Select Case kondisi
Case kondisi1
pernyataan
Case kondisi2
pernyataan
Case kondisi(n)
pernyataan
End Select
saya juga menggunakan fungsi Dim As di  program ini dimana variabel "angka" adalah angka dari TextBox1, penggunaannya seperti ini
Sehingga saat di debug, saya masukkan angka 65
dan nilai hurufnya adalah

Mudah bukan?