Private Sub btnM ileage_Click(By Val sender As System.Object, ByVal e As System.Eventargs) Handles btnMileage.Click Dim intMiles As Decimal= 323.2D Dim decGallons As Decimal - 13.8D Dim decMilesPer As Decimal decM ilesPer = Compute(decM iles, decGallons) IbIDisplays.Text = "Your MPG is " & decMiles.ToString() End Sub Private Sub Compute( Byal decM As Decimal, ByVal decG) As Decimal Dim decM PG As Decimal decMPG - decM / decG Return MilesPerGallon End Function

Which of the following displays the number of elements contained in theintItems array?a. lblCount.Text = intItems.Lenb. lblCount.Text = intItems.Lengthc. lblCount.Text = Length(intItems)d. lblCount.Text = intItems.NumElements

In the langauage R: Which of the following statements is NOT correct about themes in R? Select one: Once set, a theme applies to all subsequent plots and remains active until it is replaced by a different theme The theme_set() function takes the name of a theme as an argument If we want to change the overall look of the figure all at once, we can use ggplot’s theme engine The theme_minimal() function can make ggplot output look like it has been featured in the Wall Street Journal

Fix the code: Private Sub btnSoftball_Click(ByVal sender AsSystem.Object, ByVal e As System.EventArgs) Handles btns of tball.Click Dim decHits As Decimal= 210 Dim decTimesAtBat As Decimal = 428 Dim decBattingAverage As Decimal decBatting Average = Batting Average( decHits, decTimesAtBat) IblHits.Text = "The batting average is" & decBatting Average.ToString() End Sub Private Function Batting Average( ByVal decHitsCount As Decimal decNumberAtBat) Dim decAverageAtBat As Decimal decAverageAtBat = decHitsCount / decNumberAtBat End Function