Devilzc0de Forum Follow @devilzc0de
  • Home
  • Hacking
  • Networking
  • Programming
  • O.S
  • Server
  • Tweets
  • Search
  • Member List
  • Calendar
Current time: 05-20-2013, 06:17 AM Hello There, Guest! (Login — Register)
Devilzc0de Forum › Information Technology › Programming › Visual Basic v
« Previous 1 ... 6 7 8 9 10 ... 14 Next »

membuat program mesin kasir sederhana

Home General Computer Multimedia Business Lounge

Pages (3): 1 2 3 Next »
Post Reply 
Tweet
Threaded Mode | Linear Mode
membuat program mesin kasir sederhana
04-08-2012, 12:31 PM (This post was last modified: 04-08-2012 01:54 PM by genta.)
Post: #1
genta Offline
soutboxer
Posts: 961
Joined: Jan 2012
Reputation: 67
Thumbs Down membuat program mesin kasir sederhana
Asalamualikum cuteboy ........ salam logodc
ketemu lg sama ane lonceng gentayangan newbie yg suram ........ne bekas semalem jalan2 di s mbah google nemu ginian kali aja dapet bermanfaat lngsung aja deh smangat

[Image: di-2YHF.jpg]
ini memakai
Code:
10 label
5 command
5 textbox

Private Sub Command1_Click()
If Text1.Text = "" Then
pesan = MsgBox("nama barang masih kosong , mohon diisi !", vbInformation, "peringatan")
End If
If Text2.Text = "" Then
pesan = MsgBox("harga masih kosong, mohon di isi!, vbinformation,:peringatan")
End If
If Text3.Text = "" Then
pesan = MsgBox("jumlah masih kosong, mohon diisi !", vbInformation, "peringatan")
Else
a = Int(Text2.Text)
b = Int(Text3.Text)

Text4.Text = a * b
Label6.Visible = True
Label9.Visible = True
Label9.Visible = a * b
Label8.Visible = True
End If
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Label6.Visible = False
Label7.Visible = False
Label8.Visible = False
Label9.Caption = ""
End Sub

Private Sub Command3_Click()
d = Int(Text4.Text)
e = Int(tex5.Text)
f = e - d

Label9.Visible = True
Label9.Caption = f
Label7.Visible = True
Label8.Visible = True
End Sub

Private Sub Command4_Click()
Text5.Text = ""
Label6.Visible = False
Label7.Visible = False
Label8.Visible = False
Label9.Caption = ""
End Sub

Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Label6.Visible = False
Label7.Visible = False
Label8.Visible = False
Label9.Caption = ""
End Sub

Private Sub form_load()
Label6.Visible = False
Label7.Visible = False
Label8.Visible = False
End Sub

mohon tambahany jg om karna ini gak sempurna ..bila hanya menjadi sampah silahkan di apus aja om pasrah cukup sekian untuk kali ini
wasalmualikum mohon
Find all posts by this user
Quote this message in a reply
 Reputed by :  DC_Julianz(+1) , nanda(+1) , DnA19(+1) , fuxnbums(+1) , Touch Screen(+1) , balonimia(+1)
04-08-2012, 12:43 PM
Post: #2
DC_Julianz Offline
Null
**
Moderators
Posts: 2,013
Joined: Sep 2011
Reputation: 70
RE: membuat kasir sederhana
smangat keren omz bagus buat newbie mantap

kalo mau share hasil programnya 1 threat aja omz tapi bilang ini update ketawa


NB : cuma saran newbie malu
Visit this user's website Find all posts by this user
Quote this message in a reply
04-08-2012, 12:54 PM
Post: #3
balonimia Away
Ustad Devilzc0de
*****
DeMT Team
Posts: 681
Joined: Dec 2011
Reputation: 14
RE: membuat kasir sederhana
'membuat kasir' ambigu nih judulnya ngakak
Find all posts by this user
Quote this message in a reply
04-08-2012, 01:13 PM
Post: #4
zenonk Offline
./Devilz 1st Cadet
Posts: 16
Joined: Apr 2010
Reputation: 0
RE: membuat kasir sederhana
mantap om, tapi ane gk biasa pake VB, kebiasaan di java.. ketawa
Find all posts by this user
Quote this message in a reply
04-08-2012, 01:16 PM
Post: #5
kodokgokil Offline
./Devilz 1st Cadet
Posts: 4
Joined: Feb 2012
Reputation: 0
RE: membuat kasir sederhana
jadi ngiler pengen maen vb lagi hore
Find all posts by this user
Quote this message in a reply
04-08-2012, 01:17 PM
Post: #6
edhocosma Offline
./Devilz Officer
Posts: 140
Joined: Jan 2012
Reputation: 29
RE: membuat kasir sederhana
Membuat Kasir Atau Membuat Mesin Kasir ? ngakak

Nice Info dEH wawa
Visit this user's website Find all posts by this user
Quote this message in a reply
04-08-2012, 01:20 PM
Post: #7
nanda Away
Wahyu Adi Prasetyo
**
Moderators
Posts: 2,010
Joined: Aug 2011
Reputation: 119
RE: membuat kasir sederhana
mantap
judulnya membuat kasir apa membuat program kasir bingung
Find all posts by this user
Quote this message in a reply
04-08-2012, 01:42 PM (This post was last modified: 04-08-2012 01:50 PM by genta.)
Post: #8
genta Offline
soutboxer
Posts: 961
Joined: Jan 2012
Reputation: 67
RE: membuat kasir sederhana
(04-08-2012 12:43 PM)DC_Juli24 Wrote:  smangat keren omz bagus buat newbie mantap

kalo mau share hasil programnya 1 threat aja omz tapi bilang ini update ketawa


NB : cuma saran newbie malu

siap om ,,,,,,,mkasih om tas ijo2nya mantap
(04-08-2012 12:54 PM)balonimia Wrote:  'membuat kasir' ambigu nih judulnya ngakak

nggk sadar juduly om malah kya gtu prustasi ........soaly bikiny agak buru2 dead
(04-08-2012 01:16 PM)kodokgokil Wrote:  jadi ngiler pengen maen vb lagi hore
om punya modul2 tentang vb gak om hmm

(04-08-2012 01:20 PM)DC_Nanda23 Wrote:  mantap
judulnya membuat kasir apa membuat program kasir bingung
program kasir om suram
(04-08-2012 01:13 PM)zenonk Wrote:  mantap om, tapi ane gk biasa pake VB, kebiasaan di java.. ketawa
wah ane belum pernah nyoba java om pasrah dead
Find all posts by this user
Quote this message in a reply
04-08-2012, 02:00 PM
Post: #9
balonimia Away
Ustad Devilzc0de
*****
DeMT Team
Posts: 681
Joined: Dec 2011
Reputation: 14
RE: membuat program mesin kasir sederhana
akhirnya ganti judul
Find all posts by this user
Quote this message in a reply
04-08-2012, 02:04 PM
Post: #10
genta Offline
soutboxer
Posts: 961
Joined: Jan 2012
Reputation: 67
RE: membuat program mesin kasir sederhana
(04-08-2012 02:00 PM)balonimia Wrote:  akhirnya ganti judul
iya om pasrah .................. pasrah
Find all posts by this user
Quote this message in a reply
« Next Oldest | Next Newest »
Pages (3): 1 2 3 Next »
Post Reply 


Topic Tools
Topic Link :
BBCode :
HTML Code :
View a Printable Version Send Thread to a Friend Subscribe to this thread
Submit Google Submit Face book Submit to Digg Submit to Reddit Submit to Furl Submit to Del.icio.us Submit to Jeqq

Possibly Related Threads...
Thread: Author Replies: Views: Last Post
Thumbs Up [Tutor] Membuat Deteksi IP Komputer Dengan VB 6 [DC]Anak-Baru 12 277 05-14-2013 09:53 AM
Last Post: tresna
  [Tutor] membuat antivirus dri VB6 BlaCk CyBeR 32 8,422 05-14-2013 12:39 AM
Last Post: tresna
  [Tutor] membuat fungsi operator genta 10 519 04-13-2013 10:07 AM
Last Post: bombom
Wink [Tutor] Membuat USB Defender Mr.Robot 13 295 04-06-2013 03:37 PM
Last Post: najong
Thumbs Up [Tutor] Membuat Serial Crack Smadav With VB 6 Rakagi 29 1,174 03-23-2013 11:24 AM
Last Post: lanionk
  [Tutor] Membuat program penyimpan password ( bagi yang pelupa ) [vb.net] nanda 24 922 03-22-2013 09:51 PM
Last Post: engkas04
  [Ask] cara memunculkan contextmenu pada visualbasic.NET saat program di run kenta 6 130 01-21-2013 09:01 AM
Last Post: kenta
  Program Perpustakaan RUD1 8 265 01-07-2013 02:40 PM
Last Post: ino_ot
  [Solved] program aplikasi parkir Dj5mile 7 192 01-04-2013 08:49 PM
Last Post: Dj5mile
  [Tutor] Membuat Credit Card Cheker menggunakan vb6 nanda 19 2,057 01-02-2013 11:27 AM
Last Post: nanda

Users Browsing
1 Guest(s)

  • Contact Us
  • devilzc0de
  • Return to Top
  • Mobile Version
  • RSS Syndication
  • Help
Current time: 05-20-2013, 06:17 AM Powered By MyBB, © 2002-2013 MyBB Group. Theme created by Justin S. | Mixed By Chaer.Newbie | Fixed By Aditya

USING THIS SITE INDICATES THAT YOU HAVE READ AND ACCEPT OUR TERMS. IF YOU DO NOT ACCEPT THESE TERMS, YOU ARE NOT AUTHORIZED TO USE THIS SITE