>>2 
ありがとうございます。 
解決しました。 
 
>>4 
指摘ありがとうございます。 
次回から気をつけます。 
引数の意味も勉強していきます。 
 
>>5 
できました。 
ありがとうございます。 
まだVB始めたばかりで 
色々と勉強させて頂いております。 
ありがとうございます。