Çözümü çok basitmiş sadece Textbox1.Text=CInt(Fix( rakamlar felan ) yazarak küsürattan kurtulabiliyoruz.Bana yardımcı olan hocama teşekkürler :)