- 31 Ocak 2010
- 6
- 0
Başlıyoruz::woott
1-Visual Basic programını açıyoruz
2-New Project seçeneğine tıklıyoruz
3-Name yazan yere istediğimiz adı verbiliriz bu bizim program adımız olacak örnek:HesapMakinesi ve ok a basıyoruz
4-Form1 açıldı ve Toolbox dan
2 tane textbox
2 tane label
4 tane button
bunları tektek Form1 in üzerine sürüklüyoruz
5-Daha sonra bunları isteğe göre yerleştiriyoruz...
6-İlk olarak buttonlara isim vercez bunun için 1.buttona tıklıyoruz ve araç çubuğundan Properties Window seçeneğini açıyoruz...
Açılan listeden text yazan yere gelerek karşısındaki Button1 yazısını
+olarak değiştiriyoruz daha sonra button2 ye tıklayarak onuda - olarak
değiştirin sonra button3 * ve button 4 ü / olarak değiştiriyoruz...
7-Sonra sıra labellerde onuda buttonda yaptığımız gibi tıklayarak text den 1.labeli 1.sayı , 2.labeli 2.sayı olarak değiştiriyoruz...
8-sıra geldi kodlara Form1 in üzerine çift tıklayın ve açılan kod sayfasındaki kodları silin ve verdiğim kodları yapıştırın....
Kod:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) + Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) - Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) * Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) / Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
End Class
Aynen yapıştırın...
9-yukarıdaki çubuktan bir önceki sayfa için Form1.vb ye tıklayın
10-kontron için start debugging işaretine tıklayın ve deneyin eğer açılıyorsa olmuş demektir.
11-son olarak tasarım yapalım
tekrar properties window a tıklıyoruz ve Form1 yazısına tıklıyoruz ve
text den Form 1 yazısını değiştiriyoruz..
12-Daha sonra aynı listeden Backgroundimage seçeneğine tıklıyoruz ve yanındaki 3 noktaya baıyoruz ordan arkaplan resmini ekleyebilirsiniz veya backcolor dan renklendirebilirsiniz
13-eğer icon istersenz aynı listeden iconu tıklayarak koyabilirsiniz...
14-sonra file dan saveall a tıklıyoruz ve kaydediyoruz
15-kayıt:C:\********s and Settings\user\Belgelerim\Visual Studio 2005\Projects\HesapMakinesi\HesapMakinesi\bin\Debug
Burdadır %100 çalışır...
Download link
Sorunlarınız için mesaj atınız.................:yaho1
+++REP'S
1-Visual Basic programını açıyoruz
2-New Project seçeneğine tıklıyoruz
3-Name yazan yere istediğimiz adı verbiliriz bu bizim program adımız olacak örnek:HesapMakinesi ve ok a basıyoruz
4-Form1 açıldı ve Toolbox dan
2 tane textbox
2 tane label
4 tane button
bunları tektek Form1 in üzerine sürüklüyoruz
5-Daha sonra bunları isteğe göre yerleştiriyoruz...
6-İlk olarak buttonlara isim vercez bunun için 1.buttona tıklıyoruz ve araç çubuğundan Properties Window seçeneğini açıyoruz...
Açılan listeden text yazan yere gelerek karşısındaki Button1 yazısını
+olarak değiştiriyoruz daha sonra button2 ye tıklayarak onuda - olarak
değiştirin sonra button3 * ve button 4 ü / olarak değiştiriyoruz...
7-Sonra sıra labellerde onuda buttonda yaptığımız gibi tıklayarak text den 1.labeli 1.sayı , 2.labeli 2.sayı olarak değiştiriyoruz...
8-sıra geldi kodlara Form1 in üzerine çift tıklayın ve açılan kod sayfasındaki kodları silin ve verdiğim kodları yapıştırın....
Kod:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) + Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) - Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) * Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim sonuc As Integer
sonuc = Val(TextBox1.Text) / Val(TextBox2.Text)
MsgBox(sonuc)
End Sub
End Class
Aynen yapıştırın...
9-yukarıdaki çubuktan bir önceki sayfa için Form1.vb ye tıklayın
10-kontron için start debugging işaretine tıklayın ve deneyin eğer açılıyorsa olmuş demektir.
11-son olarak tasarım yapalım
tekrar properties window a tıklıyoruz ve Form1 yazısına tıklıyoruz ve
text den Form 1 yazısını değiştiriyoruz..
12-Daha sonra aynı listeden Backgroundimage seçeneğine tıklıyoruz ve yanındaki 3 noktaya baıyoruz ordan arkaplan resmini ekleyebilirsiniz veya backcolor dan renklendirebilirsiniz
13-eğer icon istersenz aynı listeden iconu tıklayarak koyabilirsiniz...
14-sonra file dan saveall a tıklıyoruz ve kaydediyoruz
15-kayıt:C:\********s and Settings\user\Belgelerim\Visual Studio 2005\Projects\HesapMakinesi\HesapMakinesi\bin\Debug
Burdadır %100 çalışır...
![56817557.png](http://img695.imageshack.us/img695/4784/56817557.png)
Download link
Sorunlarınız için mesaj atınız.................:yaho1
+++REP'S