¿Cómo escribir programación de pesca de gatitos en VB?

"Gatito pescando" Una mañana, la madre gata llevó a su gatito al pequeño río a pescar. Una libélula pasó volando. Al gatito le gustó mucho, dejó la caña de pescar y fue a pescar libélulas. La libélula se fue volando y el gatito regresó al río con las manos vacías. A primera vista, la madre gata pescó un pez grande. Una mariposa pasó volando. Al gatito le gustó mucho, dejó la caña de pescar y fue a pescar mariposas. La mariposa se fue volando. El gatito regresó al río con las manos vacías y vio que la madre gata había pescado otro pez grande. El gatito dijo: "Es muy molesto. ¿Por qué no puedo pescar un pez pequeño?" La madre gata dijo: "Debes concentrarte en pescar, no a medias". Entonces, el gatito parecía estar pescando con todo su corazón. Las libélulas volaron y las mariposas también. El gatito pareció no verlo y no se alejó un paso. Después de un rato, el gatito pescó un pez grande y gritó alegremente: "¡Pesqué un pez grande!"