国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學(xué)院 > 開發(fā)設(shè)計(jì) > 正文

怎樣在VB5中使用OLEDRAGDROP事件從WindowsExplorer中拖放文件

2019-11-18 17:52:58
字體：大 中 小
供稿：網(wǎng)友
本文將介紹怎樣在你的VB5應(yīng)用程序中使用OLEDRAGDROP事件從WINDOWSEXPLORER拖放文件。以往的做法要仔細(xì)區(qū)分和捕捉事件的特定消息，而VB5則通過OLEDRAGDROP事件提供了非常相似的功能。

操作步驟
1、建立一個(gè)新工程項(xiàng)目，缺省建立窗體FORM1
2、添加一個(gè)列表控件（LIST1）到窗體FORM1
3、設(shè)置LIST1的OLEDROPMODE屬性=1-手動(dòng)
4、粘貼下面的代碼到LIST1的OLEDRAGDROP事件：
PRivateSubList1_OLEDragDrop(DataAsDataObject,EffectAsLong,ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
DimThisFileAsVariant

ForEachThisFileInData.Files
List1.AddItemThisFile
Next
EndSub
5、保存工程項(xiàng)目
6、運(yùn)行程序。從WINDOWSEXPLORER選擇一組文件，然后拖放到列表框中。被選擇的文件包括其所在的全路徑
被添加到列表框中。
這個(gè)功能還有許多其他的用途。RABIT軟件公司的SPRITEANIMATOR使用這個(gè)事件獲取拖放到應(yīng)用中的圖象。->

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板： 嵊州市| 聂拉木县| 平安县| 依兰县| 古浪县| 神农架林区| 甘泉县| 厦门市| 嘉善县| 富平县| 闸北区| 房产| 四平市| 军事| 平罗县| 涞水县| 延庆县| 嘉义县| 秦安县| 牡丹江市| 当涂县| 庄浪县| 荔波县| 平顶山市| 泽普县| 来安县| 泸西县| 苏尼特左旗| 深泽县| 五峰| 镇宁| 凌云县| 松阳县| 静安区| 太谷县| 深圳市| 亳州市| 青神县| 莲花县| 江门市| 五指山市|