dim say as integer
dim kayitdurumu as boolean
for say=1 to 36
if metin & say <>null or metin&say<>"" then
kayitdurumu=true
else
kayitdurumu=false
end if
next
if kayitdurumu=true then Kaydet
else
kaydetme
end if
Şöyle bir şey deneyebilirsin;
Hayri16, 12-11-2009 tarihinden beri AccessTr.neT üyesidir.