AccessTr.neT

iyi günler çok geç farkettiğim vb ile başlayan integer değerlerini her yerde kullanabilir miyiz
mesela mesaj da dönen sonucu
if sonuc = vbyes 
if sonuc= 6
if sonuc= 22 mod 8
if sonuc = vbCancel * vbAbort

veya
vbInformation = vbYesNo * vbCritical
vbExclamation = vbQuestion + vbAbortRetryIgnore *  vbRetryCancel + vbYes
olarak kullabilceğimiz hiç aklıma gelmemişti
mesela
for i = vbOKOnly to vbQuestion
      msgbox i
next
olarak hiç kullandınız mı

(05/04/2020, 07:17)accessman yazdı: [ -> ]olarak kullabilceğimiz hiç aklıma gelmemişti

Siz bu bahsettiğiniz kodların çalışıp çalışmadığını denediniz mi?

for i = vbOKOnly to vbQuestion

      msgbox i

next

Kodunu denediniz mi acaba?

Hiç denemedim ama kesin çalışır

Çalışır, çalışır da 32 yerine vbQuestion yazmanız size ne kazandıracak, ne işinize yarayacak. vbQuestion sabit değerdir, bunun sayısal değeri 32,

for i = vbOKOnly to vbQuestion

      msgbox i

next

kodunu çalıştırırsanız vbOKOnly kodunun sayısal değeri 0 olduğu için 0'dan 32 ye kadar saydırırsınız.

vbExclamation kodunun sayısal değeri 48

vbExclamation = vbQuestion + vbAbortRetryIgnore * vbRetryCancel + vbYes

kodundaki eşittirin sağındaki hesaplamanın sonucu 48. vbExclamation = 99, vbAbortRetryIgnore = 888 şeklindeki kod ile sabite değer atayamazsınız. Bu şekilde hesaplama yaptırdınız diyelim, hesaplamanın sonucu ne işinize yarayacak, "Kesin çalışır" yazmışsınız. Kesin çalıştı. Ne işinize yarayacak????

O hayal gücünüze göre değişir
Bunun ile olmazları olduracak değiliz elbet ama bir yerlerde belki birilerinin işine yarayabilir