411 REFERENCE · Wikibooks
A Level Computer Science Programming Guide/User-Defined Data Types
Reference material by Wikibooks contributors. This retains its source identity and is not 411 news reporting.
Enumerated Data Types
Declaring Enumerated Data Types
LanguageGeneral UsageExample UsagePseudocodeTYPE <Identifier> = (<Value 1>, <Value 2>, <Value 3>, ...)TYPE Season = (Summer, Autumn, Winter, Spring)
TYPE Direction = (North, North_East, East, South_East, South, South_West, West, North_West)
TYPE SpiceIntensity = (No_Preference ,None, Mild, Medium, Hot, Extreme)VB.NETEnum <Identifier>
<Value 1> = <Reference>
<Value 2> = <Reference>
<Value 3> = <Reference>
....
End EnumEnum Season
Summer = 1
Autumn = 2
Winter = 3
Spring = 4
End Enum
Enum SpiceIntensity
None = 0
Mild = 1
Medium = 2
Hot = 3
Extreme = 4
End Enum
Using Enumerated Data Types
LanguageGeneral UsageExample UsagePseudocodeDECLARE <Identifier> : <Data Type>
<Identifier> ← <Value>DECLARE Seasons : Season
Seasons ← Autumn
DECLARE CompassPointer : Direction
CompassPointer ← North
DECLARE SpicePreference : SpiceIntensity
SpicePreference ← ExtremeVB.NETDim <Identifier> As <Data Type>
<Integer Variable> = <Identifier>.<Value>Dim Seasons As Season
SeasonCounter = Seasons.Autumn
Dim CompassPointer As Direction
CurrentDirection = CompassPointer.North
Dim SpicePreference As SpiceIntensity
SpiceCounter = SpicePreference.Extreme
Pointer Data Types
There is no VB.Net equivalent for a Pointer Data Type.
LanguageGeneral UsageExample UsagePseudocodeTYPE <Pointer> = ^<Type Name>Type AddPointer = ^INTEGER
Type NextLocation = ^STRING
Type Pass = ^REAL
Record Data Types
LanguageGeneral UsageExample UsagePseudocodeTYPE <Identifier>
DECLARE <Identifier> : <Data Type>
DECLARE <Identifier> : <Data Type>
...
END TYPETYPE Person
DECLARE Name : STRING
DECLARE Birthday : DATE
DECLARE Weight : REAL
DECLARE Address : STRING
DECLARE SpicePreference : SpiceIntensity
END TYPEVB.NETStructure <Identifier>
Dim <Identifier> As <Datatype>
Dim <Identifier> As <Datatype>
...
End StructureStructure Person
Dim Name As String
Dim Birthday As Date
Dim Weight As Double
Dim Address As String
Dim SpicePreference As SpiceIntensity
End Structure