Trace the output of the following program: wte the output in the list boxes provided in the form below. Dim ni As Integer = t1.Text Dim n2 As Integer - t2. Text Dim i As Integer 1 Do If (n1 Mod i = 0 And n2 Mod i = 0) Then 1st3.Items.Add (i) End If If (i Mod 2 = 1) Then 1st1.Items.Add (i) Else 1st2.Items.Add(i) End If i -i + 1 4. Loop Until (i > n1 And i > n2) ni 3 n2 6 Start

Database System Concepts
7th Edition
ISBN:9780078022159
Author:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Chapter1: Introduction
Section: Chapter Questions
Problem 1PE
icon
Related questions
Question
Use visual basic
Trace the output of the following program:
write the output in the list boxes provided in the form below.
Dim ni As Integer = t1.Text
Dim n2 As Integer = t2.Text
Dim i As Integer - 1
Do
If (n1 Mod i = 0 And n2 Mod i = 0) Then
1st3.Items.Add (i)
End If
If (i Mod 2 = 1) Then
1st1.Items. Add (i)
Else
1st2.Items.Add(i)
End If
i - i + 1
Loop Until (i > n1 And i > n2)
4.
OA Tráce
ni 3
n2 6
Start
Transcribed Image Text:Trace the output of the following program: write the output in the list boxes provided in the form below. Dim ni As Integer = t1.Text Dim n2 As Integer = t2.Text Dim i As Integer - 1 Do If (n1 Mod i = 0 And n2 Mod i = 0) Then 1st3.Items.Add (i) End If If (i Mod 2 = 1) Then 1st1.Items. Add (i) Else 1st2.Items.Add(i) End If i - i + 1 Loop Until (i > n1 And i > n2) 4. OA Tráce ni 3 n2 6 Start
NAME
ID
SE
ete the following questions in the boxes provided.
Write a Visual Basic statement to compute and display 2 exponentiation 50 in the
listbox1
Write one line code to display the position of "the" in the string "online theatre" in
the textbox1.
Write only code to compute the total fee
Yearly Membership $100
Private Sub btncompute_Click(..
9 Tennis 15 %
Total fee
O VolleyBall 20% 125.000
Dim f, t, v, s As Double
f=100
M swimming 10%
compute fee
'complete the code here
Control
| Tennis 15%
Volleyball 20%
Swimming 10% chks
Name
chkt
chkv
f = f +t + v + S
TextBox1.Text = f.ToString("000.000 ")
End Sub
Transcribed Image Text:NAME ID SE ete the following questions in the boxes provided. Write a Visual Basic statement to compute and display 2 exponentiation 50 in the listbox1 Write one line code to display the position of "the" in the string "online theatre" in the textbox1. Write only code to compute the total fee Yearly Membership $100 Private Sub btncompute_Click(.. 9 Tennis 15 % Total fee O VolleyBall 20% 125.000 Dim f, t, v, s As Double f=100 M swimming 10% compute fee 'complete the code here Control | Tennis 15% Volleyball 20% Swimming 10% chks Name chkt chkv f = f +t + v + S TextBox1.Text = f.ToString("000.000 ") End Sub
Expert Solution
steps

Step by step

Solved in 2 steps

Blurred answer
Knowledge Booster
Problems on Dynamic Programming
Learn more about
Need a deep-dive on the concept behind this application? Look no further. Learn more about this topic, computer-science and related others by exploring similar questions and additional content below.
Recommended textbooks for you
Database System Concepts
Database System Concepts
Computer Science
ISBN:
9780078022159
Author:
Abraham Silberschatz Professor, Henry F. Korth, S. Sudarshan
Publisher:
McGraw-Hill Education
Starting Out with Python (4th Edition)
Starting Out with Python (4th Edition)
Computer Science
ISBN:
9780134444321
Author:
Tony Gaddis
Publisher:
PEARSON
Digital Fundamentals (11th Edition)
Digital Fundamentals (11th Edition)
Computer Science
ISBN:
9780132737968
Author:
Thomas L. Floyd
Publisher:
PEARSON
C How to Program (8th Edition)
C How to Program (8th Edition)
Computer Science
ISBN:
9780133976892
Author:
Paul J. Deitel, Harvey Deitel
Publisher:
PEARSON
Database Systems: Design, Implementation, & Manag…
Database Systems: Design, Implementation, & Manag…
Computer Science
ISBN:
9781337627900
Author:
Carlos Coronel, Steven Morris
Publisher:
Cengage Learning
Programmable Logic Controllers
Programmable Logic Controllers
Computer Science
ISBN:
9780073373843
Author:
Frank D. Petruzella
Publisher:
McGraw-Hill Education