Question: 3) Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim inthangerLength As Integer = 44 Dim intMen As Integer-2000 Dim int Women As
3) Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim inthangerLength As Integer = 44 Dim intMen As Integer-2000 Dim int Women As Integer- 8000 Dim int Value As Integer int Value - Talk(intMen, int Women) iblResponseText = "The couple would say " & intValue & " words a day" Average Hanger(?ntHanger Length) End Sub Private Sub AverageHanger(By Val intHanger As Integer) End Sub IblPhrase.Text - "The average length of a coat hanger when straightened is"& intHanger&"inches." Private Function Talk(By Val intM As Integer, ByVal intW As Integer) As Integer lblPhrasel.Text- "The average man says"& intM&" words a day" lblPhrase2.Text- "The average woman says"& intW &"words a day" Return intM +int W End Function
Step by Step Solution
There are 3 Steps involved in it
Get step-by-step solutions from verified subject matter experts
