Private Sub Command1_Click()

Dim inValue, outValue, Value As Integer

Dim i, sum As Integer

inValue = Text1.Text

outValue = Text2.Text

If inValue < outValue Then

Value = inValue

inValue = outValue

outValue = Value

End If

For i = inValue To outValue

sum = sum + i

Next i

Label1.Caption = \"결과:\" & sum

End Sub


뭐하는 프로그램인가요??
프로그램 돌려봐도 모르겟네요..ㅡㅡ;
뭘 알아볼려고 하는건지. 고수분 부탁점.