Program Yapmak | Programcılık Hakkında Her Şey | VİSUAL BASİC 6.0 | C, C++ ve C# Yazılım Dilleri | VB.NET Yazılım Dili

Ucgen Cesidi Hesaplama

Buradaki amaç textbox'lara girilen sayıların birbiriyle eşit, büyük ve küçük olduklarını karşılastırıp bize üçgenin ne tür bir üçgen olduğunu msgbox'la vermesidir.

Tabi, forum üzerine de ShowPrint komutlarıyla da yazdırabiliriz.

Private Sub Command1_Click()
A = Val(Text1.Text)
B = Val(Text2.Text)
C = Val(Text3.Text)
If A = B And A = C Then
MsgBox "EŞKENAR"
ElseIf A = B Or A = C Or B = C Then
MsgBox "İKİZKENAR"
Else
MsgBox "ÇEŞİTKENAR"
End If
End Sub
Sincan Laptop tamiratı ile alakalı içeriklerin bulunduğu web siteden bilgilere ulaşabilirsiniz. Sincan'da laptop tamiratını en iyi yapan yerleri sorgulayabilirsiniz. Cihan KOÇ
=> Sen de ücretsiz bir internet sitesi kurmak ister misin? O zaman burayı tıkla! <=