Asiknya Mereka

Berlibur dapan menenangkan syaraf dan menyegarkan kembali badan dan fikiran setelah beban pekerjaan dan perkuliahan selama satu semester ini.

Berlibur sebaikx dilakukan di tempat yang indah dan menyegargan , soalnya tujuam utama berliburkan untuk penyegaran.

Kita bergumpul dengan teman-teman juga dapat dikatakan berlibur, tapi saat ini dimana teman-teman sibuk dengan kerjaanx masing-masing.

Sedih di hati yang timbul dimana sendiri menjalani hari libur di rumah. Main game, tidur, nonton tv , makan. Selama libur cuma itu yang dapat dilakukan..

Saya rindu dengan suasana ngumpul teman-teman, ketawa bersama.

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