Posts

Showing posts from July, 2017

Vb.Net Programmes

Image
Public Class Form1          Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click          Dim i As Integer          Dim week(6) As String week(0) = "Sunday" week(1) = "Monday" week(2) = "Tuesday" week(3) = "Wednesday" week(4) = "Thursday" week(5) = "Friday" week(6) = "Saturday"  For i = 0 To week.Length - 1  MsgBox(week(i)) Next     End Sub End Class CheckBox Control Protected Sub Button1_Click ( ByVal sender As Object , ByVal e As System . EventArgs ) Handles Button1 . Click If CheckBox1 . Checked = True Then Literal1 . Text = "You Checked the Box" Else Literal1 . Text = "You Did Not Check the Box" End If End Sub Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim msg As String = "" If Chec