Pembahasan Tugas Pemrograman Visual 8

  kita dapat melihat bahwa saat Button 1 di klik maka program akan menjalankan algoritma yang telah di tulis sebelumnya, yaitu perlulangan, i = 0 To UBound(args) 

hasil(0) = hasil(0) + args(i)   "ini di gunakan untuk mencari total jumlah dari angka-angka yang ada , dan hasilnya akan di masukan pada kotak total, terbesar dan nilai terkecil" 

  pada coding berikut :

if hasil(1) > args(i) then hasil(1) = args (i)

if hasil(2) < args(i) then hasil(2) = args (i)

merupakan proses pencarian nilai, sedangkan :

Textbox1.text = statistik(0)  = textbox1 akan menampilkan proses hasil(0)

Textbox2.text = statistik(1) =  textbox2 akan menampilkan proses hasil(1)

Textbox3.text = statistik(2) = textbox3 akan menampilkan proses hasil(2)

Sedikit memberikan informasi bahwa dalam VB.net 2010 terdapat beberapa Function bawaan,  Antara lain :

• Fungsi Numeric
  CInt () : Pembuatan nilai desimal 0.5 dan lebih ke integer yang lebih dekat
  Fix ()   : Pemotongan suatu nilai desimal menjadi integer
  Int ()    : Pembuatan ke bawah suatu nilai desimal

• Fungsi String
  Left      : mengambil karakter dari sebelah kiri
  Right    : mengambil karakter dari sebelah kanan

•  Fungsi Tanggal dan Waktu   

          Date () : menetapkan tanggal dari sistem
         Time () : menetapkan waktu dari sistem



Sekian tulisan dari saya. Terima kasih.

tugas 7

Setelah menjalani UTS kini mulai Lagi dengan tugas yang terus menumpuk...

Kali ini saya akan sedikit membagi pengetahuan saya tentang MDIForm pada VB.net 2010


kita mulai dari cara pembuatan Mdi form pada Vb,net 2010

pertama kita buat windows form biasa dengan nama "terserah pembaca"
lalu pada Properties form cari IsMdiContain, rubah isi properties tersebut dari false menjadi true... maka akan terlihat seperti gambar berikut...

kemudian kita coba tambahkan menu strip...
pilihan menustrip ada pada toolbox bagian menu&Toolbars..
double klik pada pilihan menustrip, maka akan muncul tampilan seperti gambar berikut

selanjutnya kita tambahkan isi dari menustrip dengan cara menuliskan isi konten pada menustrip..
contoh isian dari menu strip bisa dilihat pada gambar berikut..

kita tambahkan form baru pada project ini sebanyak 4 form baru dengan cara klik kanan pada properties project lalu plih add windows form..

Setelah itu kita menambahkan coding pada masing masing menu seperti berikut...

Public Class Form1

    Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click
        Me.Close()
    End Sub

    Private Sub HorizontalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HorizontalToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.TileHorizontal)
    End Sub

    Private Sub VerticalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VerticalToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.TileVertical)
    End Sub

    Private Sub CascadeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CascadeToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.Cascade)
    End Sub

    Private Sub Form2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form2ToolStripMenuItem.Click
        Form2.MdiParent = Me
        Form2.Show()
    End Sub

    Private Sub Form3ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form3ToolStripMenuItem.Click
        Form3.MdiParent = Me
        Form3.Show()
    End Sub

    Private Sub Form4ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form4ToolStripMenuItem.Click
        Form4.MdiParent = Me
        Form4.Show()
    End Sub

    Private Sub Form5ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form5ToolStripMenuItem.Click
        Form5.MdiParent = Me
        Form5.Show()
    End Sub
End Class
Demikian Sedikit Info yang dapat saya berikan...

latihan 4

isian listbox pada vb.net 2010

kali ini saya akan sedikit menceritakan tentang mengisi listbox..

mari kita lihat contoh gambar form berikut...

dalam form tersebut kita bisa mengisikan angka ke listbox1 dengan meng klik tombol 1-10
maka akan keluar angka di listbox satu dari 1 sampai 10..

beginilah hasilnya...

 intinya saat ini kita belajar bersama mengenai bagaimana cara memasukkan isian dalam sebuah listbox..

sedikit coding yang bisa saya berikan moga bermanfaat....

demikianlah sedikit informasi yang dapat kami sampaikan...



TERIMA KASIH

Kumpulan Link Tugas

Nama : Avin Rizqie
NIM  : 11.11.2076
Kelas : TI 11 Sore


1. Tugas Pemrograman Visual 1
2. Tugas Pemrograman Visual 2
3. Tugas Pemrograman Visual 3
4. Tugas Pemrograman Visual 4
5. Tugas Pemrograman Visual 7
6. Tugas Pemrograman Visual 8
7. Tugas Pemrograman Visual 9
 

Tugas 3

Latihan if case

1. semua tempat input data dan tombol clear non aktif
    semua dinonaktifkan secara manual melalu properties enable = false..
 
    ini hasilnya...
 

2. setelah di klik tombol isi data maka akan tampil seperti gambar berikut...

     codingnya sebagai berikut...
 

   
Latihan Puzzle..

Tampilan Puzzle awal sudah acak..

Tampilan Puzzle setelah dimainkan dan berhasil...

Sedikit gambaran coding...

Demikian sedikit ilmu yang bisa saya salurkan...

Tugas 2

       LATIHAN 1 

       Yang menyebabkan error pada btalamat1_Click pada baris alamat = “Jatisawit"

       Karena menggunakan Variable Const,  Sedangkan Const itu sendiri Adalah pengenal yang digunakan untuk  menyimpan data dan nilainya tidak dapat berubah ubah pada saat program dijalankan. Pada btalamat1 variabel alamat belum dideklarasikan sehingga terjadi kesalahan, supaya tidak terjadi kesalahan pada Const alamat = “Jatisawit” diganti dengan Public alamat = “Jatisawit".

a   Mengapa ketika program dijalankan, saat menekan tombol Nama 1 dan Nama 2 hasil yang ditunjukkan di textbox nama berbeda hasilnya? Sedangkan pada tombol Alamat 1 dan Alamat 2 hasilnya sama

   Karena pendeklarasian yang dipakai pada btnama1  adalah Dim nama As String nama = “Avin” dan pendeklarasian  yang dipakai pada btnama2  adalah Public Const nama As String = “Avin Rizqie” yang ada pada module form sehingga membuat suatu konstanta pada form. Dan mengapa hasil Alamat 1 dan Alamat 2 sama? Ini terjadi karena pendeklarasian konstanta  menggunakan Const alamat = “Jatisawit“ yang ada pada form satu, sehingga yang digunakan yang ada pada Form satu.

j

     Mengapa saat ditekan tombol Tambah Umur 1 hasil yang keluar menunjukkan angka  1 dan tombol Tambah Umur 2 , umur selalu bertambah 1 dari umur sebelumnya?

    Perbedaan ini terletak pada Variabel yang digunakan pada bttambahumur1 menggunakan Variabel Dim sedangkan pada bttambahumur2 menggunakan Variabel Static.  Dim hanya akan menjalankan program  satu kali  atau selalu diulang sedangkan Static  tidak akan hilang tetapi akan terus bertambah satu, karena menggunakan operasi  umur += 1

      

      Analisa untuk Form dua

dengan menggunakan Option Explicit Off maka bisa memesan variabel dengan cara mengisi nilai tanpa menyebutkan tipe datanya dan akan secara otomatis string. Hasil yang keluar di Form dua diambil dari Modul yang telah dibuat.

Latihan 2

1. Terjadi kesalahan pada pendeklarasian akhir, seharusnya untuk nama barang = Tas dan harga belum dideklarasikan sehingga saat kita memilih TAS harga tidak keluar, seharusnya diganti dengan

 case "TAS"

 namabarang = "TAS"

 harga =300000

agar saat diipilih TAS akan muncul harga 

 

2.  Penempatan txtbayar.Clear () dan txtdiskon.Clear () diletakan dibawah Me.radiokredit.Checked = False

Agar saat ditekan Clear tampilan kosong.

demikian yang bisa saya sampaikan dan terima kasih.