Silahkan di pastekan link tugas anda di koment saya ini, untuk kelas Tugas SI-M1206. Jangan lupa untuk membuat link seperti ini Tugas Belajar Bahasa Pemrograman yang mengarah ke postingan saya ini, di postingan tugas anda.
Terima kasih.
Home »
tugas kuliah
» Tugas 2013 Ganjil SI-M1206
Tugas 2013 Ganjil SI-M1206
Written By Mesran on Friday 1 November 2013 | 19:31
Silahkan di pastekan link tugas anda di koment saya ini, untuk kelas Tugas SI-M1206. Jangan lupa untuk membuat link seperti ini Tugas Belajar Bahasa Pemrograman yang mengarah ke postingan saya ini, di postingan tugas anda.
Terima kasih.
Nama : Gyanti Eko Retno N
ReplyDeleteNpm :13110037
Kelas : TI-M1206
link tugas :
http://www.miechanmon.blogspot.com/2013/11/tugas-belajar-bahasa-pemrograman.html
Nama : Hendika Yupramana Putra
ReplyDeleteNPM : 12110328
ini Link tugas saya Pak
Tugas Latihan
Nama : Raditya Dwi Ajie Nugroho
ReplyDeleteNpm :13110038
Kelas : TI-M1206
link tugas :
http://gamerszlover.blogspot.com/2013/11/tugas-belajar-bahasa-pemograman.html
NPM : 12110328
ReplyDeleteNama : Hendika Yupramana Putra
Kelas : SI-M1206
Tugas Belajar Bahasa Pemrogaman
Nama : Delima Veronica Siagian
ReplyDeleteNPM : 12110445
Kelas : SI-M1206
http://delimacute.blogspot.com/2013/11/tugas-mencari-nilai-mahasiswa.html
Nama :ARI IRAWAN
ReplyDeleteKelas :SI-M1206
silahkan di klik pak TUGAS SAYA
Nama : Khairul Azmi
ReplyDeleteNPM : 12110376
Kelas : SI-M1206
Silahkan Lihat Tugas saya Pak
Nama : SURATMI
ReplyDeleteNPM : 12110447
Kelas : SI-M1206
link tugas : http://miemiechups.blogspot.com/2013/11/belajar-bahasa-pemrograman.html
Nama : Isati Albertus Laoly
ReplyDeleteNPM : 12110575
Kelas : SI-M1206
Link Tugas : Belajar Bahasa Pemograman
Nama : Novi Andriani
ReplyDeleteNPM : 12110357
Kelas : SI - M1206
Link Tugas : Novi Andriani
Nama : Siti Nurul Khalisah
ReplyDeleteNPM : 12111038
Kelas : SI - M1206
Link Tugas : Blog Siti
Nama : Tison November S
ReplyDeleteNPM : 12110248
Kelas : SI-M1206
link tugas : www.novemberainstisoen.blogpsot.com
Nama : Raditya Dwi Ajie Nugroho
ReplyDeleteNpm :13110038
Kelas : SI-M1206
link tugas :
http://gamerszlover.blogspot.com/2013/12/tugas-belajar-bahasa-pemograman.html
Nama : james sitohang
ReplyDeleteNpm: 12110234
Kelas:SI M 1206
link tugas:http://jamessitohang512.blogspot.com/2013/12/belajar-bahasa-pemograman.html
Tugas Quis Online 8 Desember 2013
ReplyDeleteMalam pak,
ini tugas 1 saya ya pak :
NPM : 12110671
Nama : Putra Sejati Sinaga
Kelas : SI-M1206
alamt link : http://putra-ss.blogspot.com/
2). dan ini tugas 2 ya pak ;
Public Class Form1
Sub buatTabel()
lv.Columns.Add("No Pembelian", 80, HorizontalAlignment.Center)
lv.Columns.Add("Kode Barang", 80, HorizontalAlignment.Center)
lv.Columns.Add("Nama Barang", 180, HorizontalAlignment.Left)
lv.Columns.Add("Merk", 180, HorizontalAlignment.Left)
lv.Columns.Add("Harga", 180, HorizontalAlignment.Left)
lv.Columns.Add("Jumlah Beli", 180, HorizontalAlignment.Left)
lv.Columns.Add("Total Harga", 180, HorizontalAlignment.Left)
lv.View = View.Details
lv.GridLines = True
lv.FullRowSelect = True
End Sub
Sub isitabel()
Dim lst As New ListViewItem
lst.Text = np.Text
lst.SubItems.Add(kb.Text)
lst.SubItems.Add(nb.Text)
lst.SubItems.Add(mrk.Text)
lst.SubItems.Add(hrg.Text)
lst.SubItems.Add(jp.Text)
lst.SubItems.Add(th.Text)
lv.Items.Add(lst)
End Sub
Private Sub GroupBox1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GroupBox1.Enter
End Sub
Private Sub ListView1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lv.SelectedIndexChanged
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
buatTabel()
kb.Items.Add("ts001")
kb.Items.Add("ts002")
kb.Items.Add("vg001")
kb.Items.Add("vg002")
End Sub
Private Sub kb_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles kb.SelectedIndexChanged
Select Case kb.Text
Case "ts001"
mrk.Text = "Toshiba"
nb.Text = "Flashdisk 4 GB"
hrg.Text = 105000
Case "ts002"
mrk.Text = "toshiba"
nb.Text = "flashdisk 2 GB"
hrg.Text = 75000
Case "vg001"
mrk.Text = "v-gen"
nb.Text = "flashdisk 4 GB"
hrg.Text = 900000
Case "vg002"
mrk.Text = "vgen"
nb.Text = "flashdisk 2 GB"
hrg.Text = 60000
End Select
End Sub
Private Sub mrk_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mrk.TextChanged
End Sub
Private Sub btnsimpan_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsimpan.Click
th.Text = jp.Text * hrg.Text
isitabel()
np.Text = ""
kb.Text = ""
nb.Text = ""
mrk.Text = ""
hrg.Text = ""
jp.Text = ""
th.Text = ""
End Sub
Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click
End
End Sub
Private Sub btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapus.Click
lv.Items.Clear()
End Sub
Private Sub Btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btnbersih.Click
lv.Items.Remove(lv.SelectedItems(0))
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
lv.Items.Remove(lv.SelectedItems(0))
End Sub
End Class
Ini tugas saya ya pak
ReplyDeleteNama : Zainal Suroh Siregar
Alamt Link : http://zainalsuroh.blogspot.com/
nama : haris setiawan
ReplyDeletekelas : SI-M 1206
npm : 12110262
Tugas List View
Nama:ardiansyah
ReplyDeleteNpm :12110263
kls :SI-M 1206
TUGAS SAYA PAK......
pak ini tugas artikel saya,
ReplyDeletenama : sutra purnama sari simanjuntakl
npm : 12111076
kelas : SI-M1206
alamat link :http://sutrapurnamaniz.blogspot.com/
terimah kasih yaa pak
Nama : Ike Wiwik Nurjanah
ReplyDeleteNPM : 12110043
Kelas : SI-M1206
Link : http://ikewiwik.blogspot.com/2013/12/v-behaviorurldefaultvmlo.html
Nama : Muthia Khanza
ReplyDeleteNPM : 12110554
Kelas : SI-M 1206
Link : http://khanzaira.blogspot.com/
Nama : Raudatul hasanah
ReplyDeleteNPM : 12110555
Kelas : SI-M1206
Link : http://raudatulhasanah1994.blogspot.com/