Rewrite the code by using (IF) Instead of (Select case)

Computer Networking: A Top-Down Approach (7th Edition)
7th Edition
ISBN:9780133594140
Author:James Kurose, Keith Ross
Publisher:James Kurose, Keith Ross
Chapter1: Computer Networks And The Internet
Section: Chapter Questions
Problem R1RQ: What is the difference between a host and an end system? List several different types of end...
icon
Related questions
Question
Q2/Rewrite the code by using (IF) Instead of (Select case)
Private Sub Form_Activate()
Font.Name = "arial": Font.Size 14: Font.Bold True
start:
%3D
%3D
%3D
k = InputBox("input k", "input", , 6000, 1000)
if k = "q" then end
Select Case k
Case 1: H = 4 * k+ 1: Print , "k="; k, "H="; H
Case 2: H = 5 *k: Print , "k="; k, "H="; H
Case 3: H = 8 * k + 2: Print , "k="; k, "H="; H
End Select
GoTo start
End Sub
Visual Basic
Transcribed Image Text:Q2/Rewrite the code by using (IF) Instead of (Select case) Private Sub Form_Activate() Font.Name = "arial": Font.Size 14: Font.Bold True start: %3D %3D %3D k = InputBox("input k", "input", , 6000, 1000) if k = "q" then end Select Case k Case 1: H = 4 * k+ 1: Print , "k="; k, "H="; H Case 2: H = 5 *k: Print , "k="; k, "H="; H Case 3: H = 8 * k + 2: Print , "k="; k, "H="; H End Select GoTo start End Sub Visual Basic
Expert Solution
steps

Step by step

Solved in 2 steps

Blurred answer
Recommended textbooks for you
Computer Networking: A Top-Down Approach (7th Edi…
Computer Networking: A Top-Down Approach (7th Edi…
Computer Engineering
ISBN:
9780133594140
Author:
James Kurose, Keith Ross
Publisher:
PEARSON
Computer Organization and Design MIPS Edition, Fi…
Computer Organization and Design MIPS Edition, Fi…
Computer Engineering
ISBN:
9780124077263
Author:
David A. Patterson, John L. Hennessy
Publisher:
Elsevier Science
Network+ Guide to Networks (MindTap Course List)
Network+ Guide to Networks (MindTap Course List)
Computer Engineering
ISBN:
9781337569330
Author:
Jill West, Tamara Dean, Jean Andrews
Publisher:
Cengage Learning
Concepts of Database Management
Concepts of Database Management
Computer Engineering
ISBN:
9781337093422
Author:
Joy L. Starks, Philip J. Pratt, Mary Z. Last
Publisher:
Cengage Learning
Prelude to Programming
Prelude to Programming
Computer Engineering
ISBN:
9780133750423
Author:
VENIT, Stewart
Publisher:
Pearson Education
Sc Business Data Communications and Networking, T…
Sc Business Data Communications and Networking, T…
Computer Engineering
ISBN:
9781119368830
Author:
FITZGERALD
Publisher:
WILEY