Kamis, 31 Maret 2011
Selasa, 29 Maret 2011
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
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