PDA

View Full Version : سوال: سوال در رابطه با استفاده از نخ Thread



Photo Maker
شنبه 03 فروردین 1392, 18:55 عصر
سلام
1- یه textbox داخل فرم دارم که هر متنی نوشته بشه، کلمه visual رو به visual.net تغییر میده
2- و یک کد هم توی خود فرم زدم که متن textbox رو در یکی از درایو ها ذخیره میکنه - .txt
حالا می خوام هر کدوم از این کد هارو در یک نخ جدا قرار بدم
یعنی 1 توی یه نخ و 2 هم توی نخ دیگه
هر کاری می کنم کار نمی کنه . میشه یه نمونه بگید چطور باید از thread استفاده کنم؟
ممنون

ali reza mansoori 2
یک شنبه 04 فروردین 1392, 10:08 صبح
Dim T As New Threading.Thread(AddressOf RT)
T.Start("متن مورد نظر")


Private Sub RT(ByVal Txt As String)
کد های دستورات شماره یک
Me.Invoke(New ST_(AddressOf ST), "متن مورد نظر بعد از انجام دستورات شماره 1 روی آن")
End Sub


Private Delegate Sub ST_(ByVal Txt As String)
Private Sub ST(ByVal Txt As String)
کد های دستورات شماره دو
End Sub

Photo Maker
یک شنبه 04 فروردین 1392, 10:53 صبح
این کد Replace رو داخل textbox1 گذاشتم تا خودکار در حین تایپ تغییر بده
کد اول:
Dim x As Integer
x = 1
For i = 1 To x
Dim name As String
name = Me.TextBox1.Text
name = Replace(name, "Visual", "xxx")
Me.TextBox1.Text = name
x = x + 1
Next

کد دوم رو جاش گذاشتم، درست کار کرد و راحت سیو می کنه
ولی کد اول رو اون جایی که گفتید، میزارم جواب نمیده و وقتی از اونجا خارج می کنم و توی textbox1 میزارم کار می کنه. که در اون صورت هم کلا از thread خارج هست
چیکار کنم ؟!

ali reza mansoori 2
یک شنبه 04 فروردین 1392, 22:35 عصر
این فقط یه نمونه بود که من گزاشتم
در ضمن قطعه کد ST روی نخ جدید اجرا نمیشه و داخل نخ خود فرم اجرا میشه
اگه نتونستید مشکل رو حل کنید بگید