1 |
cvsrabit |
1.1 |
VERSION 1.0 CLASS |
2 |
|
|
BEGIN |
3 |
|
|
MultiUse = -1 'True |
4 |
|
|
Persistable = 0 'NotPersistable |
5 |
|
|
DataBindingBehavior = 0 'vbNone |
6 |
|
|
DataSourceBehavior = 0 'vbNone |
7 |
|
|
MTSTransactionMode = 0 'NotAnMTSObject |
8 |
|
|
END |
9 |
|
|
Attribute VB_Name = "Class_Sound" |
10 |
|
|
Attribute VB_GlobalNameSpace = False |
11 |
|
|
Attribute VB_Creatable = True |
12 |
|
|
Attribute VB_PredeclaredId = False |
13 |
|
|
Attribute VB_Exposed = False |
14 |
|
|
Option Explicit |
15 |
|
|
|
16 |
|
|
' --- public ---------------------------------------------------------------------------------------------- |
17 |
|
|
|
18 |
|
|
Public strKey As String |
19 |
|
|
Public strFilePath As String |
20 |
|
|
|
21 |
|
|
Public lFlags As Long |
22 |
|
|
|
23 |
|
|
' --- private -------------------------------------------------------------------------------------------- |
24 |
|
|
|
25 |
|
|
Private prvbIsLoaded As Boolean |