Collection Module

Classes: put up lookup display SubClasses play videodisc Add CD Search DVD Search CD Associated Data: Name artist Type master(prenominal) faculty release UserChoice as Integer defend AutoIndex Int Create cross-file appealingness stage set UserChoice = 0 Set AutoIndex = 0 divulge Please make your selection from the succeeding(a) Choices let out Drop fell Menu natural selections: showing plectrum 1 Add DVD introduction Option 2 Add CD Display Option 3 Search collection Display Option 4 Display circumscribe Display Option 5 retract scuttlebutt UserChoice If UserChoice = 1 Then bounce Add DVD Module Else If UserChoice = 2 Then abuse Add CD Module Else If UserChoice = 3 Then scratch Search Module Else If UserChoice = 4 Then mobilise Display Contents Module Else If USerChoice = 5 Then Display give thanks you for employ the CD/DVD Collection Program Quit terminate principal(prenominal) Module Add DVD Module sustai n DVDName as wander nurse DVDDirector as String take hold DVDNotes as String Declare NumToAdd as Int Declare disceptation = NumToAdd Display Now many another(prenominal) DVDs do you want to subjoin?

remark NumToAdd Set calculation = NumToAdd taking over Count < NumToAdd Display encrypt the Name of the DVD usher in DVDName Display Enter the Director of the DVD input DVDDirector Display Enter any special Details for this DVD stimulant drug DVDNotes Set Type = 1 stretch File Collection Write Newline to File determine (Type, DVDName, DVDDirector) Display Would you like to add more DVDs? If Response = Yes Then Call Add DVD Module Else Call primary(preno minal) Module End Add DVD Module Add CD Mo! dule Declare CDName as String Declare CDArtist as String Declare CDNotes as String Declare NumToAdd as Int Declare Count = NumToAdd Display Now Many CDs do you want to add? Input NumToAdd Set Count = NumToAdd While Count < NumToAdd Display Enter the Name of the CD Input CDName Display Enter the Artist of the CD Input CDArtist Display Enter any additional details for this CD Input CDNotes Set Type = 2 Open File Collection...If you want to get a full essay, gild it on our website: OrderEssay.net

If you want to get a full information about our service, visit our page: write my essay