欧美一区二区三区老妇人-欧美做爰猛烈大尺度电-99久久夜色精品国产亚洲a-亚洲福利视频一区二区

vb點(diǎn)虐 文件瀏覽框 vbnet tabpage

VB點(diǎn)虐 怎么彈出文件夾路徑選擇框

選擇文件夾??在工具箱?-?對(duì)話框?里選擇?FolderBrowserDialog?添加?到設(shè)計(jì)器中

成都創(chuàng)新互聯(lián)長(zhǎng)期為上1000+客戶提供的網(wǎng)站建設(shè)服務(wù),團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年,關(guān)注不同地域、不同群體,并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù);打造開放共贏平臺(tái),與合作伙伴共同營(yíng)造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為鄒城企業(yè)提供專業(yè)的成都網(wǎng)站建設(shè)、網(wǎng)站制作,鄒城網(wǎng)站改版等技術(shù)服務(wù)。擁有十載豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開發(fā)。

然后?代碼寫在??按鈕事件里

FolderBrowserDialog1.ShowDialog()

textbox1.text?=FolderBrowserDialog1.SelectedPath

選擇文件?在工具箱?-?對(duì)話框?里選擇?OpenFileDialog

把?OpenFileDialog1.ShowDialog()

TextBox1.Text?=?OpenFileDialog1.FileName

寫到按鈕事件下

如圖

點(diǎn)擊按鈕會(huì)彈出?通用對(duì)話框??選擇好路徑后?確定?,編輯框里就會(huì)顯示選擇的路徑

VB6.0瀏覽文件夾對(duì)話框,怎么做?

添加一個(gè)form2。把他當(dāng)做彈出對(duì)話框,在form2中添加一個(gè)dirlistbox控件,在form1的command1的click事件中寫入form2.show。在form2的dir1的click事件中寫入form1.text1.text = dir1.path就OK了,避免使用繁瑣的API函數(shù)

用VB(或者VB點(diǎn)虐 )怎樣打開“瀏覽文件夾窗口”?(如圖)

Private Sub Command1_Click()

Dim sf As Object

Set sf = CreateObject("Shell.Application").BrowseForFolder(0, "選擇文件夾", 0, "")

If Not sf Is Nothing Then

MsgBox "選擇的文件夾是" vbCrLf sf.self.Path

End If

Set sf = Nothing

End Sub

網(wǎng)頁(yè)題目:vb點(diǎn)虐 文件瀏覽框 vbnet tabpage
轉(zhuǎn)載注明:http://chinadenli.net/article26/ddipijg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供關(guān)鍵詞優(yōu)化移動(dòng)網(wǎng)站建設(shè)網(wǎng)站策劃面包屑導(dǎo)航商城網(wǎng)站微信小程序

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)

成都網(wǎng)站建設(shè)公司