Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
04/11/2010 15:19
Konu Sahibi
gitarc
Yorumlar
4
Okunma
4128
Konuyu Oyla:
  • Derecelendirme: 5/5 - 1 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 5/5 - 1 oy
Kullanici Avatari

gitarc

Aktif Üye
Aktif Üye
 34
14
01/11/2010
0
Balıkesir
Ofis XP
01/05/2018,13:01
Eklenecek nesneler: text
command button

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub Command1_Click()
Dim i, j
Cls
i = Val(Text1.Text)
j = Int(i / 100)
Print j; " Tane 100 YTL Vardır "
i = i Mod 100
j = Int(i / 50)
Print j; " Tane 50 YTL Vardır "
i = i Mod 50
j = Int(i / 20)
Print j; " Tane 20 YTL Vardır "
i = i Mod 20
j = Int(i / 10)
Print j; " Tane 10 YTL Vardır "
i = i Mod 10
j = Int(i / 5)
Print j; " Tane 5 YTL Vardır "
i = i Mod 5
j = Int(i / 1)
Print j; " Tane 1 YTL Vardır "
i = i Mod 1
End Sub

Private Sub Form_Load()
Text1.ToolTipText = "Para Miktarını Giriniz"
End Sub<b></b>


Ek Dosyalar
.exe   BANKOT Hesapla.exe(Dosya Boyutu: 20 KB / İndirme Sayısı: 52)
PROGRAMMER MEHMET

Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 40
10.966
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Paylaşım için teşekkürler


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

Kullanici Avatari

okileturc

Aktif Üye
Aktif Üye
OK.... VA....
 60
966
18/03/2009
459
İzmir
Ofis 2003
23/05/2016,13:38
Uygulama için teşekkürler.


okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

assenucler

Gümüş Üye
Gümüş Üye
A..... SE.... ŞE....
2.054
31/10/2008
63
İstanbul
-
20/07/2018,18:42
Sayın gitarc;

Günaydın.. Çalışma ve paylaşım için teşekkürler..

Biliyorsunuz para birimimiz "TL"... "YTL" yı düzelmeniz mümkün müdür?



Kullanici Avatari

akin

Üye
Üye
 25
1
0
24/01/2011
0
Denizli
Belirtilmemiş
26/01/2011,14:44
bu programın exe değilde visual basic yapımı varmı




Konuyu Okuyanlar: 1 Ziyaretçi

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.