Selasa, 23 Agustus 2011

Fenomena Alam yang Aneh dan Dahsyat

Di Venezuela, Ada Petir Abadi Sepanjang Tahun





Sayangnya, fenomena petir abadi itu terganggu oleh El Nino yang menyebabkan kekeringan parah di negeri itu. (abcnews.go.com)
VIVAnews - Sebuah petir abadi misterius terjadi di Venezuela. Sebanyak 40 ribu kilatan merobek langit selama 9 jam pada 300 malam dalam setahun. Oleh warga setempat, fenomena ini dikenal sebagai “Relampago de Catatumbo,” atau “Petir Catatumbo”.
Penduduk asli dari Northwestern Venezuela sudah menyaksikan fenomena “tulang rusuk” atau “sungai api di langit” itu selama berabad-abad. “Saya melihat petir pertama ketika saya berusia 8 tahun,” kata Erik Quiroga, penduduk asli daerah itu, dikutip dari ABC News, 23 Agustus 2011.  More

Tertangkap Kamera, ‘Angsa’ Menakjubkan di Langit

Headline
dailymail.co.uk
INILAH.COM, London – Bagi tiap orang, awan nimbostratus atau cirrus bisa cuku membingungkan. Namun jelas sekali semua orang mengetahui menyerupai apa awan menakjubkan ini.
Awan yang menyerupai bentuk angsa ini tertangkap kamera sedang melintasi langit Hampshire, Inggris. Awan yang terbentuk dari kristal es kecil ini membentuk kelompok raksasa burung berleher panjang itu dengan sayap yang seolah sedang mengepak.
Pemandangan menakjubkan ini tertangkap kamera pensiunan Gloria Morey (74) saat sedang di Stokes Bay, Gosport, dekat Portsmouth. More

Kebenaran di Balik Kiamat Bumi Akibat Hujan Komet

 
Headline


INILAH.COM, London – Sebelumnya, diberitakan ‘bintang mati’ akan membuat Bumi dihujani komet. Para peneliti pun melakukan penelitian lebih lanjut pada hal ini. Apa hasilnya?
Beberapa ilmuwan mengklaim tak ada ‘bintang mati’ pada ujung tata surya yang secara berkala melempar komet ke Bumi. Di sisi lain, hasil studi baru menemukan, Nemesis yang keberadaanya juga diyakini beberapa ilmuwan ini ternyata hanyalah sekadar mitos.
Sebelumnya, beberapa ilmuwan yakin, Nemesis akan ‘bertualang’ di luar angkasa dan mengganggu komet do Oort Cloud (awan komet) dan mengirim banyak komet ke planet hunian manusia ini. More

Inilah Penyebab Serbuk Oranye Misterius di Alaska

 
Headline




INILAH.COM, Alaska – Penyebab serbuk oranye misterius yang berserakan di pantai Alaska ditemukan.
Kivalina,sebuah perkampungan terisolasi di Eskimo, barat laut Alaska, tiba-tiba diserang serbuk warna oranye terang Sabtu lalu (6/8). Serbuk itu berserakan menutupi sebagian besar kawasan pantainya.
Gumpalan oranye itu sempat gencar diberitakan, karena 425 orang warga yang tinggal di kampung itu tidak tahu-menahu mengenai apa gerangan objek misterius itu. More

Tertangkap Kamera, Langit Merah Terbakar

 
Headline


INILAH.COM, Jakarta – Sewajarnya, langit berwarna biru atau abu-abu atau putih karena awan. Namun pada suatu hari, terjadi fenomena yang jarang terjadi, langit merah bak terbakar.
Gambar mencengangkan ini menunjukkan adanya awan jenis baru, yakni Undulus Asperatus. Saat diabadikan Linda Gold pada 23 Juni 2010, awan ini muncul saat matahari tenggelam seperti ditulis digitalphotography. More

Misteri Kematian Matahari dalam Al-Quran

 
Oleh Dr. Mohamad Daudah
وَالشَّمْسُ تَجْرِي لِمُسْتَقَرٍّ لَّهَا ذَلِكَ تَقْدِيرُ الْعَزِيزِ الْعَلِيمِ
Dan Matahari berjalan ke tempat Peristirahatannya. Itu adalah keputusan dari Yang Mahakuasa, Yang Maha Mengetahui. (Surah Ya Sin, 38)
Matahari telah memancarkan panas selama sekitar 5 miliar tahun sebagai akibat dari reaksi kimia konstan berlangsung pada permukaannya. Pada saat yang ditentukan oleh Allah di masa depan, reaksi ini pada akhirnya akan berakhir, dan Matahari akan kehilangan semua energi dan akhirnya Mati. Dalam konteks itu, ayat di atas dapat dijadikan acuan bahwa pada suatu hari energi matahari akan segera berakhir. (Allah maha tahu akan kebenarannya).
Kata Arab “limustaqarrin” dalam ayat ini merujuk pada tempat tertentu atau waktu. Kata “tajrii” diterjemahkan sebagai “berjalan,” juga bermakna seperti “untuk bergerak, untuk bertindak cepat, untuk bergerak, mengalir.” More

Tertangkap Kamera, Mata Menakjubkan di Langit

 
Headline

INILAH.COM, London – Fenomena ini jelas bukan kejadian yang bisa ditemui tiap hari. Pasir waktu mulai habis bagi bintang pusat nebula planet berbentuk jam pasir ini. Seperti apa?
Bersama sisa bahan bakar nuklir, pemandangan menakjubkan fase penutupan MyCn18 atau yang lebih dikenal sebagai Nebula Jam Pasir ini terjadi di lapisan luar yang dilepaskan. Nebula ini terletak delapan ribu tahun cahaya dari Bumi di selatan rasi bintang Musca. More

10 Letusan Gunung Terbesar di Dunia, Empat Ada di Indonesia

 
10 Letusan Gunung Terbesar di Dunia, Empat Ada di IndonesiaTRIBUN Manado/Rizky Adriansyah
Gumpalan abu vulkanik Gunung Lokon, Tomohon, Sulawesi Utara menjulang hingga ketinggian 1500 meter, Jumat (15/7/2011).




TRIBUNNEWS.COM, JAKARTA - Pada tahun 2010 lalu, Indonesia terhentak dengan sebuah bencana meletusnya Gunung Merapi. Akibat letusan tersebut ratusan orang meninggal tak terkecuali sang Juru Kunci Gunung Merapi, Mbah Maridjan.
Tahun ini dua gunung di Sulawesi Utara, yaitu Gunung Lokon dan Gunung Soputan juga meletus. Namun demikian, dampak letusan gunung-gunung itu ternyata masih tak seberapa dibanding letusan Gunung Tambora atau Gunung Kelud yang menewaskan ribuan korban jiwa. More

Misteri Danau Texas Berubah Merah Darah

 
foto 
Danau OC Fisher Reservoir. livescience.com
TEMPO InteraktifSan Angelo - Danau yang berubah warna menjadi merah darah di Texas pada musim panas ini bukanlah pertanda akhir zaman. Meski kiamat bagi umat manusia belum tiba, popularitas kawasan yang terkenal sebagai lokasi rekreasi dan pemancingan itu kemungkinan akan berakhir.
Musim kering menyebabkan Danau OC Fisher Reservoir di San Angelo State Park di Texas Barat hampir mengering. Air yang tersisa menggenang, dipenuhi ikan mati dan berwarna merah tua seperti darah.  More

Penampakan Wajah di Awan Saat Badai di Kanada

 
Awan membentuk wajah ketika awan mulai gelap karena badai/Dailymail
Awan membentuk wajah ketika awan mulai gelap karena badai/Dailymail
GRAND FALLS - Denis Farmer terkaget-kaget melihat awan berbentuk wajah saat badai menyelimuti langit Kota Grand Falls, Kanada.Kala itu, Farmer sedang berada di halaman belakang rumahnya. Awan di langit sangat gelap disertai sambaran petir. Tak mau menyianyiakan fenomena alam ini, dia pun bergegas merekam peristiwa tersebut dengan kamera videonya. Dia pun berinisiatif mengunggahnya ke Youtube. Ternyata tidak hanya Denis yang berkesempatan mengabadikan munculnya wajah raksasa di awan tersebut. Beberapa pengunggah video di Youtube pun ada yang mendokumentasikan peristiwa itu.

undefined undefined
clip_image001
Asal mula fauna Indonesia sangat dipengaruhi oleh aspek geografi dan peristiwa geologi di benua Asia dan Australia[4]. Pada zaman purba, pulau Irian (New Guinea) tergabung dengan benua australia.
Hughasiusilum
Nama dari benua Ausralia 12.000.000 tahun yang lalu untuk sebagai landasan benua Australia yang akan dibentuk dari batuan yang umurnya muda yaitu kurang dari 2 juta tahun.
Benua Australia membentuk superbenua yang dinamakan superbenua selatan Gondwana. Superbenua ini mulai terpecah 140 juta tahun yang lalu, dan daerah New Guinea (yang dikenal sebagai Sahul) bergerak menuju khatulistiwa. Akibatnya, hewan di New Guinea berpindah ke benua Australia dan demikian pula sebaliknya, menimbulkan berbagai macam spesies yang hidup di berbagai area hidup dalam ekosistem. Aktivitas ini terus berlanjut dua daerah ini benar-benar terpisah.
Di lain pihak, pengaruh benua Asia merupakan akibat dari reformasi superbenua Laurasia, yang timbul setelah pecahnya Rodinia sekitar 1 milyar tahun yang lalu. Sekitar 200 juta tahun yang lalu, superbenua Laurasia benar-benar terpisah, membentuk Laurentia (sekarang Amerika) dan Eurasia. Pada saat itu, sebagian wilayah Indonesia masih belum terpisah dari superbenua Eurasia. Akibatnya, hewan-hewan dari Eurasia dapat saling berpindah dalam wilayah kepulauan Indonesia, dan dalam ekosistem yang berbeda, terbentuklah spesies-spesies baru.
Pada abad ke-19, Alfred Russel Wallace mengusulkan ide tentang Garis Wallace, yang merupakan suatu garis imajiner yang membagi kepulauan Indonesia ke dalam dua daerah, daerah zoogeografis Asia dan daerah zoogeografis Australasia (Wallacea)[5]. Garis tersebut ditarik melalui kepulauan Melayu, diantara Kalimantan (Borneo) dan Sulawesi (Celebes); dan diantara Bali dan Lombok.[6] Walaupun jarak antara Bali dan Lombok relatif pendek, sekitar 35 kilometer, distribusi fauna di sini sangat dipengaruhi oleh garis ini. Sebagai contoh, sekelompok burung tidak akan mau menyeberang laut terbuka walaupun jaraknya pendek[6].
sumber Wikipedia

BELAJAR MATEMATIKA YUUK........................................

KUMPULAN RUMUS MATEMATIKA UNTUK SD

undefined undefined
Rumus Bangun Ruang - Matematika

Rumus Kubus
- Volume : Sisi pertama dikali sisi kedua dikali sisi ketiga (S pangkat 3)

Rumus Balok
- Volume : Panjang dikali lebar dikali tinggi (p x l x t)

Rumus Bola
- Volume : phi dikali jari-jari dikali tinggi pangkat tiga kali 4/3 (4/3 x phi x r x t x t x t)
- Luas : phi dikali jari-jari kuadrat dikali empat (4 x phi x r x r)

Rumus Limas Segi Empat
- Volume : Panjang dikali lebar dikali tinggi dibagi tiga (p x l x t x 1/3)
- Luas : ((p + l) t) + (p x l)

Rumus Tabung
- Volume : phi dikali jari-jari dikali jari-jari dikali tinggi (phi x r2 x t)
- Luas : (phi x r x 2) x (t x r)

Rumus Kerucut
- Volume : phi dikali jari-jari dikali jari-jari dikali tinggi dibagi tiga (phi x r2 x t x 1/3)
- Luas : (phi x r) x (S x r)
- S : Sisi miring kerucut dari alas ke puncak (bukan tingi)

Rumus Prisma Segitiga Siku-siku
- Volume : alas segitiga kali tinggi segitiga kali tinggi prisma bagi dua (as x ts x tp x

Rumus Bujur Sangkar
Bujur sangkar adalah bangun datar yang memiliki empat buah sisi sama panjang
- Keliling : Panjang salah satu sisi dikali 4 (4S) (AB + BC + CD + DA)
- Luas : Sisi dikali sisi (S x S)

Konversi Satuan Ukuran Berat, Panjang, Luas dan Isi

Berikut ini adalah satuan ukuran secara umum yang dapat dikonversi untuk berbagai keperluan sehari-hari yang disusun berdasarkan urutan dari yang terbesar hingga yang terkecil : km = Kilo Meter
hm = Hekto Meter
dam = Deka Meter
m = Meter
dm = Desi Meter
cm = Centi Meter
mm = Mili Meter
A. Konversi Satuan Ukuran Panjang
Untuk satuan ukuran panjang konversi dari suatu tingkat menjadi satu tingkat di bawahnya adalah dikalikan dengan 10 sedangkan untuk konversi satu tingkat di atasnya dibagi dengan angka 10. Contoh :
- 1 km sama dengan 10 hm
- 1 km sama dengan 1.000 m
- 1 km sama dengan 100.000 cm
- 1 km sama dengan 1.000.000 mm
- 1 m sama dengan 0,1 dam
- 1 m sama dengan 0,001 km
- 1 m sama dengan 10 dm
- 1 m sama dengan 1.000 mm
B. Konversi Satuan Ukuran Berat atau Massa
Untuk satuan ukuran berat konversinya mirip dengan ukuran panjang namun satuan meter diganti menjadi gram. Untuk satuan berat tidak memiliki turunan gram persegi maupun gram kubik. Contohnya :
- 1 kg sama dengan 10 hg
- 1 kg sama dengan 1.000 g
- 1 kg sama dengan 100.000 cg
- 1 kg sama dengan 1.000.000 mg
- 1 g sama dengan 0,1 dag
- 1 g sama dengan 0,001 kg
- 1 g sama dengan 10 dg
- 1 g sama dengan 1.000 mg
C. Konversi Satuan Ukuran Luas
Satuan ukuran luas sama dengan ukuran panjang namun untuk mejadi satu tingkat di bawah dikalikan dengan 100. Begitu pula dengan kenaikan satu tingkat di atasnya dibagi dengan angka 100. Satuan ukuran luas tidak lagi meter, akan tetapi meter persegi (m2 = m pangkat 2).
- 1 km2 sama dengan 100 hm2
- 1 km2 sama dengan 1.000.000 m2
- 1 km2 sama dengan 10.000.000.000 cm2
- 1 km2 sama dengan 1.000.000.000.000 mm2
- 1 m2 sama dengan 0,01 dam2
- 1 m2 sama dengan 0,000001 km2
- 1 m2 sama dengan 100 dm2
- 1 m2 sama dengan 1.000.000 mm2
D. Konversi Satuan Ukuran Isi atau Volume
Satuan ukuran luas sama dengan ukuran panjang namun untuk mejadi satu tingkat di bawah dikalikan dengan 1000. Begitu pula dengan kenaikan satu tingkat di atasnya dibagi dengan angka 1000. Satuan ukuran luas tidak lagi meter, akan tetapi meter kubik (m3 = m pangkat 3).
- 1 km3 sama dengan 1.000 hm3
- 1 km3 sama dengan 1.000.000.000 m3
- 1 km3 sama dengan 1.000.000.000.000.000 cm3
- 1 km3 sama dengan 1.000.000.000.000.000.000 mm3
- 1 m3 sama dengan 0,001 dam3
- 1 m3 sama dengan 0,000000001 km3
- 1 m3 sama dengan 1.000 dm3
- 1 m3 sama dengan 1.000.000.000 mm3
Cara Menghitung :
Misalkan kita akan mengkonversi satuan panjang 12 km menjadi ukuran cm. Maka untuk merubah km ke cm turun 5 tingkat atau dikalikan dengan 100.000. Jadi hasilnya adalah 12 km sama dengan 1.200.000 cm. Begitu pula dengan satuan ukuran lainnya. Intinya adalah kita harus melihat tingkatan ukuran serta nilai pengali atau pembaginya yang berubah setiap naik atau turun tingkat/level.
Satuan Ukuran Lain :
A. Satuan Ukuran Panjang
- 1 inch / inchi / inc / inci = sama dengan = 25,4 mm
- 1 feet / ft / kaki = sama dengan = 12 inch = 0,3048 m
- 1 mile / mil = sama dengan = 5.280 feet = 1,6093 m
- 1 mil laut = sama dengan = 6.080 feet = 1,852 km
1 mikron = 0,000001 m
1 elo lama = 0,687 m
1 pal jawa = 1.506,943 m
1 pal sumatera = 1.851,85 m
1 acre = 4.840 yards2
1 cicero = 12 punt
1 cicero = 4,8108 mm
1 hektar = 2,471 acres
1 inchi = 2,45 cm
B. Satuan Ukuran Luas
- 1 hektar / ha / hekto are = sama dengan = 10.000 m2
- 1 are = sama dengan = 1 dm2
- 1 km2 = sama dengan = 100 hektar
C. Satuan Ukuran Volume / Isi
1 liter / litre = 1 dm3 = 0,001 m3
D. Satuan Ukuran Berat / Massa
- 1 kuintal / kwintal = sama dengan = 100 kg
- 1 ton = sama dengan = 1.000 kg
- 1 kg = sama dengan = 10 ons
- 1 kg = sama dengan = 2 pounds


Rumus Konversi/Merubah Suhu Celcius, Fahrenheit, Reamur dan Kelvin - Perubahan Derajat Temperatur Panas Satuan Skala Suhu Fisika

Di dunia terdapat banyak standar satuan hitungan skala suhu, namun yang akan kita bahas lebih lanjut rumusnya hanya yang paling banyak dipakai saja yaitu :
1. Celcius atau Selsius
2. Fahrenheit atau Farenheit
3. Reamur atau Rheamur
4. Kelvin (standar SI satuan internasional)
5. Rankine
6. Delisle
7. Newton
8. Romer
A. Rumus merubah celcius ke kelvin
= Celcius + 273,15
B. Rumus merubah celcius ke rheamur
= Celcius x 0,8
C. Rumus merubah reamur ke celcius
= Rheamur x 1,25
D. Rumus merubah celcius ke fahrenheit
= (Celcius x 1,8) + 32
E. Rumus merubah fahrenheit ke celcius
= (Fahrenheit - 32) / 1,8
F. Rumus merubah rheamur ke farenheit
= (Rheamur x 2,25) + 32
Yang perlu kita ketahui adalah perbandingan suhu antara celcius, reamur dan fahrenheit adalah 5 : 4 : 9. Khusus untuk farenheit perlu ditambah 32 untuk perubahnnya. Perubahan lain bisa melakukan penyesuaian rumus di atas.
Tambahan :
- Satuan derajat temperatur suhu adalah dengan lambang derajat, yaitu pangkat nol setelah angka suhu dan diikuti dengan jenis standarnya. Misalnya C untuk celcius, R untuk reamur dan F untuk fahrenheit. Namun untuk Kelvin tidak membutuhkan pangkat nol setelah angka satuan suhu.
- Alat untuk mengukut temperatur suhu memiliki nama termometer. Termometer adalah
tabung kaca yang didalamnya terdapat cairan raksa atau alkohol. Semakin rendah suhu maka
cairan raksa maupun alkohol akan menciut dan mengembang jika suhu kian tinggi.
- Masalah suhu biasanya dipelajari pada mata pelajaran ipa fisika dan kimia.

Wisata Kendal

Pengenalan VB Dasar

Pengenalan Visual Basic Dasar

Pengenalan Visual Basic
Basic adalah salah suatu developement tools untuk membangun aplikasi dalam lingkungan Windows. Dalam pengembangan aplikasi, Visual Basic menggunakan pendekatan Visual untuk merancang user interface dalam bentuk form, sedangkan untuk kodingnya menggunakan dialek bahasa Basic yang cenderung mudah dipelajari. Visual Basic telah menjadi tools yang terkenal bagi para pemula maupun para developer. Visual Basic adalah bahasa pemrograman berbasis Microsoft Windows yang merupakan Object Oriented Programming (OOP), yaitu pemrograman berorientasi objek, Visual Basic menyediakan objek-objek yang sangat kuat, berguna dan mudah.
Dalam lingkungan Windows, User-interface sangat memegang peranan penting, karena dalam pemakaian aplikasi yang kita buat, pemakai senantiasa berinteraksi dengan User-interface tanpa menyadari bahwa dibelakangnya berjalan instruksi-instruksi program yang mendukung tampilan dan proses yang dilakukan.
Pada pemrograman Visual, pengembangan aplikasi dimulai dengan pembentukkan user interface, kemudian mengatur properti dari objek-objek yang digunakan dalam user interface, dan baru dilakukan penulisan kode program untuk menangani kejadian-kejadian (event). Tahap pengembangan aplikasi demikian dikenal dengan istilah pengembangan aplikasi dengan pendekatan Bottom Up.
Ada beberapa hal yang harus dipahami dalam mempelajari Visual Basic :
Objek
Sering disebut entity adalah sesuatu yang bisa dibedakan dengan lainnya. Pada dasarnya seluruh benda didunia ini bisa dikatakan sebagai objek, contoh : mobil, komputer, radio, dan lain-lain.
Dalam Visual Basic objek-objek yang dimaksud disebut kontrol. Jenis-jenis kontrol antara lain ; Label, Text Box, Combo Box, List Box, dan masih banyak lagi.

Properti
Sering disebut atribut, adalah ciri-ciri yang menggambarkan uatu objek. Misalnya disebut objek mobil jika mempunyai ban, spion, rem, dan lain-lain.
Event
Suatu kejadian yang menimpa objek. Bagaimana jika mobil didorong, ditabrak, dicat, dan sebagainya.
Metode
Kemampuan yang dimiliki oleh suatu objek. Contohnya jika mobil berbelok, mundur, maju.
Lingkungan Kerja Visual Basic
Project adalah sekumpulan modul/program aplikasi itu sendiri, projek disimpan dalam file berextension .VBP biasanya berisi form-form.
Ada tiga icon dalam projek
þ View Code : tampilkan jendela editor program
þ View Object : tampilkan bentuk formulir
þ Togle Folder : tampilkan folder tempat penyimpanan file
Form adalah objek yang dipakai untuk tempat bekerja program aplikasi. Di dalamnya tempat diletakan objek-objek lainnya. Di dalam form ada grid (garis titik-titik yang berguana untuk pengaturan letak).
Toolbox kotak alat berisi icon-icon atau komponen untuk memasukan objek tertentu kedalam form.
Tambah komponen : klik kanan pada toolbox -> komponen atau add tab
Propertis adalah untuk menentukan setting suatu objek, menentukan cara kerja dari objek saat program dijalankan misal warna, hurup dan lain-lain.
Kode program adalah serangkaian tulisan perintah yang akan dilaksanakan jika suatu objek dijalankan
Konstanta dan Variabel
Variabel adalah suatu tempat untuk menampung data yang nilainya selalu berubah. Sedangkan konstanta adalah suatu tempat untuk menampung data yang nilainya selalu tetap dan tidak pernah berubah.
Aturan Penamaan Konstanta & Variabel
o Harus diawali huruf.
o Boleh terdiri dari huruf, angka, dan garis bawah.
o Maksimal 255 karakter.
o Tidak boleh menggunakan reserved word.
Deklarasi Konstanta & Variabel
Deklarasi konstanta
Bentuk umum :
[Public | Private] Const nama_konstanta [AS tipe_konstanta] = eksplisit
Contoh :
Public Const POTONGAN = 0.05
Const NAMAPERSH = “PT ABC”
Contoh penggunaan dalam program
Const HARGA As Currency = 1000
Dim Biaya As Currency
Dim Jumlah As Integer
¼ ‘proses
Biaya = HARGA * Jumlah
¼ ‘proses
Deklarasi variabel
Bentuk umum :
Dim [AS ]
Pendeklarasian varibel ada 2 jenis :


1) Deklarasi Eksplisit
Untuk mendeklarasikan nama variabel beserta tipe datanya pada awal procedure (menempatkan alokasi nama variabel didalam memori), contohnya sebagai berikut :
Dim Nama as String
Dim Alamat as String *3 0
Dim Gaji as Long
2) Deklarasi Implisit
Untuk mendeklarasikan nama variabel beserta tipe datanya dan langsung mengisi nilai variabelnya (menempatkan alokasi nilai variabel langsung didalam memori), contohnya sebagai berikut :
Nama$ = “ Adi ”
Alamat$ = “ Kelapa Gading ”
Gaji$ = 1750000
Ruang Lingkup Konstanta & Variabel
Ruang lingkup konstanta atau variabel adalah ruang atau daerah dimana konstanta atau variabel yang dibuat dikenal (dapat dipakai) biasanya juga berhubungan dengan umur (waktu hidup) konstanta atau variabel.
Ada variabel yang dikenal diseluruh bagian program, ada yang hanya dikenal di procedure tempat variabel tersebut dibuat. Ruang lingkup paling dalam adalah lingkup procedure dengan perintah Dim, Private atau Static maka variabel tersebut mempunyai ruang lingkup procedure, contoh :
Private Sub CmdTambah_Click()
Dim Nama as String
Dim Alamat as String * 30
Static No as Integer
End Sub
Deklarasi variabel pada Visual Basic dapat dilakukan dengan Keyword berikut :
Keyword
Digunakan pada
Public
Berlaku pada level modul
Private
Berlaku pada level modul
Dim
Berlaku pada level modul dan level procedure
Static
Berlaku pada level procedure
: Operator : .
Visual Basic menyediakan operator aritmatika, komparasi dan logika, salah satu hal yang harus dipahami oleh programmer adalah tata urutan operasi dari masing-masing operator tersebut sehingga mampu membuat ekspresi yang akan menghasilkan nilai yang benar, Tabel 1-1, menunjukkan operator dan urutan operasinya dari atas kebawah.
Operator Aritmatika
Contoh :
A = 1 + 2 * 3 ‘Akan menghasilkan 7
B = (1 + 2) * 3 ‘Akan menghasilkan 9
Aritmatika
Komparasi
Logika
Pangkat (^)
Sama (=)
Not
Negatif (-)
Tidak sama (<>)
And
Kali dan Bagi (*, /)
Kurang dari (<)
Or
Pembagian bulat (\)
Lebih dari (>)
Xor
Sisa Bagi (Mod)
Kurang dari atau sama (<=)
Eqv
Tambah dan Kurang (+,-)
Lebih dari atau sama (>=)
Imp
Pengabungan String (&)
Like
Operator Penggabungan String (Like)
Salah satu operator yang menarik untuk dibahas adalah operator Like. Operator Like digunakan untuk operasi pencocokan pola pada string yang akan sangat membantu programmer.
Syntax :
result = string Like pattern
     
                       
Operator
Keterangan
?
Sembarang karakter tunggal
*
Nol atau lebih karakter
#
Sembarang digit tunggal (0-9)
[charlist]
Sembarang karakter yang berada dalam charlist
[!charlist]
Sembarang karakter yg tidak berada dalam charlist
Contoh :
· MyCheck = “aBBBa” Like “a*a” ‘ Returns True.
· MyCheck = “F” Like “[A-Z]” ‘ Returns True.
· MyCheck = “F” Like “[!A-Z]” ‘ Returns False.
· MyCheck = “a2a” Like “a#a” ‘ Returns True.
· MyCheck = “aM5b” Like “a[L-P]#[!c-e]” ‘ Returns True.
· MyCheck = “BAT123khg” Like “B?T*” ‘ Returns True.
· MyCheck = “CAT123khg” Like “B?T*”
Operator Pembandingan (Relasi)
Operator ini digunakan untuk membandingkan suatu data atau ekspresi dengan data ekspresi pula dan menghasilkan nilai logika (Boolean) benar atau salah.

Operator

Keterangan

=
Sama dengan
< >
Tidak sama dengan
<
Lebih kecil
>
Lebih besar
<=
Lebih Kecil atau Sama dengan
>=
Lebih Besar atau Sama dengan
Like
Mempunyai ciri yang sama
Ls
Sama referensi objek
Operator Logika
Digunakan untuk mengekspresikan satu atau lebih data logika menghasilkan data logika baru.
Operator
Keterangan
Not
Tidak
And
Dan
Or
Atau
Xor
Exclusive Or
Eqv
Ekivalen
Imp
Implikasi


Operator Penugasan
Operator ini disimbolkan dengan tanda sama dengan ( = ) dan berfungsi untuk memasukan suatu data kedalam suatu variabel, bentuknya sbb:
<> = <>
Contoh : Bilangan = 0
Harga = 500
Banyak = 5
Jumlah = Harga * Banyak
Struktur Kendali (Branching)
Struktur kendali memungkinkan anda untuk mengatur jalannya program anda, Jika membiarkan tanpa di periksa oleh statement control-flow, suatu logika program akan berjalan dari kiri ke kanan dan dari atas kebawah. Hanya program yang sangat sederhana dapat ditulis tanpa statement control-flow.
Struktur KENDALI yang didukung oleh Visual Basic adalah sebagai berikut
If
If…Then
Gunakan suatu struktur If…Then untuk menjalankan suatu pernyataan secara kondisional. Anda dapat menggunakan syntax satu baris ataupun syntax banyak baris.
If kondisi Then pernyataan
atau
If kondisi Then
pernyataan-pernyataan
End If
Kondisi biasanya berupa suatu perbandingan, maupun ekspresi yang menghasilkan nilai numerik. Visual Basic menginterpretasikan False sebagai nol (0), dan True sebagai bukan nol.
If…Then…Else
Gunakan If…Then…Else untuk mendefinisikan beberapa blok pernyataan yang akan dijalankan salah satu berdasarkan kondisi yang memenuhi syarat
If kondisi1 Then
[blok pernyataan-1]
[ElseIf kondisi2 Then
[blok pernyataan-2]] …
[Else
[blok pernyataan-n]]
End If
Visual Basic awalnya akan mencoba kondisi1. Jika False, maka Visual Basic akan memeriksa kondisi2, dan seterusnya sampai menemukan suatu kondisi True untuk dijalankan blok pernyataannya.
Contoh :
If JlhRec > 0 Then
   Posisi = 1
Else
   Posisi = 0
End If


Select Case
Visual
Basic menyediakan struktur Select Case sebagai suatu alternatif terhadap If...Then...Else. Suatu Select Case statement memiliki kemampuan yang sama
dengan If…Then…Else…, tetapi membuat code lebih mudah dibaca.
Struktur Select Case bekerja dengan suatu percobaan tunggal yang hanya dievaluasi satu kali pada bagian atas struktur. Visual Basic then membandingkan hasil ekspresi dengan nilai pada setiap Case didalam struktur tersebut, jika ada yang sesuai, akan dijalankan blok statement yang sesuai.
Select Case ekspresi yang dicoba
[Case ekspresi1
[blok pernyataan-1]]
[Case ekspresi2
[blok pernyataan-2]]

[Case Else
[blok pernyataan-n]
End Select
Perulangan (Looping)
Struktur loop memperbolehkan anda untuk melaksanakan sekelompok baris lebih dari satu kali.
Do … Loop
Gunakan Do Loop untuk mengeksekusi suatu blok statement dengan jumlah perulangan yang tak terhingga, ada beberapa Do…Loop statement, tetapi masing-masing mengevaluasi suatu kondisi untuk menentukan apakah melanjutkan eksekusi
Berikut ini adalah statement Do Loop, yang dijalankan selama kondisi benar :
Do While condition statementsLoop
Ketika Visual menjalankan Do Loop ini, pertama kali akan di coba kondisinya, jika kondisi False (zero), akan diloncati semua statement yang mengikuti kondisi tersebut. Visual Basic akan menjalankan statement jika kondisi benar dan kembali ke Do…Loop berikutnya.
Function Faktorial (x)Dim Hasil As DoubleDim Count As LongHasil = 1count = 2Do While Count <= x Hasil = Hasil * count count = count + 1LoopFaktorial = countEnd Function
Variasi lain dari statement Do…Loop, yang menjamin minimal satu kali statement dijalankan :
Do statementsLoop While condition
Dua variasi yang analog dengan dua contoh sebelumnya adalah perulangan minimal satu kali. Dan berikut ini adalah berulang atau tidak sama sekali :
Do Until condition
statements
LoopDo
statements
Loop Until condition