Cara Menghitung Nilai GGL Armartur pada Generator Kompon pendek

Struktur pemrograman untuk menghitung nilai GGL Armatur pada Generator Kompon Pendek pada Visual Basic :

Private Sub Command1_Click()

Ia = Val(Text1)

Ra = Val(Text2)

Rs = Val(Text3)

I = Val(Text4)

Vt = Val(Text5)

Ea = Ia * Ra + Rs * I + Vt

Text6 = Ea

End Sub