Kamis, 31 Maret 2011

Laper.........

Liat semangkok bakso.....
aq jd laper.......
hmhmhmhmhm.........

Selasa, 29 Maret 2011

Buku Tamu dengan HTML...

beli mobil nech yuuukkkk......

keren abiiizzz.....
siapa yang mau tandingi.....

Minggu, 27 Maret 2011

array huruf pada VB

Untuk perulangan dari huruf A sampai huruf Z
i = Asc ("A")
Do until i >Asc("Z")
       Text1.text = "Huruf" & chr(i)
       i = i + 1
loop

Untuk perulangan dari huruf Z sampai huruf A

i = Asc ("Z")
Do until i >Asc("A")
       Text1.text = "Huruf" & chr(i)
       i = i - 1loop

Senin, 21 Maret 2011

10 hari akhir....