Materi Visual basic

Materi Visual Basic untuk Pengulangan While, Do While ,Loop until
dibawah ini adalah source Code Pembuatan format tanggal / bulan /tahun

Dim tgl,bln,thn as integer
tgl=1
do
cmbtgl.item.add(tgl)
tgl=tgl+1
loop while(tgl <=31)
========================
Dim tgl,bln,thn as integer
tgl=1
do
cmbtgl.item.add(tgl)
tgl=tgl+1
loop until(tgl=31)

==============================
Dim tgl, bln,tahun as integer
while tgl <= 31
cmbtgl.item.add(tg)
tgl=tgl+1
end while
===========================

Source Code UTS Materi untuk FakturBarang








Sedangkan Designnya seperti gambar berikut


Untuk nilai dari Label Design Jumlah ...








Untuk Nilai dari Label Harga Satuan ...








Untuk Nilai dari Label Total Harga..