這個簡單,我以前用VB6就寫過一個類似的程序。 不過這個程序需要提供命令行參數(shù)喲。
創(chuàng)新互聯(lián)建站專注于山陽企業(yè)網(wǎng)站建設(shè),成都響應式網(wǎng)站建設(shè)公司,商城網(wǎng)站開發(fā)。山陽網(wǎng)站建設(shè)公司,為山陽等地區(qū)提供建站服務(wù)。全流程按需設(shè)計,專業(yè)設(shè)計,全程項目跟蹤,創(chuàng)新互聯(lián)建站專業(yè)和態(tài)度為您提供的服務(wù)
就算用VB.NET編寫,也必須要有接收這個命令行參數(shù)的,不然無法實現(xiàn)顯示文件或文件夾路徑。
下面是注冊表文件的內(nèi)容,你也可以用程序來寫入注冊表。
*表示所有文件,你可以隨便修改。
最后面的%1,表示當前文件或文件夾
REGEDIT4
[HKEY_CLASSES_ROOT\*\shell\顯示名稱]
[HKEY_CLASSES_ROOT\*\shell\顯示名稱\command]
@="D:\\綠色軟件\\編程\\VB\\顯示名稱\\顯示名稱.exe %1"
動態(tài)生成的控件:
Private?Sub?UserControl1_Load(sender?As?System.Object,?e?As?System.EventArgs)?Handles?MyBase.Load
Dim?myPicture?=?New?System.Windows.Forms.PictureBox()
Me.Panel3.Controls.Add(myPicture)
myPicture.Size?=?New?System.Drawing.Size(115,?160)
myPicture.TabStop?=?False
myPicture.Name?=?"p"?
myPicture.Cursor?=?Cursors.Hand
AddHandler?myPicture.Click,?AddressOf?mypic_Click?'添加事件
End?Sub
處理事件的過程:
Private?Sub?mypic_Click()?'ByVal?id?As?String
Dim?bookInfo?As?New?BookInfo
bookInfo.Show()
Me.Parent.Enabled?=?False
通常都是設(shè)置一個字母,也就是Alt+某個字母。如圖
菜單字母
常見事件有鼠的標單擊、雙擊、移動;
有鍵盤的鍵按下、鍵松開、按鍵;
有窗體加載、窗體卸載等等。
分享文章:vb點虐
菜單增加 vb怎么添加菜單控件
轉(zhuǎn)載源于:http://m.2m8n56k.cn/article38/ddgdosp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供云服務(wù)器、品牌網(wǎng)站制作、網(wǎng)站收錄、品牌網(wǎng)站建設(shè)、全網(wǎng)營銷推廣、網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:[email protected]。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)