ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ¦p¦ó§PÂ_TextBox¤¤µL¿é¤J­È

[µo°Ý] ¦p¦ó§PÂ_TextBox¤¤µL¿é¤J­È

­n§PÂ_TextBox1, TextBox3µL¿é¤J­È, §Ú¨Ï¥Î"<>0"°µ§PÂ_¦¡, ½Ð°Ý¦³¨ä¥L§ó¦nªº¼gªk¶Ü?
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        rpm = Val(TextBox1.Text)
        fan = Val(TextBox2.Text)
        pk = Val(TextBox3.Text)
        n = Val(TextBox4.Text)
        If rpm <> 0 Or pk <> 0 Then
            Exit Sub
        Else
            n = pk * 60 / rpm
        End If
    End Sub

        ÀR«ä¦Û¦b : ¤H­n¦Û·R¡A¤~¯à·R´¶¤Ñ¤Uªº¤H¡C
ªð¦^¦Cªí ¤W¤@¥DÃD