if then else sorsusu
Tarih
27/04/2014 22:19
Konu Sahibi
kazanovaykut
Yorumlar
5
Okunma
870
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



kazanovaykut
Üye
Kullanici Avatari
Üye
33
6
15/11/2008
0
Ülke Dışı
Ofis 2003
30/05/2014,15:30
Çözüldü 
merhaba arkadaslar accessde kargo takip programı yapmaya calısıyorum biyerde takıldım.

eger acılan kutu56 (gonerim sekli) TIR secilirse
metin67'ye (odenen tutara)
metin52 (kg) * 6 ile carpıp metin 67 ye yazmasını

eger kutu56 (gonerim sekli) UCAK secilirse
metin67'ye (odenen tutara)
metin52 (kg) * 9,5 ile carpıp metin 67 ye yazmasının istiyorum.

Açılan Kutunun AfterUpdate Olayına;

Metin67=""
Metin52=""
If Açılan Kutu56.value = "TIR" Then
Metin67.Value = metin52*6
Elseif Açılan Kutu56.value = "UCAK" Then
Metin67.Value = metin52*9,5
Else
End If

boyle yazlıyorum ama hata veriyor.
ekte dosyayı gonderiyorum kargo takip alt forumunda gerekli degisikligi yapmam gerekli.

yardımcı olurmusunuz üstadlar


Ek Dosyalar
.rar   MUSTERI TAKIP2.rar (Dosya Boyutu: 877,72 KB / İndirme Sayısı: 5)
Cevapla


akdemir1
Aktif Üye
Kullanici Avatari
Aktif Üye
T.... S....
189
05/06/2011
11
Erzurum
Ofis XP
13/10/2016,21:30
Çözüldü 
Bu alt form program açıldığında tam olarak nerede acaba.?
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla


POWER
Uzman
Kullanici Avatari
Uzman
U.... Ö....
1.848
02/04/2010
İzmir
Ofis 2003
Bugün,02:03
Çözüldü 
İncelermisiniz...

Lütfen olumlu veya olumsuz geri dönüş yapınız...


Ek Dosyalar
.zip   MUSTERI TAKIP2.zip (Dosya Boyutu: 1,47 MB / İndirme Sayısı: 7)
Please return your positive or negative ...
Cevapla


atoz112
Uzman
Kullanici Avatari
Uzman
4.388
04/08/2009
İstanbul
Ofis 2007
Bugün,14:32
Çözüldü 
merhaba sayın kazanovaykut,

seçime göre işlem yapmak için select...case komutunu kullanabilirsiniz.

acılan kutu56'nın güncelleme sonrasında olayına aşağıdaki kodu ekleyerek sonucu elde edebilirsiniz.

Visual Basic Code
1
2
3
4
5
6
Select Case Açılan_Kutu56
Case "TIR"
Me.Metin67 = Me.Metin52 * 6
Case "UCAK"
Me.Metin67 = Me.Metin52 * 9.5
End Select


iyi çalışmalar,
saygılar.

Herkes,kendisinin AR-GEcisidir...
Cevapla


kazanovaykut
Üye
Kullanici Avatari
Üye
33
6
15/11/2008
0
Ülke Dışı
Ofis 2003
30/05/2014,15:30
Çözüldü 
saygıdeger ustadlar yardımlarınız icin coktesekkür ederim özellikle POWER ve ATOZ ustam elleriniz dert gormesi cok saolun, tamda istedigim buydu..
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.041
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,07:45
Çözüldü 
(27/04/2014, 22:42)akdemir1 Adlı Kullanıcıdan Alıntı: Bu alt form program açıldığında tam olarak nerede acaba.?

Site kurucusu olarak bende akdemir1'e yardımcı olma çabasından dolayı teşekkür ediyorum.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi



Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya