The value of Y after executing the program, n-6.x=2 is: Private Sub Command1 Click () Dim X, n, Y as Double X-Val (Text1. Text) n DVal (Text2.Text) S=0 F-1 For I 1 to n F=F* I S-S+X^I/F Next I Y=1+ S Text3.Text Y End Sub

Microsoft Visual C#
7th Edition
ISBN:9781337102100
Author:Joyce, Farrell.
Publisher:Joyce, Farrell.
Chapter13: Handling Events
Section: Chapter Questions
Problem 5E
icon
Related questions
Question
The value of Y after executing the program, n=6 .x=2 is: Design a project to calculate the area (A) for either a rectangle of dimensions (B L) or a square
of a side length (D). The user will first choose either the rectangle or the square using a drop down
menu. The number of the visible text boxes and labels, and the caption of the labels should change
as required.
Private Sub mnuRectangular Click ()
Private Sub Commandl_Click ()
Dim X, n, Y as Double
Label1.Caption - "input L
Label2.Visible - True
Text2.Visible - True
X= Val (Text1. Text)
Label2.Caption - "Input B
n = Val (Text2.Text)
End Sub
Private Sub mnusquar Click ()
Label1.Caption "Input D
Label2.Visible- True
S=0
Text2.Visible - True
F= 1
End Sub
Private Sub mnuArea Click)
Dim L, B, D, A As Single
Label3.Caption "A»
For I = 1 to n
If Label1.Caption "input L" Then
L-Val(Text1.Text)
8- Val(Text2.Text)
F=F* I
S= S+ X^ I/F
A-BL
Next I
Elseif Label1.Caption - "input D" Then
D- Val(Text1.Text)
A-DA2
Y = 1+ S
Text3. Text A
End if
End Sub
Text3.Text = Y
End Sub
7.35556
True
6.35556
False
6.266667
II
<>
III
<>
Transcribed Image Text:The value of Y after executing the program, n=6 .x=2 is: Design a project to calculate the area (A) for either a rectangle of dimensions (B L) or a square of a side length (D). The user will first choose either the rectangle or the square using a drop down menu. The number of the visible text boxes and labels, and the caption of the labels should change as required. Private Sub mnuRectangular Click () Private Sub Commandl_Click () Dim X, n, Y as Double Label1.Caption - "input L Label2.Visible - True Text2.Visible - True X= Val (Text1. Text) Label2.Caption - "Input B n = Val (Text2.Text) End Sub Private Sub mnusquar Click () Label1.Caption "Input D Label2.Visible- True S=0 Text2.Visible - True F= 1 End Sub Private Sub mnuArea Click) Dim L, B, D, A As Single Label3.Caption "A» For I = 1 to n If Label1.Caption "input L" Then L-Val(Text1.Text) 8- Val(Text2.Text) F=F* I S= S+ X^ I/F A-BL Next I Elseif Label1.Caption - "input D" Then D- Val(Text1.Text) A-DA2 Y = 1+ S Text3. Text A End if End Sub Text3.Text = Y End Sub 7.35556 True 6.35556 False 6.266667 II <> III <>
Expert Solution
steps

Step by step

Solved in 2 steps

Blurred answer
Knowledge Booster
Public key encryption
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,