Вам нужно создать экземпляр коллекции, прежде чем вы сможете ее использовать.Как и в случае, когда вы объявляете новый объект Quotation, список VehicleType устанавливается в ничего.Измените строку объявления на
Dim VehicleType As New List(Of FareAsPerVehicleType)
Или, что еще лучше, измените объявление на удаление Dim и замените на Public, чтобы показать доступность поля.
Public VehicleType As New List(Of FareAsPerVehicleType)
Чтобы действительно сделатьКод блеска, вы можете заменить это поле на свойство auto:
Public Property VehicleType() As New List(Of FareAsPerVehicleType)
. Любое из этих действий поможет избавиться от вашей ошибки.