نقل قول: رویداد Usercontrol
جواب سؤال اول و دوم:
اول در محل Declaration این کد رو می نویسید
Public Shadows Event TextChanged(ByVal sender As Object, ByVal e As EventArgs
)
بعد هم این فرمان را اضافه کنید
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Tmr.Tick
Static n As String
Try
If Me.Document.DomDocument.body.innertext <> n Then
n = Me.Document.DomDocument.body.innertext
RaiseEvent TextChanged(Me, New EventArgs)
End If
Catch ex As Exception
End Try
End Sub
سوال سوم:
رویداد موجود مثل اود و اسکرول را با کلمه کلیدی Shadows تعریف کنید
[SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]Public[SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]Shadows[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]Event[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] Scroll([/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]ByVal[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] sender [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]As[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]Object[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2], [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]ByVal[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] e [/SIZE][SIZE=2][COLOR=#0000ff][SIZE=2][COLOR=#0000ff]As[/COLOR][/SIZE][/COLOR][/SIZE][SIZE=2] EventArgs)[/SIZE]
[/COLOR][/SIZE][/COLOR][/SIZE]
نقل قول: رویداد Usercontrol
ممنونم
کد سوم را درست کنید
به من که درست نشون نمی ده
نقل قول: رویداد Usercontrol
در کد دومتون هم یک تایمره یعنی من باید به یوزر کنترلم تایمر اضافه کنم؟
:متفکر:
یک مثال یا سورس کد باشه بهتر متوجه می شم
نقل قول: رویداد Usercontrol
یک تایمر باید اضافه کرده و اون رو فعال کنید
کد سوم هم اینه
PublicShadowsEvent Scroll(ByVal sender AsObject, ByVal e As EventArgs)
نقل قول: رویداد Usercontrol
دوست عزیز میتونید درباره کد دوم توضیح بدین
در ضمن اگر بخواهیم رویداد تکست چنج تکست باکس را به رویدادهای یوزر کنترل انتقال بدیم باید چکار کنیم؟