Errata for VB & VBA in a Nutshell: The Language

deleted the sentence beginning "In all but standard EXE projects..."

The last sentence in the paragraph entitled "Unload" did read: ...that the Form Load event is now preceded by an Activate event... It now reads: ...that the Form Load event is now preceded by an Initialize event...

bottom of the page did read: If objVar Is Not Nothing Then It now reads: If Not objVar Is Nothing Then

Dim intIndex As Integer now reads Dim iIndex As Integer

sMyArray(intIndex) = txtText1.Text Has been changed to: sMyArray(iIndex) = txtText1.Text

...within the custRecord UDT, an array of type custRecord is defined. Has been changed to: ...within the custRecord UDT, an array of type custOrders is defined.

"The class has scope (i.e., it's visible) outside of the project... and it can't be instantiated using the New keyword..." Has been changed to: "The class has scope (i.e., it's visible) outside of the project... and it can be instantiated using the New keyword..."

"see the GetServerSettings" to "see the GetAutoServerSettings"

The first bulleted item in "Rules at a Glance" now reads: The calculation performed by DateDiff is always date2-date1. Therefore, if date2 chronologically precedes date1, the value returned by the functions is negative.

Data Type: String It now reads: Data Type: Any

Data Type: String now reads: Data Type: Any

The Syntax for For...Next Statement did read: For <i>counter</i> = <i>initial_value</i> To <i>maximum_value _</i> <i>[Step stepcounter]</i> It now reads: For <i>counter</i> = <i>initial_value</i> To <i>end_value _</i> [Step </i>stepcounter</i>]

The first bulleted item did read: If maximum_value is greater than initial_value... It now reads: If end_value is less than initial_value...

The second bulleted item did read: If the initial_value and the maximum_value are equal and stepcounter is 1, the loop executes once. It now reads: If initial_value and end_value are equal and stepcounter is nonzero, the loop executes once; if stepcounter is 0, an infinite loop results.

"If the Step keyword is used, and stepcounter is negative, initial_ value should be greater than maximum_ value. If this isn't the case, the loop doesn't execute." Has been changed to: "If the Step keyword is used and stepcounter is negative, initial_value should be greater than or equal to end_value."

For i = LBound(sArray) to UBound(sArray) Step-1 now reads: For i = UBound(sArray) to LBound(sArray) Step -1

"GetServerSettings" to "GetAutoServerSettings"

"GetServerSettings" to "GetAutoServerSettings"

to "HKEY_CURRENT".

first line of code did read: lngOctValue1 = &H200 ' Assigns 128 It now reads: lngOctValue1 = &O200 ' Assigns 128

greater" to "is 6 or greater"

after "1;" and before "otherwise,": "if 5, it becomes the nearest even number;"

item, changed: of <I>Filter</I> must be to: of <I>Split</I> must be

vbArray 8192 Array

In the table, changed the description for vbVariant to read: Variant--only returned with vbArray (8192)

"8194" to "8192", and in line 3, changed "8194 + 8 = 8204" to "8192 + 8 = 8200".

Width #<i>filenumber</i>, <i>width</i> to: VBA.Width <i>filenumber</i>, <i>width</i>

"Any valid file number used in the <cw>Open</cw> statement."

Width Statement: "Implemented as the <cw>Width #</cw> statement until VB3, <cw>Width</cw> is now implemented as a hidden procedure in the VBA library module."

Under the "Day Function" heading, it did read: Returns a number representing the day of the week The "says" is correct for the Weekday function. It now reads: Returns a number representing the day of the month

Descriptions of functions Ucase() and Ucase$() used to read: "converted to lowercase" but now read "converted to uppercase"

vbCrLf did read: Chr$(10) & Chr$(13) It now reads: Chr$(13) & Chr$(10)

As a bitwise operator Imp returns 1 if the compared bits in both expressions are the same or if expression1 is 1; It now reads: As a bitwise operator, Imp returns 1 if the compared bits in both expressions are the same or if expression2 is 1;

changed the two occurrences of "the left side of an argument" to "the left side of an assignment"