vb 2010 boolean kontrolü

[alicevik1994]

Merhabalar...

Direk konuya gireceğim. Yaptığım programda 3 adet text kutusu ve 1 adet button kullandım. Ve eğer 1. kutudaki rakam 13 , 2. kutudaki rakam 14 ve 3. kutudaki rakam 15 ise a,b ve c değişkenleri aktif olacak. Yani
dim a,b,c as boolean

if textbox1.text = 13 then
a = true
end if
if textbox1.text = 14 then
b = true
end if
if textbox1.text = 15 then
c = true
end if

Şimdi butona bastığımda eğer a ve b = true ise bana bir adet mesaj kutusu çıkartmasını istiyorum. Yazdığım kod:
if (a = true) & (b = true) then
msgbox("Ahjaf")
end if
Fakat butona bastığım zaman bana hata veriyor. Aynı kodu parantezsiz yazdım yine hata aldım. Fakat

if a = true then
msgbox("Ahjaf")
end if

yazdığım zaman hatasız bir şekilde program çalışıyor. Benim bilmek istediğim ise a ve b = true ise mesaj kutusunun çıkması. Bunu nasıl yapabilirim.


Teşekkürler...

[VbMatik]

Biraz Mantıklı Düşün.

If a = True And b = True Then
Msgbox("VbMatik")
Else
End If

Böyle Yap. Onun Dışında A, B ve C'nin True olması için hepsinin o yazdığın rakamlara ulaşması gerekiyor diyorsun ama kodu

if textbox1.text = 13 then
a = true
end if
if textbox1.text = 14 then
b = true
end if
if textbox1.text = 15 then
c = true
end if

Yapıyorsun. Bu şeklide herhangi birisi o sayıya ulaşınca o true olur diğerleri bu durumdan etkilenmez eğer hepsinin gereken sayılara ulaştığı anda hepsinin aynı anda true olmasını istiyorsan:

If a = 13 and b = 14 and c = 15 then
a = true
b = true
c= true
else
a = false
b = false
c = false
end if

Kodunu Kullan. Kolay Gelsin.

[azad929]

dostum yanlış anlamazsan eğer;
konu başlığın biraz yanıltıcı, yardım almak değilde anlatım gibi bir his uyandırıyor.sorun çözülmediyse yardımı olabilirim.kolay gelsin

[alicevik1994]

Biraz Mantıklı Düşün.

If a = True And b = True Then
Msgbox("VbMatik")
Else
End If

Böyle Yap. Onun Dışında A, B ve C'nin True olması için hepsinin o yazdığın rakamlara ulaşması gerekiyor diyorsun ama kodu

if textbox1.text = 13 then
a = true
end if
if textbox1.text = 14 then
b = true
end if
if textbox1.text = 15 then
c = true
end if

Yapıyorsun. Bu şeklide herhangi birisi o sayıya ulaşınca o true olur diğerleri bu durumdan etkilenmez eğer hepsinin gereken sayılara ulaştığı anda hepsinin aynı anda true olmasını istiyorsan:

If a = 13 and b = 14 and c = 15 then
a = true
b = true
c= true
else
a = false
b = false
c = false
end if

Kodunu Kullan. Kolay Gelsin.

Teşekkür ederim haklısın. İşte benimde hatam bu herşeyi düşünürüm ama doğru olanı asla düşünmem .D . Teşekkür ederim yarımın için

[VbMatik]

önemli değil, ne demek