vb.net使用控件folderbrowserdialog1,在程序中:
成都創(chuàng)新互聯(lián)主營(yíng)義縣網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營(yíng)網(wǎng)站建設(shè)方案,成都app開(kāi)發(fā),義縣h5重慶小程序開(kāi)發(fā)公司搭建,義縣網(wǎng)站營(yíng)銷(xiāo)推廣歡迎義縣等地區(qū)企業(yè)咨詢
'設(shè)置對(duì)話框中在樹(shù)視圖控件上顯示的說(shuō)明文本
me.folderbrowserdialog1.description
=
"請(qǐng)選擇輸出報(bào)表所在路徑:"
'設(shè)置從其開(kāi)始瀏覽的根文件夾
me.folderbrowserdialog1.selectedpath
=
"c:\"
if
me.folderbrowserdialog1.showdialog()
=
dialogresult.ok
then
'取得全路徑(包含文件名)
reportpath1
=
system.io.path.getfullpath(me.folderbrowserdialog1.selectedpath)
'設(shè)定text顯示文件名
txtreport1.text
=
reportpath1
setreportlist()
end
if
在setreportlist()中針對(duì)你所需要的文件進(jìn)行操作等
可以對(duì)所有文件名進(jìn)行比較,留下最大值的文件,基于小于最大值文件的listbox.items刪除,這樣比較完的結(jié)果就是你想要的最好一個(gè)文件了。至于循環(huán)次數(shù)的問(wèn)題,比較最大值文件就是解決最后次數(shù)文件。
建一個(gè)ImageList控件,右擊,屬性,在“圖像”里插入圖片(你的1.gif),看好他們的索引(Index,默認(rèn)是1)。然后,代碼如下。 ============ Private Sub Command1_Click() TreeView1.ImageList = ImageList1 '關(guān)聯(lián)Treeview1與Imagelist1 TreeView1.LineStyle = tvwRootLines Dim nodX As Node TreeView1.Nodes.Add , , "a1", "teachername" Set nodX = TreeView1.Nodes.Add("a1", tvwChild, , "教師姓名", 1) '這個(gè)1的意思是剛才設(shè)置的圖片在ImageList里的索引 End Sub