.NET (Core and Framework)

steve_9496613 wrote:

Searching the help I found that the delegate ThreadStart() is called automatically when I call "New Thread(AddressOf ...)" so how can I modify its parameters?

MyNewThread.Start(Me)

Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
They hate us for our freedom![^]

Imports System.Threading

Public Class Form1
  Dim MyNewThread As Thread

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    'create the thread 
    MyNewThread = New Thread(AddressOf MyThread.MyThreadExecute)
    MyNewThread.Name = "NuovoThread"
    'start the thread
    MyNewThread.Start()   'no "Me" parameter
  End Sub

  Public Sub AggiornaLabel(ByVal What As String)
    If InvokeRequired Then
      Invoke(New Action(Of String)(AddressOf AggiornaLabel), New Object() {What})
      Return
    End If

    Label1.Text = What
  End Sub

End Class


Public Class MyThread
  Private Shared miii As Int32 = 0

  Public Shared Property iii() As Int32
    Get
      Return miii
    End Get
    Set(ByVal value As Int32)
      miii = value
    End Set
  End Property

  Public Shared Sub MyThreadExecute(ByVal Origin As Object)
  'Public Shared Sub MyThreadExecute()
    Dim OriginForm As Form1 = CType(Origin, Form1)
    'Dim OriginForm As Form1 = New Form1()
    Do
      iii = iii + 1
      OriginForm.AggiornaLabel(iii.ToString)
      Thread.Sleep(100)
    Loop
  End Sub
End Class

steve_9496613 wrote:

About passing a parameter in an object when I start the thread, I can't do this because in the Compact Framework (not the full .NET) only the method Thread.Start() is supported, the method Thread.Start(Object) is not supported.

Imports System.Threading

Public Class Form1
    Dim MyNewThread As Thread

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click        
        'create the thread 
        MyNewThread = New Thread(AddressOf MyThread.MyThreadExecute)
        MyNewThread.Name = "NuovoThread"
        MyThread.ThatForm = Me
        'start the thread
        MyNewThread.Start()
    End Sub

    Public Sub AggiornaLabel(ByVal What As String)
        If InvokeRequired Then
            Invoke(New Action(Of String)(AddressOf AggiornaLabel), New Object() {What})
            Return
        End If

        Label1.Text = What
    End Sub
End Class

Public Class MyThread
    Private Shared miii As Int32 = 0
    Public Shared ThatForm As Form1

    Public Shared Property iii() As Int32
        Get
            Return miii
        End Get
        Set(ByVal value As Int32)
            miii = value
        End Set
    End Property

    Public Shared Sub MyThreadExecute()
        Do
            iii = iii + 1
            ThatForm.AggiornaLabel(iii.ToString)
            Thread.Sleep(100)
        Loop
    End Sub
End Class

Module MyThread
    Private miii As Int32 = 0
    Public ThatForm As Form1

    Public Property iii() As Int32
        Get
            Return miii
        End Get
        Set(ByVal value As Int32)
            miii = value
        End Set
    End Property

    Public Sub MyThreadExecute()
        Do
            iii = iii + 1
            ThatForm.AggiornaLabel(iii.ToString)
            Thread.Sleep(100)
        Loop
    End Sub
End Module

Bastard Programmer from Hell
If you can't read my code, try converting it here[^]
They hate us for our freedom![^]

$(document).ready(function() {
$.ajax({
type: "POST",
contentType: "application/json; charset=utf-8",
url: "Default.aspx/BindDatatable",
data: "{}",
dataType: "json",
success: function(data) {
for (var i = 0; i < data.d.length; i++) {
$("#gvDetails").append("<tr><td>" + data.d[i].UserId + "</td><td>" + data.d[i].UserName + "</td><td>" + data.d[i].Location + "</td></tr>");
}
},
error: function(result) {
alert("Error");
}
});
});

private void BindColumnToGridview()
{
DataTable dt = new DataTable();
dt.Columns.Add("UserId");
dt.Columns.Add("UserName");
dt.Columns.Add("Location");
dt.Rows.Add();
gvDetails.DataSource = dt;
gvDetails.DataBind();
gvDetails.Rows[0].Visible = false;
}

TalSt wrote:

Do you know of any example for Nlog for .Net compact 3.5?

TalSt wrote:

Do you know of any example for Nlog for .Net compact 3.5?

Richard MacCutchan wrote:

"Please make an effort to learn", is not always appreciated.

radha123 from Hyderabad wrote:

It is movie based website.

radha123 from Hyderabad wrote:

how i have to plan