Articles by "tartı"
tartı etiketine sahip kayıtlar gösteriliyor. Tüm kayıtları göster
En yeni konular, en gücel haberler. En son çıkan internet haberleri. Oyun haberleri. Hepsi webtegez.blogspot.com'da..

Kilo Kontrol

Program İçin Gerekli Eklentiler 1- 2 Ad. Buton 2- 6 Ad. TextBox 

Private Sub Command1_Click()
On Error Resume Next
a = Text1.Text
b
= Text2.Text
If Text1.Text = "" Then
MsgBox "BOYUNUZU GİRİNİZ!.."
End If
If Text2.Text = "" Then
MsgBox "KİLONUZU GİRİNİZ!.."
End If
c = (a - 150) / 4 + 100
d = a - c
e
= b - d
Text4.Text
= d
Text3.Text
= " Kilogram Olmanız Gerekli."
Text6.Text
= e
Text5.Text
= " Kilo Farkı Kapatınız."
End Sub
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text6.Text = ""
End Sub
Private Sub Form_Load()
End Sub
Private Sub Label5_Click()
Shell ("explorer.exe http://www.accesstr.net")
End
Sub