For each of the responses shown in the parentheses, determine the output display

Question

For each of the responses shown in the parentheses, determine the output displayed in the text box when the button is clicked. Private Sub btnDisplay_Click(...) Handles btnDisplay.Click Dim yearENIAC As Integer 'Ask question and obtain answer Dim message As String message = "In what year was the ENIAC computer completed?" yearENIAC = CInt(InputBox(message)) 'Respond to answer Select Case yearENIAC Case 1945 txtOutput.Text = "Correct." Case 1943 To 1947 txtOutput.Text = "Close, 1945." Case Is < 1943 txtOutput.Text = "Sorry, 1945. Work on the ENIAC " & _ "began in June 1943." Case Is > 1947 txtOutput.Text = "No, 1945. By then IBM had built " & _ "a stored-program computer." End Select End Sub (1940, 1945, 1950)

Explanation / Answer

Run the given code fragement then the output displayed in the text box when the button is clicked are: 1. When button is clicked, then program ask a question like what year was the ENIAC computer completed,so enter year(1940),then the follwoing output displayed in the text box. https://s3.amazonaws.com/answer-board-image/d1c56048-983a-4219-a323-2f689713899c.jpeg 2. Again enter year(1945),then the follwoing output displayed in the text box. https://s3.amazonaws.com/answer-board-image/6f2225ea-105d-496b-9021-6f6c24895676.jpeg 3. Finally enter year(1950),then the follwoing output displayed in the text box. https://s3.amazonaws.com/answer-board-image/8b409bbf-7166-413e-8ec7-a7f7997adfbc.jpeg

Related Questions

Navigate

• Browse (All)
• Browse F
• Subjects

---

---

Integrity-first tutoring: explanations and feedback only — we do not complete graded work. Learn more.