write a code in Visual basic 2017 in windows apps form (.vb file).

CISRentals has the following type of cars for rental in the color of either Red or Black color. You may rent a car for 1 to 30 days. Price per day By Category 65 Large Sedan Medium Size 56 Small Sedan 34 85 Sport SUV Big 70 SUV Small 67 Clients get a 10% discount if their rental cost exceed 170 USD Write the VB code to produce a cost receipt with all the pertinent information