Skip to main content

AccessTr.neT


Etiketler
Yazar: Hayri16 - Cevaplar: 21 - İzleme: 8166
If-then-else şartını daha kısa nasıl yazabilirim?
Değerli Arkadaşlar;
Formumdaki 10 ayrı grup alanındaki verilere göre komut tuşlarını aktif pasif yapmak istedim. Oldukça uzun bir kod ortaya çıktı. Aynı zamanda istediğimi de yapmadı. Aşağıda verdiğim kodları daha kısa yazma imkanım var mı? Sevgi ve saygılarımla...[code]'1.ilacı kontrol
If Alan9 = Null Or Alan9 = "" Or Alan9 = Empty Then
Komut154.Enabled = False
Else
If Alan10 = Null Or Alan10 = "" Or Alan10 = Empty Then
Komut154.Enabled = False
Else
If Alan11 = Null Or Al
Yazar: berk_okan - Cevaplar: 1 - İzleme: 2647
Visual Basic .NET - Ders 71 : If Else Örnek
https://youtu.be/-svlZQxx5vM
Yazar: saslan33 - Cevaplar: 9 - İzleme: 3658
if&else
Arkadaşlar kolay gelsin
Desteklerinizle bir program hazırlamaya çalışıyorum.
a= Tedbir Başlama Tarihi
b= Tedbir Süresi
c= Tedbir Sonlandırma Tarihi
d= Tedbir Bitiş Tarihi

Arkadaşlar a ve b alt tablodan otamatik değerlerini alıp hücrelerini dolduruyor.

Ben bir buton oluşturup tıkladığında komutuna bir formül uygulamak istiyorum. Uyguludımd ama bir yerde hata yapıyorum.

if c="" then
d=a+b
else
d=c
end if

Yani arkadaşlar tedbir sonlandırma tarihi boşso d ye a ile b yi toplayıp
Yazar: akdemir1 - Cevaplar: 6 - İzleme: 3246
İf ve Else Kullanımı
Merhaba Arkadaşlar aşağıdaki kodda if - elseif ve else komutlarının kullanımı doğrumudur sizce.? veya düzeltmem gereken bir yer varmıdır.?

[vb]Private Sub Komut24_Click()
If IsNull(Me.Açılan_Kutu2) Or IsNull(Açılan_Kutu4) Or IsNull(Metin8) Or IsNull(Metin10) Then

If MsgBox("Alanların Tamamı Veya Bir Kısmı Boş..." & vbCr & "Herhangi Bir Kayıt Yapılmadan Kapatılsın mı.?", vbInformation + vbYesNo, "ERZURUM OTOMASYON") = vbYes Then

' cevap evet ise alttaki denetimi yap çık, değilse for
Yazar: kazanovaykut - Cevaplar: 5 - İzleme: 2186
if then else sorsusu
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
Yazar: Oğuz Türkyılmaz - Cevaplar: 3 - İzleme: 364
Vba Da İf Else Elseıf Yapısı Hakkında Bir Soru.
Merhaba
Uygulamam da Menuden tıklandığında açılan pergole formumda Cephe Ölçüsü textbox'ının exit olay yordamına yazdığım kod da bana çok garip gelen neden olmadığı konusunda anlamlandıramadığım bir durum var. 2 şartım var. 1.si Girilen cephe ölçüsü değerinin 8000 e eşit ve büyük olduğu bir durumda ray sayısını 3 den 4 e arttırmak ki bu durumu gerçekleştiriyorum yazdığım kodda. 2.si ise Girilen Cephe ölçüsü değeri eğer 4000 den küçük ise bu seferde ray sayısını 3 den 2 ye düşürmek. Bunu bir
Task