サンプルについて

このページのサンプルが上手く動作しません。 
他に記述が必要な場合はご教授下さい。 
http://homepage1.nifty.com/rucio/main/dotnet/Samples/Sample115ListBoxDragDrop.htm

確かに不親切かも。 
 
VB2005で試しましたが、フォームにListBoxを１つ配置して、書いてあるコードをそのままコピー＆貼り付けすれば動きます。 
 
ですが、動作を確認するにはワードパッドなど文字列をドラッグできるソフトを起動して、そこからListBoxに文字列をドラッグする必要があります。 
 
これで解決しますか？