Mistři v programování na #hovnokod

Visual Basic #4284

        Private Sub SetFleetControls()
            Dim isEnabled = FleetScreen.AircraftsGrid.RowCount > 0
            If isEnabled Then
                SingleCopyAircraftButton.Enabled = True
                MultiCopyAircraftButton.Enabled = True
                FleetToExcelButton.Enabled = True
                FleetFromExcelButton.Enabled = True
                OpenAircraftDetailsButton.Enabled = True
                FleetCostingDetailsToExcelButton.Enabled = True
                FleetCostingDetailsFromExcelButton.Enabled = True
                DetailsToExcelButton.Enabled = True
                AllocateTotalPremiumButton.Enabled = True
                FleetApplySuggestedButton.Enabled = True
            Else
                SingleCopyAircraftButton.Enabled = False
                MultiCopyAircraftButton.Enabled = False
                FleetToExcelButton.Enabled = False
                FleetFromExcelButton.Enabled = False
                OpenAircraftDetailsButton.Enabled = False
                FleetCostingDetailsToExcelButton.Enabled = False
                FleetCostingDetailsFromExcelButton.Enabled = False
                DetailsToExcelButton.Enabled = False
                AllocateTotalPremiumButton.Enabled = False
                FleetApplySuggestedButton.Enabled = False
            End If
        End Sub

Anonymous,