' sizin bir "form1" ve birde "text1" adlı objeleriniz olduğunu farzediyor ve koda başlıyoruz...
sub form1.resize
on error resume next 'işte ilacımız...
text1.width = form1.width - 1
text1.height = form1.height - 1
end sub
' eğer RESIZE olayının başında gördüğünüz kodu yazmazsanız tex1'in uzunluk ve genişlik ölçüleri başlangıç noktasından (top ve left) küçük değer aldığı zaman hata verir. Bu hatayı bu kodla hiç bizi rahatsız etmeden geçmesini sağlıyoruz. İşte hepsi bu...