I am having a problem I need to Rewrite the program so input, processing, and output are each performed by calls to Sub procedures.

Question

Private Sub btnCompute_Click(...) Handles btnCompute.Click
‘Information about trees
Dim num As Integer = 7