visual basic 2010 の　ドラッグアンドドロップ方法

はじめまして。
入門講座の第１１回　卒業制作のe.Data.GetDataPresentの部分が
私の使ってるvisual basic 2010 ではエラーになりますが、どうすれば
良いのかが分からず質問いたしました。お手数をおかけいたしますが、
ご指導お願い致します。

エラーの内容と
記述したSubの内容を
載せられたほうがよいかと思います。