Baru masuk kuliah ...

Ketemu teman-teman, ngumpul,cerita.
Dimana lagi ini dosen belum pada muncul....

Mungkin masih malas ngajar kali....
Mahasiswanya jg masih malas kuliah kali..

Masih kangen kampung n rumahnya kali, sehingga masih banyak belum muncul...

Komentar

Posting Komentar

Postingan populer dari blog ini

Latihan 39

Public Class Latihan39 Dim A As New OleDb.OleDbConnection("Provider=microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\DATAMAJEMUK.accdb") Dim dt As New DataTable Private Sub Latihan39_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim X As New OleDb.OleDbDataAdapter X = New OleDb.OleDbDataAdapter("Select BARANG.KODEBARANG, BARANG.NAMABARANG, DETAILTRANSAKSI.UNIT, DETAILTRANSAKSI.HARGA, DETAILTRANSAKSI.UNIT*DETAILTRANSAKSI.HARGA AS JUMLAH from DETAILTRANSAKSI INNER JOIN BARANG ON DETAILTRANSAKSI.KODEBARANG=BARANG.KODEBARANG WHERE NOTRANS= '" & NOTRANS070.Text & "'", A) X.Fill(dt) X.Dispose() Dim dataPrimary(1) As DataColumn dataPrimary(0) = dt.Columns("KODEBARANG") dt.PrimaryKey = dataPrimary DGV070.DataSource = dt End Sub Private Sub TOTALJUMLAH()
Baca selengkapnya

Warna Kebaikan

Gambar
Mewarnai hidup, menjadi lebih indah dan beragam dengan segala hal yang baik. Kita dapat mengibaratkan warna itu sebagai kebaikan, jika semakin banyak warna yang saling berdampingan layaknya pelangi. Maka Semakin indah pula kita melihatnya. Semakin banyak kebaikan yang kita lakukan, maka akan semakin indah hidup ini kita akan lalui.
Baca selengkapnya