I really dont know this Program is rite or wrong. but it wont give a answer. if anyone can help me in this
Public Class Form2
Dim num As Integer
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim fact As Integer
num = Val(InputBox("Enter the Factorial Number"))
Do
fact = fact * num
num = num - 1
Loop Until num <= 0
MessageBox.Show(fact)
End Sub
End Class