i need life cycle and comments on these codes (example: int x; // declare x ; ) VB Code Imports System Imports System.Collections.Generic Imports System.ComponentModel Imports System.Data Imports System.Drawing Imports System.Linq Imports System.Text Imports System.Threading.Tasks Imports System.Windows.Forms Namespace Student Public Partial Class Form1 Inherits Form Public Sub New() InitializeComponent() End Sub Private Sub btnCalculatePerc_Click(ByVal sender As Object, ByVal e As EventArgs) txtPercentage.Text = ((Convert.ToInt32(txtMark1.Text) + Convert.ToInt32(txtMark2.Text) + Convert.ToInt32(txtMark3.Text)) / 3).ToString() End Sub Private Sub btnDisplayGrade_Click(ByVal sender As Object, ByVal e As EventArgs) If Convert.ToDouble(txtPercentage.Text) >= 80 Then txtLevel.Text = "Excellent" ElseIf Convert.ToDouble(txtPercentage.Text) >= 70 AndAlso Convert.ToDouble(txtPercentage.Text) <= 79 Then txtLevel.Text = "Very Good" ElseIf Convert.ToDouble(txtPercentage.Text) >= 60 AndAlso Convert.ToDouble(txtPercentage.Text) <= 69 Then txtLevel.Text = "Good" ElseIf Convert.ToDouble(txtPercentage.Text) >= 50 AndAlso Convert.ToDouble(txtPercentage.Text) <= 59 Then txtLevel.Text = "Satisfactory" ElseIf Convert.ToDouble(txtPercentage.Text) < 50 Then txtLevel.Text = "Fail" End If End Sub End Class End Namespace
i need life cycle and comments on these codes
(example: int x; // declare x ; )
VB Code
Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Linq
Imports System.Text
Imports System.Threading.Tasks
Imports System.Windows.Forms
Namespace Student
Public Partial Class Form1
Inherits Form
Public Sub New()
InitializeComponent()
End Sub
Private Sub btnCalculatePerc_Click(ByVal sender As Object, ByVal e As EventArgs)
txtPercentage.Text = ((Convert.ToInt32(txtMark1.Text) + Convert.ToInt32(txtMark2.Text) + Convert.ToInt32(txtMark3.Text)) / 3).ToString()
End Sub
Private Sub btnDisplayGrade_Click(ByVal sender As Object, ByVal e As EventArgs)
If Convert.ToDouble(txtPercentage.Text) >= 80 Then
txtLevel.Text = "Excellent"
ElseIf Convert.ToDouble(txtPercentage.Text) >= 70 AndAlso Convert.ToDouble(txtPercentage.Text) <= 79 Then
txtLevel.Text = "Very Good"
ElseIf Convert.ToDouble(txtPercentage.Text) >= 60 AndAlso Convert.ToDouble(txtPercentage.Text) <= 69 Then
txtLevel.Text = "Good"
ElseIf Convert.ToDouble(txtPercentage.Text) >= 50 AndAlso Convert.ToDouble(txtPercentage.Text) <= 59 Then
txtLevel.Text = "Satisfactory"
ElseIf Convert.ToDouble(txtPercentage.Text) < 50 Then
txtLevel.Text = "Fail"
End If
End Sub
End Class
End Namespace
Step by step
Solved in 2 steps