VBA - Variables

Sub SayNameAndBday()
 'takes value in text type
   Dim Name As String

'takes value in numaric type 
   Dim num As Integer

'takes value only date type
   Dim BirthDay As Date
 

'String value need to be submit with "" quotes
   Name = "Admin"
   num = 1234
   BirthDay = DateValue("30 / 10 / 2020")

   MsgBox "Name is " & Name & Chr(10) & "Value of num is " & _
      num & Chr(10) & "Value of Birthday is " & BirthDay
End Sub