Visual Basic Variable Examples

Variable_1.vb

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim say1, say2, say3 As Integer
        say1 = Val(TextBox1.Text)
        say2 = Val(TextBox2.Text)
        say3 = say1 + say2
        TextBox3.Text = say3
        TextBox3.Show()
        Label3.Show()
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox3.Hide()
        Label3.Hide()
    End Sub
End Class

Variable_2.vb

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim say1, say2, say3 As Single
        say1 = CSng(TextBox1.Text)
        say2 = CSng(TextBox2.Text)
        say3 = say1 + say2
        TextBox3.Text = say3
        TextBox3.Show()
        Label3.Show()
    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        TextBox3.Hide()
        Label3.Hide()

    End Sub
End Class

Variable_3.vb

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        MsgBox("Can Okay")
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        MsgBox("Can Okay, Tarih ve Saat= " & Now)
    End Sub
End Class

Variable_4.vb

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        TextBox1.Text = "Can Okay"
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim A As String
        A = "can okay"
        TextBox1.Text = A
    End Sub
End Class