[ابو روضة]

أخى عبد العزيز هل ممكن الاستغناء عن الWebBrowser واستعمال

هذا الكود الصغير لعمل شريط متحرك أيضا ؟

لو نعم فهذا كود يقوم بعمل شريط متحرك داخل Label لآن اداة الويب براوزر كما تعرف 

مكتبة كبيرة مبنية على متصفح Internet Explorer وبكل تأكيد 

سيكون هناك بطئ شديد فى بداية تشغيلها..

ومرفق المشروع كامل عثرت عليه الآن لآنه كان موجود عندى من سنين.

 

كود :

Public Class Form1
   Dim Num As Integer
   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       Label1.Location = New Point(Label1.Location.X - 1, Label1.Location.Y)
       If Label1.Location.X < -Label1.Width Then
           Label1.Location = New Point(Me.Width, Label1.Location.Y)
       End If
   End Sub