Public Class Form1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Label1.Text = "a" Call Sub() Label1.Text &= "b" Label1.Text &= "c" End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Label2.Text = "a" Invoke(Sub() Label2.Text &= "b") Label2.Text &= "c" End Sub Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click Label3.Text = "a" BeginInvoke(Sub() Label3.Text &= "b") Label3.Text &= "c" End Sub Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click Label4.Text = "a" BeginInvoke(Sub() Label4.Text &= "b") Label4.Text &= "c" Application.DoEvents() Label4.Text &= "d" End Sub End Class