gratis download aplikasi counter hp visual basic database ms. acces

met pagi all.. duh pagi2 gini rasanya pngen males2  nih, males bangun,males beraktifitas, males posting juga..hehehe...

karena males posting mau nulis apa juga gak tau, sekarang ane kasi contoh program vb gratis aja nih...

wah gratis...y.. ternyata ada untungnya juga ya males posting, coz jadi dapet source code aplikasi konter hp gratis.heheh

ok lah biar gak banyak omong langsung aja ni download contoh aplikasinya, aplikasi ini masih sederhana buatan ane sendiri, mudah-mudahan bisa menjadi reffernsi bagi teman-teman yang sedang belajar membuta aplikasi database dengan visual basic...

gratis download aplikasi konter hp + source code

membuka control panel windows dengan visual basic

Hai.. sahabat semua.kali ini saya ingin berbagi tips visual basic tentang cara membuka control panel windows.. ok kita langsung aja ya..

1. Buka aplikasi vb
2. dalam satu form tambahkan satu Command Button
3. double klik Command buttonya dan ketik sintak berikut ini.
     Shell "rundll32.exe shell32.dll,Control_RunDLL intl.cpl", 1

perintah diatas digunakan untuk memanggil seting waktu/regional

sintak lengkapnya adlah sebagai berikut :

Private Sub Button1_Click()
    Shell "rundll32.exe shell32.dll,Control_RunDLL intl.cpl", 1
End Sub

Note : Button diatas menggunakan button vista.ocx

Sekian dulu ya sharingnya lain kali kita akan shering lagi. jika ada pertanyaan silahkan komen.. OK :)

gratis download aplikasi penjualan (source code)

hai sahabat bloger semua, kali ini saya ingin berbagi tentang aplikasi penjualan, aplikasi ini masih sederhana dan menggunakan database acces, tapi gak papalah bisa digunakan untuk belajar buat program bagi yang baru-baru belajar. ok silahkan langsung download aja contoh programnya

gratis download aplikasi penjualan

aplikasi minimarket beta version

aplikasi ini saya buat dengan maksud agar dapat membantu para pengusaha toko atau retail, aplikasi menagani proses transaksi penjualan dan pembelian baik secara tunai maupun kredit. aplikasi ini dapat dijalankan dijaringan atau menggunakan lebih dari satu komputer, aplikasi dibuat dengan database mysql dengan tampilan yang user friendly sehingga para pengguna tidak memerlukan waktu yang lama untuk bisa mengguanakan aplikasi laporan-laporan transaksi dapat dicetak per tanggal maupun perbulan. aplikasi dapat mencetak struk penjualan secara langsung, sebaiknya menggunakan printer DOT matrix untuk mencetak struk transaksi penjualan, aplikasi juga menangani diskon bertingkat yakni diskon per kode barang dan diskon perjumlah beli barang.berikut fitur-fitur aplikasi minimarket ini

data master :
master barang
master suplier
master customer
master user
set waktu aplikasi (untuk menyesuaikan waktu komputer dengan waktu aplikasi)
keluar aplikasi


data transaksi
transaksi pembelian(tunai/kredit)
transaksi penjualan (tunai/kredit)
retur beli
retur jual
pembayaran hutang
penerimaan piutang

data back office
koreksi stok
update harga
pemasukan tambahan
pengeluaran tambahan

utility
database (semua data-data yang ada pada proses)
ganti password
set hak akses user (menentukan form apa saja yang dapat diakses oleh user tertentu)

laporan
laporan data master
laporan transaksi
grafik penjualan

silahkan instal dahulu komponen pendukung aplikasi, silahkan download di link dibawah ini

download mysql conector
download xampp server
Saya sertakan versi trial dengan penggunaan 30 kali pemakaian bukan 30 hari.
Maaf ya bukannya pelit tapi ini memang barang jualan. Yang berminat download versi trial dibawah ini.


download aplikasi mini market gratis
download cara instalasi aplikasi


Harga Rp. 1.000.000 (Aplikasi Saja)
Harga Rp. 1.500.000 (Aplikasi+Sources Code)

tapi tenang saja, saya memberikan diskon dan bonus yang sangat menarik jika anda melakukan pembelian produk ini. so jangan ditunda deh,order sekarang aja.

Note : Aplikasi ini boleh anda jual lagi dengan harga yang lebih tinggi asalkan pantas dan tidak menghilangkan nama programer

Harga Rp. 500.000 (Aplikasi + Bonus aplikasi londri,script website(10 buah))
Harga Rp. 1.000.000 (Aplikasi+Sources Code+Bonus)
Transfer Ke-
Bank Negara Indonesia (BNI)
Cabang Unlia
No. Rek 023-452-135-8
Atas Nama Wayan Virgus Susanti
jika ada pertanyaan silahkan hubungi 085788943381

membuat nomor otomatis dengan vb berdasar jumlah pakai

Dalam pembuatan aplikasi penjualan, biasanya pasti ada no fakturnya. nah biar ga repot-repot ngetik no faktur ada baiknya no fakturnya dibuat secara otomatis, jadi bisa lebih mempermudah proses transaksinya. ok langusng  aja ya..



silahkan ketikan code berikut :
Private Sub Form_Activate()
    Dim Rst As New ADODB.Recordset
    Dim s As String
   
    Rst.Open "select max(right(no_faktur,14)) as Nomor from beli_kredit", con
   
   
    If IsNull(Rst!Nomor) Then
        s = "000000000000001"
    Else
        s = "000" & Format(Rst!Nomor + 1, "000000000000")
    End If
   

    Text11 = s
End Sub

Keterangan...!
Dim Rst As New ADODB.Recordset adalah variabel yang mencari data dalam database
Rst.Open "select max(right(no_faktur,14)) as Nomor from beli_kredit", con adalah Sintax SQL untuk mencari data terakhir yang sebelah kanan dari field no_faktur sebanyak 14, asumsinya no_fakturnya maxlengtnya 15 dari tabel beli kredit. dan con adalah nama koneksinya

Ok segitu dulu ya buat hari ini seomga bisa membantu .. dan berguna. heheheh

Salam Coding

fungsi string pada vb

Selamat pagi..
Yeh akirnya bisa lanjut lagi postingnya diblog tercinta....! He..
Ok kali ini kita akan lanjutkan bahasannya mengenai fungsi string pada VB. Ok Langsung saja ke ... TKP :)

2. Fungsi Right
fungsi ini akan mengembalikan nilai sejumlah karakter dari sebelah kanan sebuah string

Bentuk Umum :
Right (string,lenght)

fungsinya hampir sama dengan Left, so contoh pada fungsi left kemarin bisa diganti denga Right

3. Fungsi Len
mengembalikan nilai numeric jumlah dari string atau variable yang ditentukan

Bentuk umum :
Len( String/variable)

contoh :
dim str 
str=Len(VBKU)
jika dijalankan maka nilai str menjadi 4

4. Ltrim
Ltrim digunakan untuk menghapus spasi disebelah kiri sebelum ditemukan karakter lain spasi. adapun fungsi 
Rtrim digunakan untuk menghapus karakter spasi dibagian kanan string. sementara untuk menghapus karakter spasi disebelah kanan dan kiri digunakan fungsi Trim

Bentuk umum :
LTrim(string)
RTrim(string)
Trim(string)

5. Mid
mid digunakan untuk mengambil sebagian isi string dengn jumlah tertentu dengan posisi yang anda tentukan 

Bentuk Umum :
Mid (String ,start ,lenght)

contoh :

dim str
str = Mid("Aplikasi VB ku ",10 , 2 ) 
maka hasilnya VB

6. Lcase dan Ucase
fungsi Lcase mengembalikan nilai string yang sudah diubah menjadi huruf kecil sedangkan Ucase mengembalikasn nilai String yang sudah diubah menjadi huruf besar.

Bentuk Umum :
Lcase( string )
Ucase (string )

7. Split
fungsi ini digunakan untuk membagi string menjadi beberapa bagian yang dimasukan dalam aray satu dimensi

Bentuk umum 
Split ( string[,delimiter[count[,compare]]])
dengan fungsi ini anda dapat memisahkan string berdasarkan pemisah (delimiter).

8. String
fungsi ini akan mengembalikan nilai karakter dengan menuliskan berulang-ulang karakter yang anda inginkan

Bentuk umum 
String (Number,caracter)

Ok sampai disini dulu ya tulisannya, besok kita akan belajar fungsi format yang ada pada VB. selalu yang saya harapkan adalah semoga tulisan ini bermanfaat untuk semua...!

fungsi konversi pada vb

Akhirnya bisa Ngotak-ngatik blog lagi...hehehe
Ok hari ini saya akan berbagi tentang fungsi-fungsi konversi pada vb, ini sangat penting loh...h n banyak para newbie yang blm tau.., ok langsung aja.!

1. FormatCurrency
ini digunakan untuk mengembalikan nilai dalam bentuk format Currency(mata uang) yang sesuai dengan pengaturan control panel.

Contoh
Dim uang
uang = FormatCurrency (1000,2) 'hasilnya Rp1.000,00


2. FormatPercent
fungsi formatpercent akan mengembalikan nilai dalam persentase

Contoh
dim persent
persent = FormatPercent ( 2/32) 'hasil 6.25%

3. Format Date  time
Contoh 

Dim tglsekarang
tglsekarang = FormatDateTime (Date,VblongDate)
Sekian dulu ya.. semoga tulisannya bermanfaat..."

Salam Coding...!