[silverlight]

PHP كود :

 Dim dt As DateTime = DateTime.Now
        Dim dateString As String = String.Concat(New String() {dt.Month.ToString(CultureInfo.CurrentCulture), "/", dt.Day.ToString(CultureInfo.CurrentCulture), "/", dt.Year.ToString(CultureInfo.CurrentCulture)})
        Dim timeString As String = String.Concat(New String() {dt.Hour.ToString(CultureInfo.CurrentCulture), "/", dt.Minute.ToString(CultureInfo.CurrentCulture), "/", dt.Second.ToString(CultureInfo.CurrentCulture)})

        Dim datetimeString As String = timeString & " " & dateString

        Me.TextBox1.Text = datetimeString 


هذا نفس الحل أعلاه بأسلوب مختلف

PHP كود :

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

        Dim dt As DateTime = DateTime.Now
        Dim bidaya As New bidayaaDateTirm With {.Year = dt.Year, .Month = dt.Month, .Day = dt.Day, .Hour = dt.Hour, .Minute = dt.Minute, .Second = dt.Second}
        Dim dateString As String = String.Concat(New String() {bidaya.Month.ToString(CultureInfo.CurrentCulture), "/", bidaya.Day.ToString(CultureInfo.CurrentCulture), "/", bidaya.Year.ToString(CultureInfo.CurrentCulture)})
        Dim timeString As String = String.Concat(New String() {bidaya.Hour.ToString(CultureInfo.CurrentCulture), "/", bidaya.Minute.ToString(CultureInfo.CurrentCulture), "/", bidaya.Second.ToString(CultureInfo.CurrentCulture)})

        Dim datetimeString As String = timeString & " " & dateString
        Dim result As String = datetimeString
    End Sub

End Class

Public Structure bidayaaDateTirm

    Public Year As Integer
    Public Month As Integer
    Public Day As Integer
    Public Hour As Integer
    Public Minute As Integer
    Public Second As Integer

End Structure