drum virtual

asalamualaikum.. wr wb..

met hari idul fitri .... mohon maaf lahiir batin,,, di hari yang masih hari lebaran ini saya kembali akan post tentang drumm,,, pastinya bukan drum beneran sihh cuma drum virtual yang bisa di mainkan pake keybord buat nyoba2 mengasah  main drum kita heee,,, ini main drum nya bisa sambil facebookan loha heee,, and dengerin lagu heheh disama- samain aja sama nada lagunya hahha,,, nie aku kasih screen shotnya,,

di sana sudah ada cara mainin tuh drumm tinggal pijit aja,, tapi butuh ke ahlian khusus lohh heee ,,, silakan coba,,,
 dan banyak macam drumya juga atau kamu mau belajar gaya2 drum para ahli bisa juga,,,  kumplit dehh,,,

kalo berminat coba disini klik aja disini

Baca Selengkapnya »

Mengenal Data Variable di visual Basic

Mengenal Data Variable di visual Basic ..

Dalam postingan ini agak telat seharusnya sebelum kita membuat program di visual basic kita harus mengenal Data yang ada di VB adalah string, integer,single, currency, date dan Boolean , itulah tipe data yang di pakai di visual basic ,, di bawah ada rincian nya ..

·         String adalah tipe data untuk teks (hurup , angka dan tanda baca)

·         Single adalah tipe data untuk angka pecahan

·         Currency adalah tipe data untuk angka mata uang

·         Integer adalah tipe data untuk angka bulat

·         Date adalah tipe data untuk tanggal dan jam

·         Boolean adalah tipe data yang bernilai  false and true

Wadah dari semua data tersebut inilah yang disebut variable .. dalam variable tertentu membutuhkan memory byte yang berbeda..

Variable di buat dari penulisan deklarasi variable di dalam kode program :

Dim nama_variable As type data

Contoh : Dim harga As Currency

Dalam penamaan variable membutuhkan aturan seperti berikut :

·         Harus diawali dengan hurup

·         Tidak boleh menggunakan spasi , spasi digan ti dengan karakter (_)

·         Tidak boleh menggunakan karakter khusus

·         Tidak boleh menggunakan kata kunci yang sudah di kenal VB

Variable hanya dapat menyimpan satu nilai sesuai dengan type data

nama_Variable  = nilai_data

Contoh ; Nama_User = “irvan”

Dan harus diapit dengan tanda baca (“ “) buat string

Variable mempunyai ruang lingkup (scope) dan waktu hidup (life time) :

·         Variable global adalah variable yang dapat dikenali seluruh bagian program dan hidup selama program berjalan

·         Variable local adalah variable yang hanya dikenali oleh satu bagian program saja.. dan hidup bila bagian program tersebut berjalan .

Dan variable yang bersipat tetap dan tidak bisa diubah biasa di sebut KONSTANTA

Penulisan deklarasi konstanta dalam kode program

Const Nilai_Konstanta As Type_Data =  nilai_data

Contoh :  Const tgl_gajian As Date = #30/01/2012#

UNTUK DATA TYPE DATE DIAPIT OLEH TANDA BACA # #

MARI KITA BUAT PROGRAM VARIABLE TEST

·         Buka vb 6  anda buat project baru dengan standar exe ..

·          Buat from baru di project .

·         Di dalam from buatlah user interface sebagai berikut

(pake label, dan commandbutton)

Buat propertisnya sbb..

From 1	Caption Star up position	Variabel Test 2-centerscreen
Command 1-3	caption	Test 1 Test 2 Test  3
Label 1-3	Back color Caption	Pallet : putih

Buka jendela code editor dan masukan code berikut,,

Dim test2 As Integer

Private Sub Command1_Click()

Dim test1 As String

test1 = "nusantara"

Label1.Caption = test1

Label2.Caption = test2

Label3.Caption = test3

End Sub

Private Sub Command2_Click()

test2 = 10

Label1.Caption = test1

Label2.Caption = test2

Label3.Caption = test3

End Sub

Private Sub Command3_Click()

Const test3 As Single = 90.55

Label1.Caption = test1

Label2.Caption = test2

Label3.Caption = test3

End Sub

Klik tombol	Nilai var. test1	Nilai var. test2	Nilai var. test3
Test 1	“nusantara”	Kali pertama : 0 Berikutnya : 10
Test2		10
Test2		10	90.55

Dim test2 As Integer = Variable test2 di deklarasikan untuk data yang bertipe Integer sebagai variable global sehingga bisa digunakan oleh semua blok program

Catatan untuk bisa di gunakan oleh semua blok program variable harus di tulis di paling atas dan pastikan object selector berisi (GENERAL) dan event selector berisi (DECLARATION)

Private Sub Command1_Click()Dim test1 As String

 =  bila user menekan tombol test 1 variable test 1 di deklarasikan untuk data yang bertype string sebagai variable local khusus blok kode command1_Clik ()

Dan seterusnya semuanya dengan proses yang sama kok hehehhe :D tinggal di pelajari ja,,,

Jangan mengatakan kamu tidak bisa ,, … saya juga sama hee ..

Sekian dan terimakasih semoga bermanfaat… !!!!!!!!

Baca Selengkapnya »

Membuat Aplikasi Penjualan Sederhana dengan Visual Basic 6.0

Membuat Aplikasi Penjualan Sederhana dengan Visual Basic 6.0

sampai jumpa lagi setelah kita membuat database yang kemarin dari microsoft acces kita bisa gabungkan dengan Visual basic sebagai aplikasi sederhananya,,  bisa juga langsung buat from di acces,,, tapi kalo di acces tampilan from nya tidak sebagus di vb sihh ,,hee

langsung saja.. buat tabel databasenya di acces seperti postingan kemarin 

Cara membuat Data Base dan aplikasi sederhana di Microsoft access

Tabel Barang

Tabel Penjualan

Tabel Penjualan Detail

Membuat Tampilan Master Barang

Sekarang membuat tampilan form master data barang. Jadi intinya, seluruh data barang yang ada dapat di input ke dalam database melalui form master barang ini. Namun sebelum bekerja membuat form ini, aktifkan dulu komponen-komponen tambahan yang diperlukan dalam form ini. Yaitu, Microsoft ADO Data Control 6.0 (OLEDB) dan Microsoft DataGrid Control 6.0 (OLEDB). Caranya klik menu Project – Components, atau tekan tombol Ctrl+T.

Pada jendela Components, pilih Microsoft ADO Data Control 6.0 (OLEDB) dan Microsoft DataGrid Control 6.0 (OLEDB). Lalu klik OK.

Hasilnya dapat dilihat di panel sebelah kiri.

Kemudian buatlah tampilan form seperti gambar di bawah ini, dengan menambahkan beberapa komponen ke dalam form, yaitu:

Frame : 4

Label : 4

TextBox : 5

CommandButton : 8

DataGrid : 1

Adodc : 2

Atur properties masing-masing komponen seperti tabel berikut :

Komponen	Properties	Nilai
Form	Name	frmBarang
	BorderStyle	1 – Fixed Single
	Caption	.:: Master Data Barang ::.
	StartUpPosition	2 – CentreScreen
Frame1	Name	Frame1
	Text
Label1	Caption	Kode
TextBox1	Name	TxtKodeBarang
	TabIndex	1
	Text
Label2	Caption	Nama
TextBox2	Name	TxtNamaBarang
	TabIndex	2
	Text
Label3	Caption	Harga
TextBox3	Name	TxtHarga
	TabIndex	3
	Text
Label4	Caption	Stock
TextBox4	Name	TxtStok
	TabIndex	4
	Text
Frame2	Name	Frame2
	Text
Command1	Name	CmdTambah
	Caption	Tambah
	TabIndex	5
Command2	Name	CmdUbah
	Caption	Ubah
	TabIndex	6
Command3	Name	CmdHapus
	Caption	Hapus
	TabIndex	7
Frame3	Name	Frame3
	Text	Masukkan Kode Barang
TextBox4	Name	TxtCari
	TabIndex	8
	Text
Command4	Name	CmdCari
	Caption	Cari
	TabIndex	9
Frame4	Name	Frame4
	Text
Command5	Name	CmdFirst
	Caption	<<
	TabIndex	10
Command6	Name	CmdPrev
	Caption	<
	TabIndex	11
Command7	Name	CmdNext
	Caption	>
	TabIndex	12
Command8	Name	CmdLast
	Caption	>>
	TabIndex	13
DataGrid1	DataSource	Adodc1
Adodc1	Name	Adodc1
	Visible	False
Adodc2	Name	Adodc2
	Visible	False

Setelah semua properties diatur, maka akan menghasilkan tampilan seperti ini:

Membuat Koneksi Database

Klik kanan komponen Adodc1 – pilih ADODC Properties.

Pada tab General di jendela Property Page, pilih Use Connection String – klik tombol Build…

Pada tab Provider pilih Microsoft OLE DB Provider for SQL Server, lalu klik Next.

Pada tab Connection isikan nama server (contoh: DELHERU), kemudian pilih Use Windows NT Integrated security, kemudian pilih Select the database on the server dan pilih database yang akan digunakan (contoh: Penjualan).

Kemudian klik tombol Test Connection lalu klik OK. Jika koneksi sukses maka akan keluar informasi berikut ini

Anda akan dihadapkan pada jendela Property Page lagi. Sekarang pilih tab RecordSource, pada Command Type pilih 2 – adCmdTable, lalu pada Table or Store Procedure Name pilih tabel Barang. Kemudian klikApply – OK.

Lakukan hal yang sama pada komponen Adodc2 seperti langkah 1-6.

Kemudian atur lagi properties TextBox (TxtKodeBarang, TxtNamaBarang, TxtHarga, TxtStok) seperti tabel di bawah ini :

Komponen	Properties	Nilai
TxtKodeBarang	DataSource	Adodc1
	DataField	Id_Barang
TxtNamaBarang	DataSource	Adodc1
	DataField	Nama_Barang
TxtHarga	DataSource	Adodc1
	DataField	Harga_Barang
TxtStok	DataSource	Adodc1
	DataField	Stok

Menulis Coding Program

Masuklah pada halaman kode, klik menu View – Code

Dari baris pertama halaman kode tulis coding untuk membuat kode barang otomatis, seperti berikut ini :

Kembali pada halaman desain form, klik View – Object. Kemudian klik ganda tombol Tambah dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda tombol Ubah dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda tombol Hapus dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda tombol Cari dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda tombol << dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda tombol < dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda tombol > dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda tombol >> dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda TextBox Harga (txtHarga)

dan tulis coding berikut ini :

Kembali pada halaman desain form. Kemudian klik ganda TextBox Stok (TxtStok)

dan tulis coding berikut ini :

Menjalankan Program

Setelah semua langkah-langkah di atas sudah selesai, Anda dapat menjalankan program tersebut dengan menekan F5atau Run. Jika segala sesuatunya sukses, maka akan muncul tampilan seperti gambar di bawah ini :

Untuk menambah data, klik tombol Tambah, lalu masukkan data seperti contoh berikut :

Kemudian klik tombol Simpan, maka data yang dimasukkan tadi telah tersimpan di database.

Untuk mengedit, mengahapus, dan mencari data, Anda bisa mencobanya sendiri.

Selesai deh ,,, maaf coding nya di tulis manual saja yaa,,, sambil belajar heee soalnya itu hasil jepretan Print Screen SysRq ,,, thanks,,, 

Quote : “Jangan pernah mengatakan “saya tidak bisa”, jika kamu belum mencobanya.”

Baca Selengkapnya »