And for the geeks in you.

[Mr.Sickles]

Module Module_Introduction

MAIN()

DIM Name as string
DIM wieght as integer
DIM goal_weight as integer
DIM Calories as integer

if link_to_my_thread = clicked
messagebox.show("Hi my name is Michael, I am Mrs. Sickles's husband and this is my code for goal weight)
else
endif

SUB MAIN()
weight = 208
goal weight = 165
Name = "Michael"

for Name while weight => goal_weight
Calories =< 1500
End While
End Sub

messagebox.show("Thank you for reading")
End Module




Code maybe be out of touch been 1 year since vb.net... rofl I left out the class and event handling of clicking the link to this post too..