如何用VB获取盘符,并把C:\1.exe拷贝到每个盘里
如何用VB获取盘符,并把C:\1.exe拷贝到每个盘里
日期:2021-05-24 13:41:14 人气:1
先画个DriveListBox控件,贴上以下代码:
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long
Private Sub Form_Load()
Dim DrvNum As Single
Dim drvName As String
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long
Private Sub Form_Load()
Dim DrvNum As Single
Dim drvName As String