五分鐘學會VB.NET實現拖放
VB.NET還是比較常用的，于是我研究了一下VB.NET實現拖放，在這里拿出來和大家分享一下，希望對大家有用。Windows用戶一般分為兩類：一類習慣用鍵盤操作，一類習慣用鼠標操作。程序員們在編程時一般會提供快捷鍵(在命令或字母中加下劃線)或快捷方式(用CTRL加字母的組合)來照顧到那些習慣鍵盤的用戶，但是那些鼠標用戶卻被忽略了。因為程序員們一般都習慣用鍵盤，所以他們這種重視鍵盤操作的特點是可以理解的，但是每個程序員也應該考慮到提供鼠標支持。
鼠標用戶所期望的一件事就是能夠在應用程序中VB.NET實現拖放。如果你注意到一些大型應用程序或windows自身的話，拖放操作幾乎隨處可見。例如，用戶可能已經習慣了在windows資源管理器中拖放文件，或在word中拖放文本等操作了。
盡管拖放操作隨處可見，但是只有極少數程序員在他們所編寫的程序中實現拖放功能，最可能的原因是他們認為VB.NET實現拖放可能比想象的還要難。這篇文章列舉了如何在窗體內、窗體之間，甚至應用程序之間移動文本、圖片或者文件的例子，顯示了在VB.NET實現拖放是非常容易得。
拖放如何進行
拖放實際上就如同用鼠標復制粘帖，因此你必須有一個可以復制或移動的源，也要有一個可以粘貼的目的地。在這兩個操作過程中，數據是保存在內存中的。復制粘貼用的是剪切版，而拖放用的卻是一種本質上是私有剪切板的Dataobject的對象。
下面是典型的托放操作的時間序列：
1、拖放(dragging)是通過調用源控件的DoDragDrop方法來初始化的，DoDragDrop有兩個參數
◆data，指定將要傳送的數據
◆allowedEffects，指定允許進行的操作（復制或移動）
這樣自動創建了一個新的Dataobject對象
2、接下來就依次激發了GiveFeedBack事件。在大多數情況下，你并不需要擔心GiveFeedBack事件，然而你如果想自定義拖放過程中的鼠標指針的話，你可以在這些地方加上你的代碼。
3、任何有AllowDrop屬性而且被設置成True的控件都是隱含的Drop對象。AllowDrop屬性可以在設計時的屬性窗口中進行設置，也可以在Form_load事件自動加載。
4、當鼠標移到某個控件時，就同時激發了這個控件的DragEnter事件。GetDataPresent方法是用來確認拖過來的數據是否適合目標控件，Effect屬性是用來顯示適當的鼠標指針。
5、如果用戶在有效的目標控件上釋放鼠標，就同時激發了DragDrop事件。DragDrop事件句柄中的代碼從DataObject對象中釋放數據并把它顯示在目標控件中。
【編輯推薦】
