プログラムを実行するとユーザー定義型が定義されていません。と出ました、ユーザー定義型って何ですか?
まずはヘルプを見て下さい。Typeキーワードで定義された,プログラマが作った新たな型のことです。たぶん,Asの後の型を間違って書いたのでしょう。
あるいは、参照設定をせずに、その中で定義されている型を使用したとかね...
※作成する前に利用規約をご確認ください。