This code display the value of roots in text boxes for the following quadratic equation using quadratic formula. When the value of coefficient (a) equal to zero or (b2 -4ac) less than zero, the code write a message box (end the program). aX2+ bX+ c= 0, X1,2 2a Private Sub Command1 Click() Dim a, b, c, x1, x2, z As Single a = InputBox("Enter Value of a") b = InputBox("Enter Value of b") c = InputBox("Enter Value of c") z = b^2 - 4 * a *c 1-..... ..... x1 = (-b + Sqr(b^2 - 4 * a * c))/2 * a x2 = (-b - Sqr(b ^2 - 4 * a * c)) /2 * a 2-...... Text1.Text ="" Text2.Text = "" 1111 %3D MsgBox ("End the program"): Exit Sub 3-.... 4-.... 5-... End Sub

Microsoft Visual C#
7th Edition
ISBN:9781337102100
Author:Joyce, Farrell.
Publisher:Joyce, Farrell.
Chapter2: Using Data
Section: Chapter Questions
Problem 1E: What is the numeric value of each of the following expressions, as evaluated by the C# programming...
icon
Related questions
Question
3 نقاط
This code display the value of roots in
text boxes for the following quadratic
equation using quadratic formula. When
the value of coefficient (a) equal to zero
or (b2 -4ac) less than zero, the code
write a message box (end the program).
-btvb2-4ac
aX2+ bX+ c= 0, X1,2
2a
Private Sub Command1_Click()
Dim a, b, c, x1, x2, z As Single
a = InputBox("Enter Value of a")
b = InputBox("Enter Value of b")
c = InputBox("Enter Value of c")
z= b^2 - 4 * a *c
%3D
%3D
1-.....
x1 = (-b + Sqr(b ^2 - 4 * a * c))/2 * a
x2 = (-b - Sqr(b ^ 2 - 4 * a * c)) / 2 * a
2-.....
Text1.Text = ""
Text2.Text =""
MsgBox ("End the program"): Exit Sub
3-.....
%3D
4-.....
5-....
End Sub
Transcribed Image Text:3 نقاط This code display the value of roots in text boxes for the following quadratic equation using quadratic formula. When the value of coefficient (a) equal to zero or (b2 -4ac) less than zero, the code write a message box (end the program). -btvb2-4ac aX2+ bX+ c= 0, X1,2 2a Private Sub Command1_Click() Dim a, b, c, x1, x2, z As Single a = InputBox("Enter Value of a") b = InputBox("Enter Value of b") c = InputBox("Enter Value of c") z= b^2 - 4 * a *c %3D %3D 1-..... x1 = (-b + Sqr(b ^2 - 4 * a * c))/2 * a x2 = (-b - Sqr(b ^ 2 - 4 * a * c)) / 2 * a 2-..... Text1.Text = "" Text2.Text ="" MsgBox ("End the program"): Exit Sub 3-..... %3D 4-..... 5-.... End Sub
Expert Solution
steps

Step by step

Solved in 2 steps with 3 images

Blurred answer
Knowledge Booster
Mathematical functions
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.
Similar questions
  • SEE MORE QUESTIONS
Recommended textbooks for you
Microsoft Visual C#
Microsoft Visual C#
Computer Science
ISBN:
9781337102100
Author:
Joyce, Farrell.
Publisher:
Cengage Learning,
Np Ms Office 365/Excel 2016 I Ntermed
Np Ms Office 365/Excel 2016 I Ntermed
Computer Science
ISBN:
9781337508841
Author:
Carey
Publisher:
Cengage
Programming Logic & Design Comprehensive
Programming Logic & Design Comprehensive
Computer Science
ISBN:
9781337669405
Author:
FARRELL
Publisher:
Cengage