Cara Menghitung Slip Motor pada Motor Induksi

Struktur program untuk mengitung nilai slip motor menggunakan visual basic :

Coding :

Private Sub Command1_Click()

Ns = Val(Text1)

Nr = Val(Text2)

%S = ((Ns - Nr) / Ns) * 100

Text3 = c

End Sub