VB.NET還是比較常用的，于是我研究了一下VB.NET實現(xiàn)拖放，在這里拿出來和大家分享一下，希望對大家有用。Windows用戶一般分為兩類：一類習(xí)慣用鍵盤操作，一類習(xí)慣用鼠標(biāo)操作。程序員們在編程時一般會提供快捷鍵(在命令或字母中加下劃線)或快捷方式(用CTRL加字母的組合)來照顧到那些習(xí)慣鍵盤的用戶，但是那些鼠標(biāo)用戶卻被忽略了。因為程序員們一般都習(xí)慣用鍵盤，所以他們這種重視鍵盤操作的特點是可以理解的，但是每個程序員也應(yīng)該考慮到提供鼠標(biāo)支持。

鼠標(biāo)用戶所期望的一件事就是能夠在應(yīng)用程序中VB.NET實現(xiàn)拖放。如果你注意到一些大型應(yīng)用程序或windows自身的話，拖放操作幾乎隨處可見。例如，用戶可能已經(jīng)習(xí)慣了在windows資源管理器中拖放文件，或在word中拖放文本等操作了。

盡管拖放操作隨處可見，但是只有極少數(shù)程序員在他們所編寫的程序中實現(xiàn)拖放功能，最可能的原因是他們認(rèn)為VB.NET實現(xiàn)拖放可能比想象的還要難。這篇文章列舉了如何在窗體內(nèi)、窗體之間，甚至應(yīng)用程序之間移動文本、圖片或者文件的例子，顯示了在VB.NET實現(xiàn)拖放是非常容易得。

拖放如何進(jìn)行

拖放實際上就如同用鼠標(biāo)復(fù)制粘帖，因此你必須有一個可以復(fù)制或移動的源，也要有一個可以粘貼的目的地。在這兩個操作過程中，數(shù)據(jù)是保存在內(nèi)存中的。復(fù)制粘貼用的是剪切版，而拖放用的卻是一種本質(zhì)上是私有剪切板的Dataobject的對象。
下面是典型的托放操作的時間序列：

1、拖放(dragging)是通過調(diào)用源控件的DoDragDrop方法來初始化的，DoDragDrop有兩個參數(shù)
◆data，指定將要傳送的數(shù)據(jù)
◆allowedEffects，指定允許進(jìn)行的操作（復(fù)制或移動）
這樣自動創(chuàng)建了一個新的Dataobject對象

2、接下來就依次激發(fā)了GiveFeedBack事件。在大多數(shù)情況下，你并不需要擔(dān)心GiveFeedBack事件，然而你如果想自定義拖放過程中的鼠標(biāo)指針的話，你可以在這些地方加上你的代碼。

3、任何有AllowDrop屬性而且被設(shè)置成True的控件都是隱含的Drop對象。AllowDrop屬性可以在設(shè)計時的屬性窗口中進(jìn)行設(shè)置，也可以在Form_load事件自動加載。

4、當(dāng)鼠標(biāo)移到某個控件時，就同時激發(fā)了這個控件的DragEnter事件。GetDataPresent方法是用來確認(rèn)拖過來的數(shù)據(jù)是否適合目標(biāo)控件，Effect屬性是用來顯示適當(dāng)?shù)氖髽?biāo)指針。

5、如果用戶在有效的目標(biāo)控件上釋放鼠標(biāo)，就同時激發(fā)了DragDrop事件。DragDrop事件句柄中的代碼從DataObject對象中釋放數(shù)據(jù)并把它顯示在目標(biāo)控件中。

【編輯推薦】

1. 分析VB QuickSort應(yīng)用程序
2. 如何掌握強大的VB.NET ReadLine()方法
3. 講述強大的VB.NET Web Forms，使用起來卻如此簡單
4. 兩步就可以掌握VB使用ArrayList類
5. VB.NET應(yīng)用程序的入門指南