close
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim num1 As Integer
        num1 = 20
        Label1.Text = num1
 
        Dim num2 As Single
        num2 = 12.3456
        Label2.Text = num2
 
        Dim str1 As String
        str1 = "HI"
        Label3.Text = str1
 
        Dim bir As Date
        bir = #04/05/2017 07:39:15 PM#
        Label4.Text = bir
 
    End Sub
End Class
arrow
arrow

    陰界黑幫 發表在 痞客邦 留言(0) 人氣()