Question

VB编译错误，找不到工程或库

本人小白一个，别人的一段vb程序一运行就编译错误，找不到工程或库，麻烦高手帮忙看一下哪错了，怎么改？
Private Sub Form_Load()
' 计数
Dim i As Integer
' 设备
Dim strDrv As String
' 新CDDAWriter类
Set cdwrt = New CDDAWriter
'获取驱动器
For i = 1 To 26

strDrv = Chr$(i + 64)
With cdwrt
'CD/DVD-ROM
If .IsCDROM(strDrv) Then
'选择当前设备
.SelectCDROM strDrv
'添加设备到列表
cboDrives.AddItem strDrv & ": (HA: " & _
.DriveHA & ", ID: " & _
.DriveTarget & ") " & _
.DriveName
End If
End With
Next
'默认第一个
cboDrives.ListIndex = 0
'刻录速度
AddWriteSpeed 4
AddWriteSpeed 8
AddWriteSpeed 10
AddWriteSpeed 12
AddWriteSpeed 16
AddWriteSpeed 20
'默认速度
cboWritespeed.ListIndex = 0
End Sub

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励10（财富值+成长值）+提问者悬赏5（财富值+成长值）

Answer 1

如果你使用的已经是vb的企业版,你可采取新建数据工程,再一一添加各窗体文件和其它相关文件.再编译就可能不出现提示找不到"工程或库".

Answer 2

应该是这个 Set cdwrt = New CDDAWriter

你的系统里必须要有这个才行