Jumat, 17 Juni 2011

Tugas Program Visual Basic (VB) I


Disini saya membuat sebuah program dengan menggunakan Microsoft Visual Basic 6.0.
Berikut adalah contoh program yang saya buat yaitu toko baju bernama Jewel Department Store.
Di bawah ini adalah gambar dari salah satu formnya, yaitu form Menu Utama.

















Ketentuan : 

1. Membuat sebuah Database melalui Microsoft Access dengan nama Depstore dan buat 3 tabel, yaitu :
    a. Tabel Pakaian
    b. Tabel Member
    c. Tabel Transaksi

2. Membuat 4 form di sebuah project pada Microsoft Visual Basic 6.0, yaitu Form_login, Form_pakaian,  Form_member dan Form_transaksi ditambah dengan 1 MDIForm untuk menu utama seperti gambar diatas.  Buat juga Data Environment dan Data Reportnya untuk menampilkan laporan-laporan data yang sudah di input. Disini terdapat 3 laporan, yaitu Laporan_member, Laporan_pakaian dan Laporan_transaksi.
Simpan database dan seluruh form di folder yang sama.

3. User dan Password pada Form_login yaitu "RATNA" dan "12345".

4. Pada Form_transaksi ketentuannya sebagai berikut :
  • pada saat dijalankan (running) form dalam keadaan tidak aktif, ketika klik TAMBAH (Command Button) form dalam keadaan bersih, aktif dan kursor ada di cmbkode.
  • pilih kode pakaian dan ID member maka merk pakaian, harga, nama member dan alamat akan muncul secara otomatis.
  • saat jumlah beli di input lalu di enter, maka jumlah bayar, diskon dan total bayar akan muncul secara otomatis.
  • saat input uang bayar maka uang kembali akan muncul secara otomatis.
  • jika jumlah beli > 10 maka dapat diskon sebesar 10%
  • jika jumlah beli > 5 maka dapat diskon sebesar 5%, selain itu tidak mendapatkan diskon.
untuk lebih lengkapnya dan contoh programnya silahkan klik disini

Terimakasih.

      ^.^

Senin, 23 Mei 2011

I Love You

I like your smile
I like your vibe
I like your style
But that’s not why I love you
And I, I like the way
You’re such a star
But that’s not why I love you

Hey
Do you feel, do you feel me?
Do you feel what I feel, too?
Do you need, do you need me?
Do you need me?

You’re so beautiful
But that’s not why I love you
I’m not sure you know
That the reason I love you is You
Being you
Just you
Yeah the reason I love you is all that we’ve been through
And that’s why I love you

I like the way you misbehave
When we get wasted
But that’s not why I love you
And how you keep your cool
When I am complicated
But that’s not why I love you

Hey
Do you feel, do you feel me?
Do you feel what I feel, too?
Do you need, do you need me?
Do you need me?

You’re so beautiful
But that’s not why I love you
And I’m not sure you know
That the reason I love you is you
Being you
Just you
Yeah the reason I love you is all that we’ve been through
And that’s why I love you

Even though we didn’t make it through
I am always here for you
You
Hey

Wish You Were Here

I can be tough
I can be strong
But with you, it's not like that at all

There's a girl
who gives a shit
behind this wall
You've just walked through it

And I remember, all those crazy things you said
You left them riding through my head
You're always there, you're everywhere
But right now I wish you were here.
All those crazy things we did
Didn't think about it, just went with it
You're always there, you're everywhere
But right now I wish you were here

Damn, Damn, Damn,
What I'd do to have you
here, here, here
I wish you were here.
Damn, Damn, Damn
What I'd do to have you
near, near, near
I wish you were here.

I love the way you are
It's who I am, don't have to try hard
We always say, say like it is
And the truth is that I really miss

All those crazy things you said
You left them riding through my head
You're always there, you're everywhere
But right now I wish you were here.
All those crazy things we did
Didn't think about it, just went with it
You're always there, you're everywhere
But right now I wish you were here

[Chorus:]
Damn, Damn, Damn,
What I'd do to have you
here, here, here
I wish you were here.
Damn, Damn, Damn
What I'd do to have you
near, near, near
I wish you were here.

[Bridge:]
No, I don't wanna let go
I just wanna let you to know
That I never wanna let go

(let go let go let go let go)

No, I don't wanna let go
I just wanna let you to know
That I never wanna let go

(let go let go let go let go let go let go let go)

Damn, Damn, Damn,
What I'd do to have you
here, here, here
I wish you were here (I wish you were)
Damn, Damn, Damn
What I'd do to have you
near, near, near
I wish you were here.

Damn, Damn, Damn,
What I'd do to have you
here, here, here
I wish you were here.
Damn, Damn, Damn
What I'd do to have you
near, near, near
I wish you were here.

Rabu, 06 April 2011

Coba Menata Kehidupan



Mencari batas mencari tepi
Mencoba menemukan keceriaan diri 
Saat hati ingin menepis lara
Namun rindu mencekam jiwa

Bila air mata jatuh mengalir
Kesesakan tiada jua berkurang
Membawa duka membumbung tinggi
Dan semua hanyalah kepedihan

Namun kini ada yang kusadari
Hidup tetap sama tak berubah
Jatuh tanpa pernah ku terbangun
Tapi aku tetap coba 'tuk menata


 *Rosalina*