Aplikasi Perhitungan Penguat (Gain) Antena Parabola

Gain adalah karakter antena yang terkait dengan kemampuan antena mengarahkan radiasi sinyalnya, atau penerimaan sinyal dari arah tertentu. Gain bukanlah kuantitas yang dapat diukur dalam satuan fisis pada umumnya seperti watt, ohm, atau lainnya, melainkan suatu bentuk perbandingan. Oleh karena itu, satuan yang digunakan untuk gain adalah desibel.

Pada kesempatan kali ini saya akan menjelaskan  aplikasi perhitungan  penguat (Gain) antena parabola yang telah saya buat. Cara kerja aplikasi ini adalah memasukkan input berupa angka lalu diproses sesuai dengan source code dan akan menghasilkan output. Pada Perhitungan penguat (Gian) antena ini  pertama-tama kita masukkan nila diameter, Efisensi,dan panjang gelombangnnya. Setelah itu tekan tombol menghitung, dan hasil akna muncul

Berikut adalah struktur navigasinya :

 Berikut adalah diagram alurnya : 

Start 

aplikasi mulai dijalankan

Input 
memasukkan nilai yang sesuai pada label yaitu nilai yaitu : Diameter, Efisensi, dan Panjang Gelombang

Proses 
proses perhitungan Penguat (Gain) Antena Parabola

Output 

Hasil Penguat (Gain) Antena Parabola

End 

Berakhirnya sebuah proses perhitungan yang menghasilkan output yang sesuai dan dianggap benar

Source code 

Private Sub CmdHitung_Click()

TexHasil = 10 * (Log(9.8596 * (Val((Tex1.Text) ^ 2) * (Tex2.Text)) / (Tex3.Text) ^ 2))

End Sub

Private Sub Command1_Click()

Tex1.Text = ""

Tex2.Text = ""

Tex3.Text = ""

TexHasil.Text = ""

End Sub

Private Sub Command2_Click()

End

End Sub

Dan ini Gambaran aplikasinya :