Sayı Pozitif mi? Negatif mi? VB.Net

Kullanıcının girdiği sayının pozitif mi yoksa negatif mi olduğunu gösteren programı oluşturuyoruz…

Bu programımızda sonucu msgboxda göstereceğimizden dolayı 1 button kullanacağız. Bu programı oluşturmak için buttonun içerisine şu kodlar yazılmalıdır;

[code language=”vb”]Dim sayı As Integer
On Error Resume Next
sayı = InputBox("Sayıyı gir…", "pozitif negatif", 10, 35, 55)
If sayı > 0 Then MsgBox("SAYI POZİTİFTİR")
If sayı < 0 Then MsgBox("SAYI NEGATİFTİR")
If sayı = 0 Then MsgBox("SAYI SIFIRDIR")[/code]

NOT: Bu programda yazılmış olan kodlarda “On Error Resume Next” kodunu görüyoruz. Bu kod “Cancel” seçeneğine tıklanıldığında hata vermeyerek devam etmesini sağlayacaktır.

<!–[if gte mso 9]> Normal 0 21 false false false MicrosoftInternetExplorer4 <![endif]–><!–[if gte mso 9]> <![endif]–>