Planning agent transforn in VB.net

[khaty79]

hello.. can u guys help me about this program.. the program is in AI but it shoulde be in VB.net format..can u help me!!! It is because im a new in this subject ..i dont know how to do it. thanks

function SIMPLE-PLANNING-AGENT (PERCEPT) returns an action
static: KB, a knowledge base (includes action descriptions)
p, a plan, initially No plan
t, a counter, initially 0, indicating time
local varibales: G, a goal
current, a current state description

TELL (KB, MAKE-PERCEPT-SENTENCE(percept, t)
current - STATE-DESCRIPTION (KB, t)
if p=NoPlan then
G <- ASK (KB, MAKE-GOAL-QUERY(t))
p <- IDEAL-PLANNER (current, G, KB)

if p=NoPlan or p is empty then action <- NoOp
else
action <- FIRST(p)
p <- REST(p)
TELL (KB, MAKE-ACTION-SENTENCE(action, t)
t <- t+1
return action