İyi akşamlar sevgili okurlar,
Bu akşam sizlerle visual basic kullanarak bir program daha yazacağız. Programımızın adı Direnç Hesap Programı. Mesleki liseler’de ve bazı üniversitelerde Temel Elektronik dersi görmüş olanı aranızda muhtemelen vardır. Temel Elektonik dersinde ki bazı hesaplamaları bende dahil çoğumuza zor gelmiştir.
Neyse konumuza dönelim. Malzemelerimiz olarak 6 Adet Label, 5 adet ComboBox, 3 adet TextBox ve 1 adet’te Button’a ihtiyacımız var. Şimdi öncelikle formumuzu tasarlayalım benim tasarladığım form aşağıdaki gibidir;
Arkadaşlar, DİRENÇ HESAP PROGRAMI, 4 tane renk ve Tolerans Label’lardan oluşmaktadır. REnklerin ve Toleransın karşılarına ise ComboBox’ı yerşeştiriyoruz. HESAPLA ise CommanButton1’dir. Butonumuzun altındaki ve üstündeki kutular ise TextBox’tır.
Command1’e yani HESAPLA butonuna çift tıklayarak gelen pencereye aşağıdaki kodları yazıyoruz;
Private Sub Command1_Click() 1 a = Combo1.ListIndex 2 b = Combo2.ListIndex 3 c = Combo3.ListIndex 4 d = Combo4.ListIndex 5 e = Combo5.ListIndex 6 sonuc = (a * 100 + b * 10 + c) * (10 ^ d) 7 8 If (e = 0) Then 9 tolerans = "%5" 10 tdeger = sonuc * 0.05 11 12 ElseIf (e = 1) Then 13 tolerans = "%10" 14 tdeger = sonuc * 0.1 15 16 Else 17 tolerans = "%20" 18 tdeger = sonuc * 0.2 19 End If 20 21 Text1.Text = sonuc & " " & " ohm dur ve toleransı" & tolerans & " dir." 22 Text2.Text = (sonuc - tdeger) & " " & "ohm dur" 23 Text3.Text = (sonuc + tdeger) & " " & "ohm dur" 24 End Sub
Yukarıdaki kodları yazdıktan sonra formumuzu çalıştırdığımızda programımız hazır vaziyette olacaktır. Aşağıda ki resimde çalışır halinde çekilen fotoğrafı mevcuttur.
- emresupcin
- Visual Basic
- 6 Aralık 2012 - 0:16
- Yorum Yok
- 2354 Görüntülenme
c plus C# direnç hesaplama programı elektronik görsel programlama plus program yazımı temek elektronik temel elektronik programı visual visual basic