Cara Menghitung Nilai Tegangan Sekunder

Struktur Navigasi dalam menghitung nilai Tegangan sekunder pada Trafo menggunakan Visual Basic :

Coding nya :

Private Sub Command1_Click()

Ns = Val(Text1)

Vp = Val(Text2)

Np = Val(Text3)

Vs = (Ns * Vp) / Np

Text4 = Vs

End Sub