vb 控件最大高度_学习VB编程第45天，盘符、文件夹列表和文件列表控件

今天学习了刘金玉老师零基础VB教程的第55期，学习的主要内容是drivelistbox控件、dirlistbox控件filelistbox控件。

一、drivelistbox控件(盘符列表控件)

控件用于显示系统现有的盘符，可以调整控件长度，高度无

法调整。设置tooltiptext内容，当鼠标放在控件上方时候将出现文字提示。

二、dirlistbox控件(文件夹列表控件)

1.控件用于显示系统文件路径，和drivelistbox控件联动使用，使用代码

Private Sub Drive1_Change()

On Error Resume Next

Dir1.Path = Drive1.Drive

End Sub

2.补充知识：屏蔽代码报错使用代码：On Error Resume Next。

三、filelistbox控件(文件列表控件)

1.用于显示文件夹内的文件名，和dirlistbox控件联动使用，使用代码

Private Sub Dir1_Change()

File1.Path = Dir1.Path

End Sub

2.正确的表达文件路径并打开文件

Private Sub File1_Click()

Dim X As String

X = File1.Path

If Right(X, 1) = "" Then

X = X & File1.FileName

Else

X = X & "" & File1.FileName

End If

Open App.Path & "Z.bat" For Output As #1

Print #1, "start " & X

Close #1

Shell App.Path & "z.bat"

End Sub