ShoutMix chat widget

Rabu, 09 Maret 2011

Visual Basic 2008

Variabel public : Variabel yang bisa digunakan kesemua program/ form (dalam satu project)
Variabel General : Variabel dimana variabel bisa digunakan/ dipanggil dalam satu class
Variabel Lokal : Variabel yang bisa dibaca/ dipanggil pada satu private/ satu sub/ satu procedure saja.

Setiap objek dalam pembuatan coding pasti diikuti dengan properties
contoh :
     TextBox1.Text    (Text dibelakang merupakan properties)

public class form1
  Dim Jurusan as string (variabel general)
  Dim Kelas, Jenjang as string, Waktu as string (variabel general)
  Dim d as string  (variabel konstanta)

private sub Button Click....
  Dim lo as sring  (variabel lokal)
  lo=6
  If TextBox1.Text="TI" Then
     TextBox2.Text="Tehnik Informatika" + Trim(lo)
  else
  If TextBox1.Text="SI" Then
     TextBox2.Text="Sistem Informatika"
  end if
  end if
end sub


untuk lebih mudah kita dapat menggunakan "call" karena perintah ini dapat dipakai pada beberapa sub.

private sub Button Click....
 call perintah (perintah call)
end sub


sub perintah()
  Dim lo as sring
  lo=6
  If TextBox1.Text="TI" Then
     TextBox2.Text="Tehnik Informatika" + Trim(lo)
  else
  If TextBox1.Text="SI" Then
     TextBox2.Text="Sistem Informatika"
  end if
  end if
end sub

Membuat cursor berpindah aktif ke text berikutnya dengan tombol enter.

if e.key char = chr (13) Then
TextBox1.focus() (perintah focus untuk cursor aktif ke text berikutnya) 

ListBox
Listbox1.Items.add(nilai yang dimasukkan) 
contoh:
Listbox1.Items.add(TextBox1.text+""+Textbox2.text)


Combobox
Combobox.Items.add(Textbox1.text)


Looping
Contoh:
Dim j,u,y as integer
u=4
y=7

for j=4 To Val(Textbox2.text)
  If j Mod u=0 Then
  Listbox1.Items.add(j)
  u=j
else
  If j mod y=0 Then
  Listbox1.Items.add(j)
  y=j
 end if
end if
 hasilnya=4 7 8 14 16 28 32










Tidak ada komentar:

Posting Komentar