Mesaj Sayısı : 1274 Yaş : 31 Nerden : sakarya Kayıt tarihi : 05/05/08
Konu: Negatif Ve Pozitif Sayıları Ayırma Cuma Haz. 06 2008, 13:29
private sub button1.click() ıf val(txtsayi)<0 then lstneg.additem val(txtsayi.text) ıf val(txtsayi)>0 then lstpoz.additem val(txtsayi.text) end if end if end sub