国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板： 育儿| 响水县| 清涧县| 盐边县| 耒阳市| 洱源县| 秦皇岛市| 东辽县| 赤峰市| 巫山县| 龙江县| 温宿县| 漠河县| 封丘县| 白河县| 岢岚县| 儋州市| 杭锦旗| 景洪市| 洛南县| 开封市| 长海县| 通化县| 宜春市| 古交市| 景德镇市| 吴桥县| 甘孜县| 呼和浩特市| 海兴县| 清水河县| 蕲春县| 那坡县| 施甸县| 通渭县| 广汉市| 沁水县| 本溪市| 建湖县| 玉溪市| 鲁甸县|