Matt Needles wrote:
I have searched and re-searched the online help, but the Type statement is not documented, it seems.
I document them on Page 29 of my book :-)
Also the construct used below in declaring a string variable to be of a certain length is not documented, either.
You can not declare a variable to be of a specified length. At least I have never heard of this. You could use an array of characters, but you can not do that directly by definition inside of your own data types :-( The following line does NOT declare a string of length 4. I might consider the acceptance of this form an error unless it is for some kind of compatibility.
Dim s As String * 4
This is the way you do this in VisualBasic. It worked, too, from what I see in the OOo Macro Variable Watch window.
Not according to the Help:On a related note, I tried using it with the following macro code and got the error indicated by the REM lines in the code:
Option Explicit
Type tAddrRec sRecType as string * 1 ' "I" for persons, "O" for Organizations sRecStatus as string * 1' "A" active, "D" deleted, "H" held iRecID as integer ' starts with 1 sLName as string * 35 sFname as string * 35 sAddr1 as string * 35 sAddr2 as string * 35 sCity as string * 25 sState as string * 5 sPostal as string * 10 iCtryCode as integer sPhone1 as string * 15 sPhone2 as string * 15 sPhone3 as string * 15 sEmail as string * 64 sNotes as string * 60 End Type
Sub Main Dim myFile as Integer, lRecLen as Long Dim myAddrRec as tAddrRec myFile = FreeFile REM ***** Error occurs on next line. ***** lRecLen = Len(myAddrRec)
The Len() routine expects a String.
Len Function [Runtime]
Returns the number of characters in a string, or the number of bytes that are required to store a variable.
I assume that is why you get the error. What did you expect for the length of a user defined type?I expect the length of the struct I defined. Again, this is the way to do this in VB.
Thanks for your reply, Andrew.
Matt Needles
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
