if then else sorsusu
Tarih
27/04/2014 22:19
Konu Sahibi
kazanovaykut
Yorumlar
5
Okunma
885
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ü 
Sponsor Reklam
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.855
02/04/2010
İzmir
Ofis 2003
Dün,11:34
Çözüldü 
Sponsor Reklam
İ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.804
04/08/2009
İstanbul
Ofis 2007
Çö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.

Cevapla

kazanovaykut
Üye
Kullanici Avatari
Üye
33
6
15/11/2008
0
Ülke Dışı
Ofis 2003
30/05/2014,15:30
Çözüldü 
Sponsor Reklam
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.189
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,17:41
Çö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, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya