Chapter 4 Access 2000
After entering the following code I get the following error'"Compiler Error Can't Find Project or Library" Will someone assist me:(
Option Compare Database
Option Explicit
Sub VariantExample()
Dim varAnyThing As Variant
varAnyThing = 12.345
Debug.Print VarType(varAnyThing)
varAnyThing = 12.345
varAnyThing = varAnyThing & " is a number"
Debug.Print VarType(varAnyThing)
varAnyThing = 12.345
varAnyThing = varAnyThing + "10"
Debug.Print VarType(varAnyThing)
varAnyThing = 12345
Debug.Print VarType(varAnyThing)
varAnyThing = 123456
Debug.Print VarType(varAnyThing)
End Sub
Sub VariantStringTest()
Dim varFirstName As Variant
Dim varLastName As Variant
Dim varFullName As Variant
varFirstName = "Janine"
varLastName = Null
varFullName = varFirstName & varLastName
Debug.Print varFullName
End Sub
__________________
Jennifer D. Taylor
Wiley Technical Support
|
