Setting sting, boolean, integer, and decimal Variables

 Public Class Form1
  
 
  
   Private Sub btnInterger_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnInterger.Click
  
     Dim interger As Integer
  
     interger = 5
  
     MessageBox.Show(interger)
  
 
  
   End Sub
  
 
  
   Private Sub btnDecimal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDecimal.Click
  
     Dim decimalvalue As Decimal
  
     decimalvalue = 10
  
     MessageBox.Show(decimalvalue)
  
   End Sub
  
 
  
   Private Sub btnBoolean_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBoolean.Click
  
     Dim booleanvalue As Boolean
  
     booleanvalue = 15
  
     MessageBox.Show(booleanvalue)
  
   End Sub
  
 
  
   Private Sub btnString_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnString.Click
  
     Dim stringvalue As String
  
     stringvalue = 20
  
     MessageBox.Show(stringvalue)
  
 
  
   End Sub
  
 End Class