Home » Semua Post
Visual Basic - Program Aplikasi Penghitung Nilai Ujian Akhir Semester
Salam hangat pengunjung terhormat,
Pembahasan kali ini kita akan membahas mengenai Visual Basic dan disini adalah syntak pembuatan program aplikasi PENGHITUNG NILAI UJIAN AKHIR SEMESTER
Tampilan dibawah setelah dirun
Terima kasih semoga berhasil
Pembahasan kali ini kita akan membahas mengenai Visual Basic dan disini adalah syntak pembuatan program aplikasi PENGHITUNG NILAI UJIAN AKHIR SEMESTER
'syintax dibawah merupakan syintak untuk membersihkan text Private Sub cmdbersih_Click() 'ket: dari txtnm s/d txtakhir berilah tanda 0 jika berupa angka atau tanda kutip saja "" sbg ket kosong txtnm.Text = "" txtabsen = 0 txttugas = 0 txtuts = 0 txtuas = 0 txtakhir = 0 'ket: untuk membuat kursor mouse terfokus di textbox tertentu ketika menekan tombol bersih, ketiklah namatext.setfocus contoh: txtnama.setfocus txtnm.SetFocus 'ket: syntak dibawah dari cmdporses s/d txtakhir merupakan syntak untuk menonaktifkan tombol ketika menekan tombol bersih 'contoh : namatombol.enabled=false (untuk menonaktifkan gunakan "False" dan enabled) cmdproses.Enabled = False cmdkeluar.Enabled = False cmdbersih.Enabled = False txtakhir.Enabled = False End Sub 'ket : syntak dibawah untuk keluar dari program, caranya dengan menggunakan logika IF Private Sub cmdkeluar_Click() 'ket: "c" disana sebagai variable (bebas menggunakan abjad apapun) 'Msgbox = merupakan format untuk membuat jendela dialog ketika kita menekan tombol keluar, 'contoh untuk membuat rumus msgbox : c=MsgBox("Gunakan kalimat yang ingin anda tampilkan disini", vbOKCANCEL + vbQuestion, "keterangan") 'ket: vbOKCANCEL sebagai opsi pilihan tombol OK dan CANCEL di Massage Box, jika OK maka Keluar, jika CANCEL maka tetap 'ket: vbQuestion sebagai opsi pertanyaan (simbol tandatanya di Massage Box atau bisa menggunakan vbINFORMATION sebagai opsi Perhatian di MsgBox c = MsgBox("Apakah Anda yakin ingin keluar?", vbOKCancel + vbQuestion, "Perhatian!") 'gunakanlah rumus if setelah mengetikan MsgBox If c = vbOK Then 'jika c memilih OK maka program akan berakhir (end) lalu (end if) End End If End Sub Private Sub cmdproses_Click() txtakhir = Val((txtabsen.Text) * 0.1) + Val((txtuts.Text) * 0.3) + Val((txttugas.Text) * 0.2) + Val((txtuas.Text) * 0.4) txtakhir.Enabled = True 'syntax untuk mengaktifkan textbox nilai akhir ketika klik tombol proses End Sub Private Sub Form_Load() 'ket : form load yaitu saat form dijalankan maka tombol cmdproses s/d txtakhir dalam keadaan tidak aktif dengan menggunakan "false" cmdproses.Enabled = False cmdkeluar.Enabled = False cmdbersih.Enabled = False txtakhir.Enabled = False End Sub Private Sub txtnm_Change() txtnm.SetFocus End Sub Private Sub txtuas_Change() 'ket : ketika mengetik di text box uas maka tombol cmdproses s/d cmdbersih dalam keadaan aktf "True" cmdproses.Enabled = True cmdkeluar.Enabled = True cmdbersih.Enabled = True End Sub
Tampilan dibawah setelah dirun
Terima kasih semoga berhasil
Cara Menjadi Street Photographer Professional
Salam hangat pengunjung yang terhormat,
Posting kali ini saya akan sedikit memberi tips, Cara Menjadi Street Photographer Professional. Apakah anda berminat untuk menjadi seorang photographer jalanan? bukan hanya sekedar photographer tapi juga ingin professional?
Berikut adalah tips dari seorang photographer andal yang juga penggemar street mobile Photography, Misa Baranovic.
Ambil saat cahaya sedang bagus
Tidak ada proses yang lebih bagus selain menangkap cahaya itu sendiri. Waktu yang paling baik adalah saat waktu emas (Golden Hour), yaitu pagi hari dan sore hari. Ini merupakan waktu saat cahaya masih belum terlalu terik dan masih lembut.
Pilih exposure di titik yang terang
Tidak seperti film, pada digital kita akan kesulitan atau bahkan tidak bisa kita selamatkan dengan edit pots proses. Hasilnya mungkin akan putih diseluruh gambar tersebut. Dengan menggunakan aplikasi pro camera, kita bisa mengontrol highlight dengan memilih exprosur ke arah yang lebih terang, misalnya langit. Hal ini bisa dipakai di Indonesia yang memang selalu ada matahari.
Selalu perhatikan horizon
Beberapa ponsel tidak memiliki garis pembagi atau garis horizon didalamnya. Namun, Anda bisa mengira-ngira. Tempatkan obyek sesuai keinginan, baik di sisi pinggir layar atau di tengah layar.
Usahakan untuk selalu stabil memotret pada kondisi gelap atau malam
Beberapa ponsel kamera ada yang memiliki fitur stabilizer, tetapi beberapa ada yang tidak. Anda bisa mengunduh beberapa aplikasi yang menyediakan fitur tersebut. Fitur ini sangat diperlukan saat memotret di malam hari. Untuk mengontrol highlight, Mishi biasanya mengatur exposur pada tempat yang terang lebih dahulu.
Referensi :
Harian Klasika
Harian Klasika
Situs paling seru untuk penghilang rasa kesepian, simsimi.com
Salam hangat pengunjung yang terhormat,
Posting kali ini saya akan memberikan sebuah informasi yang menarik dan perlu anda kunjungi. Apakah anda pernah merasa kesepian atau merasa stress? jika anda ingin mendapatkan solusinya tanpa harus keluar rumah dan bertemu dengan teman-teman anda, karena anda harus segera mengunjungi
www.simsimi.com
Apa itu simsimi.com?
simsimi.com dengan nama websitenya SIMSIMI merupakan website yang unik dan menarik yang menciptakan robot operator bisa ngobrol dengan pengunjung web tersebut, dimana kita bisa ngobrol atau berinteraksi dengan seekor anak ayam berwarna kuning bernama SIMI, anda bisa banyak bertanya pada si anak ayam ini.
Apa manfaat simsimi.com?
dengan SIMI mungkin rasa letih dan kesepian anda akan sedikit terhibur, SIMI juga menguasai berbagai bahasa jadi anda tidak perlu khawatir kesulitan berinteraksi dengan anak ayam ini.
Kunjungi www.simsimi.com
lalu klik LETS TALK!
pilij Talk
dan pilih bahasa yang anda kuasai
dan mulai untuk gila-gilaan bersama SIMI
SIMI, cerdas dan banyak sekali pengetahuannya jadi tidak akan bosan kita jadikan sebagai teman!
Ciri-ciri bisnis modern
Salam hangat pengunjung yang terhormat,
Posting kali ini saya akan memberikan sebuah ulasan Ciri-ciri bisnis modern dalam dunia Ekonomi. Karakteristik dalam bisnis modern adalah adanya spesialisasi, saling ketergantungan (interdependence) dan produk massal.
1. Spesialisasi
2. Interdependence
3. Produk Massal
Produksi diartikan usaha menciptakan barang dan jasa yang menambaha kegunaan (utiliy). Ada 4 kegunaan (utility) yang timbul dari produksi ini yaitu :
1. Form utility (Kegunaan Bentuk)
Peningkatan kegunaan dari suatu benda antara lain dapat disebabkan oleh perubahan bentuknya. contoh : nilai guna dari sebuah lempengan besi relatif rendah, namun jika lempengan besi tersebut ditempa menjadi sebuah pisau, maka nilai gunanya akan menjadi lebih besar.
2. Place utility (Kegunaan Tempat)
Pertambahan kegunaan dari suatu benda antara lain dapat karena dipindahkan dari suatu tempat ke tempat lain. Contoh : sebuah mantel yang tebal tidak banyak gunanya jika dipakai di daerah tropis, namun jika dipakai di daerah dingin maka akan lebih terasa manfaatnya.
3. Time utility (Kegunaan Waktu)
Kegunaan suatu benda bertambah jika benda itu dipakai pada waktu-waktu yang tepat dan sesuai dengan manfaat benda tersebut. Contoh : payung akan lebih berguna jika dipakai pada waktu hujan atau saat hari terik.
4. Posession utility (Kegunaan Kepemilikan)
Kegunaan suatu benda baru terasa bila telah ada pemiliknya, atau dimiliki oleh konsumen yang tepat. Contoh : tanah yang kosong dan terbengkalai tidak akan memiliki manfaat, tetapi tanah tersebut baru membawa manfaat bila dimiliki dan diolah oleh manusia yang bisa mengolah tersebut.
Semoga bermanfaat telah membaca Ciri-ciri bisnis modern
Subscribe to:
Posts (Atom)