Question

求写一下vb.net双线程的代码:两个按钮和两个label控件，按钮让label自加，按钮互不干扰

Answer 1

Imports System
Imports System.Threading
Public Class Form1
    Dim TestThread1, TestThread2 As Thread
    Public Sub TestMethod1()
        Dim i As Integer
        i = 0
        While (i < 10)
            Label1.Text = i
            i += 1
        End While
    End Sub
    Public Sub TestMethod2()
        Dim i As Integer
        i = 0
        While (i < 10)
            Label2.Text = i
            i += 1
        End While
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Control.CheckForIllegalCrossThreadCalls = False
        TestThread1 = New Thread(New ThreadStart(AddressOf TestMethod1))
        TestThread1.Start()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Control.CheckForIllegalCrossThreadCalls = False
        TestThread2 = New Thread(New ThreadStart(AddressOf TestMethod2))
        TestThread2.Start()
    End Sub
End Class

追问

大神，我问一下，如果两个自加变为自己计数的话，不会卡吗

追答

不会卡，因为是两个线程，独立进行的，自己计数的话，有时隙的，也不会卡

追问

但实际上我写的会卡，不知道啥原因

追答

不知道你的代码是什么样子的
你可以加一个间隔来缓解一下

追问

我是让计数到10000，然后重新计数。单独按一边很流畅，两边都按下就开始卡顿

我待会发图片，你帮忙看一下好吗

追答

好吧，最好发个代码

追问

追答

加了sleep也不行吗

追问

嗯，两边同时按，会卡

大神有解决办法吗？

追答

你能不能把工程发给我看看？

追问

发不了文件，关键代码就这些。。

追答

那你能不能把代码粘贴出来？
看着图片打 好累的

追问

好的