Program for elevator application, Visual Basic Programming

Assignment Help:

You are given a console program in both VB and C# that uses a class CElevator (ElevatorAppAssign).

The main modules are in the assign directory class files.

Below is a discussion of that for VB; the one for C# is similar.

This discussion will show what is needed to write the class CElevator (in both VB and C#).

When this class is complete, add it to your projects, and then run the projects.

Hand in the code for CElevator and the output (one set for VB, one set for C#).

An explanation of the application code follows

The main module starts with:

Sub Main()

'Set time between floors

CElevator.TimePerFloor = 2.5

Dim anElevatorAs CElevator = New CElevator(0, 10, 8)

The class CElevation should have only one constructor that takes three parameters:

(1) lowest floor number

(2) highest floor number

(3) maximum number of passengers that can be on the elevator

The elevator initially should have no passengers and be at the lowest level.

anElevator.Status()

The method Status should output to the screen text with the following format:

The elevator is at floor XX, with YY persons

Console.WriteLine("At floor {0}", anElevator.Floor)

Console.WriteLine("Number of persons in elevator is {0}", _

anElevator.Occupants)

Console.WriteLine()

The property Floor should return the floor number the elevator is on, an integer.

The property Occupants should return the number of persons on the elevator.

The above two properties should not be capable of setting these values; only returning them.

anElevator.Enter(3)

anElevator.Enter(2)

anElevator.Leave(1)

Console.WriteLine("Number of persons in elevator is {0}", _

anElevator.Occupants)

Console.WriteLine()

The method Enter(noPass) tries to place noPass additional passengers on the elevator.

The method Leave(noPass) tries to remove noPass passengers from the elevator.

These methods must guard against having above the maximum number of passengers on the elevator, or less than 0 passengers on the elevator.

The Enter method should allow as many passengers as possible to enter the elevator.

In particular, if the elevator is full, print the console message:

"Elevator full, so no one entered"

If there are more people trying to enter the elevator than space permits, allow whatever number can enter, and print the console message:

"Only allowed XX persons to enter"

If there is room for everyone to enter, no message should be printed.

Similarly, the Leave method: should allow as many passengers as possible to leave the elevator.

In particular, if the elevator is empty, print the console message:

"Elevator empty, so no one left"

If there are more people trying to leave the elevator than are on the elevator, allow all the passengers to leave, and print the console message:

"Only have XX number of persons leaving"

If there is room for everyone to leave, no message should be printed.

anElevator.GoToFloor(3)

anElevator.GoDownOneFloor()

anElevator.GoDownOneFloor()

anElevator.GoUpOneFloor()

Console.WriteLine("At floor {0}", anElevator.Floor)

Console.WriteLine()

The method GoToFloor (fno) attempts to take the elevator to floor number fno.

The value of fno must be legal; if at attempt is made to go above the maximum floor number, print the console message:

"Trying to go past top floor"

Similarly, if an attempt is made to go below the minimum floor number, print:

"Trying to go below bottom floor"

In both of the above cases, do not move the elevator.

No message is needed for a legal elevator move.

The methods GoToTopFloor() and GoToBottomFloor( ) have the meaning you would expect.

The methods GoDownOneFloor, and GoUpOneFloor also have obvious meaning, but again, you must guard against illegal floors. In particular, If GoDownOneFloor tries to go below the minimum floor number, print the console message:

"Trying to go below bottom floor"

If the method GoUpOneFloor tries to go past the maximum floor number, print:

"Trying to go above top floor"

anElevator.GoToFloor(5)

Console.WriteLine("Time to get to floor 9 is {0:F2} seconds", _

anElevator.TimeToFloor(9))

The method TimeToFloor(fno) returns the number of seconds it will take to go from the elevator's current floor to floor fno. Your class should contain a class variable dTimePerFloorwhose value is 2.5 seconds (a double) and set in the first line of the client code. Use this for your computation.

The time go between floors is then printed via:

Console.WriteLine("Time to go between floors is {0:F2} seconds", _

CElevator.TimePerFloor)

anElevator.Empty()

Console.WriteLine("It is " _

&anElevator.IsEmpty.ToString.ToLower _

&" that the elevator is empty")

Console.WriteLine("It is " _

&anElevator.IsFull.ToString.ToLower _

&" that the elevator is full")

anElevator.Status()

Console.WriteLine()

The method Empty should have all passengers leave the elevator.

Similarly a method Full should result in the elevator having its maximum number of passengers.

The property IsEmpty should return True or False, a Boolean, depending on the occupancy of the elevator. Similarly, the property IsFull should return True or False, a Boolean, also depending on the occupancy of the elevator. These two methods should only return values.

The remaining code in this module tests that various methods do not behave incorrectly; no new methods are used.

 


Related Discussions:- Program for elevator application

Visual basic 2012, I am a beginner in Visual basic 2012 and making a data m...

I am a beginner in Visual basic 2012 and making a data management programme with visual basic 2012 as front end and MySql as back end. I want to filter data grid view table with Li

Help file property, Sets or returns wholly qualified path to a Help File. I...

Sets or returns wholly qualified path to a Help File. If Help file is indicated in HelpFile, it is called automatically when the user clicks Help button (or presses the F1 key) in

Vb script basics, This section will discuss the fundamentals of VBScript an...

This section will discuss the fundamentals of VBScript and define concepts such as datatypes, loops and others. VBScript Data Types VBScript contain only one data type called

Introduction to visual c++ programming, INTRODUCTION to VISUAL C++ PROGRAMM...

INTRODUCTION to VISUAL C++ PROGRAMMING This section introduces you to develop the applications using VC++. The Single document interface (SDI), multiple document interface (MDI

Software that is obscure - basics of gui design, Software That Is Obscure: ...

Software That Is Obscure: The Software hides the intensions, meaning and actions from the user. For illustration, if a user is asked whether a full installation, the custom in

Dictionary object in vbscript, The Dictionary object stores data as key, it...

The Dictionary object stores data as key, item pairs. A Dictionary object is the corresponding of a PERL associative array. Items, that can be any form of data, are stored in the a

Program to order a product from inventory, Write a program that permits the...

Write a program that permits the user to order a product from inventory. The user selects the product and enters the quantity. If there is sufficient quantity on hand of the produc

Programming, steps of connecting database from vb6.0

steps of connecting database from vb6.0

Vbscript procedures, A Sub procedure is a series of VBScript statements, en...

A Sub procedure is a series of VBScript statements, enclosed through Sub & End Sub statements which perform actions however don't return a value. A Sub procedure can take arguments

Explain dtd elements and dtd attributes, Problem 1. Describe the concep...

Problem 1. Describe the concept of exception in .Net environment 2. Explain the process of adding, updating and deleting records with an example 3. Explain DTD elements a

Write Your Message!

Captcha
Free Assignment Quote

Assured A++ Grade

Get guaranteed satisfaction & time on delivery in every assignment order you paid with us! We ensure premium quality solution document along with free turntin report!

All rights reserved! Copyrights ©2019-2020 ExpertsMind IT Educational Pvt Ltd