filelistbox filelistbox控件


filelistbox filelistbox控件

文章插圖
大家好,小豆豆來為大家解答以上的問題 。filelistbox控件,filelistbox這個很多人還不知道,現在讓我們一起來看看吧!
1、在窗體控件中放置一個FileListBox控件和一個TextBox控件,將FileListBox的Pattern屬性改為“*.txt”,將TextBox的MultiLine屬性改為True 。
2、將以下語句復制到代碼中OptionExplicitPrivateSubFile1_Click()DimtFileNameAsString,tFileNumberAsInteger,tLoadAsString,tTextAsStringtFileName=Replace(&""&ame,"\","")tFileNumber=FreeFileOpentFileNameForInputAs#tFileNumberDoWhileNotEOF(tFileNumber)LineInput#tFileNumber,tLoadtText=tText&tLoad&vbCrLfDoEventsLoopClose#=tTextEndSub運行 , 然后在文件列表框里選擇文件后就會在Text1控件里顯示文件內容 。
【filelistbox filelistbox控件】3、然后就是沒有做DriveListBox和DirListBox的鏈接,這個你應該自己會吧?既然你沒問我就權當你會了哦 。
4、:) 。
本文到此分享完畢 , 希望對大家有所幫助 。