Postingan

Menampilkan postingan dari November, 2012
Gambar
Tugas 4 1.List Box  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         Dim control As Windows.Forms.ListBox         TextBox1.Text = TextBox1.Text         TextBox1.Text = ListBox1.Items.Add(TextBox1.Text)     End Sub     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click         For bil = 1 To 10             ListBox1.Items.Add(bil)         Next     End Sub     Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click         ListBox1.Text = ListBox2.Items.Add(ListBox1.Text)     End Sub     Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click         ListBox1.SelectionMode = SelectionMode.MultiExtended         Dim i, j As Integer         j = ListBox1.Items.Count         For i = 0 To j - 1             Try                 ListBox2.Items.Add(ListBox1.Items(Lis
Tugas 1 Tugas 2 Tugas 3 Tugas 4 Tugas 5 Nama: Dwi Muji Sejati NIM: 11.11.2469 Kelas: TI 11C

Modifikasi Program If dan Case dan Membuat Puzzle

Gambar
Modifikasi Program If dan Case dan Membuat Puzzle Program sebelumnya Setelah dimodifikasi dengan berbagai ketentuan 1. Menambahkan Button “Isi Data” 2. Saat form dijalankan: semua isian tidak aktif,tombol Isi data dan Tutup aktif, tombol Clear tidak aktif 3. Saat tombol Isi Data ditekan maka, Kode barang, Jumlah barang, cara beli, Tombol clear aktif danntombol Isi data tidak aktif 4. Saat tombol Clear ditekan sama dengan saat form dijalankan Berikut adalah Source Code untuk Form Menambahkan button "Clear" Selanjutnya adalah menambahkan button "Isi Data" Membuat permainan Puzzle Tampilan Puzzle: Mendeklarasikan variabel: Membuat event acak: Membuat event button acak: Membuat event button Aturan: Membuat event button 0 hingga 8: