[ابراهيم ايبو]

(29-03-20, 01:51 AM)351028 كتب :

PHP كود :

Public Class Form1

    Dim AA As Integer = 200
    Dim BB As Integer = 100

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim MyTrackBar As New TrackBar
        MyTrackBar.Dock = DockStyle.Bottom
        MyTrackBar.Minimum = 10
        MyTrackBar.Maximum = 190
        MyTrackBar.Value = 100
        AddHandler MyTrackBar.Scroll, AddressOf MyTrackBar_Scroll
        Me.Controls.Add(MyTrackBar)
        Me.Text = MyTrackBar.Value & "%"
    End Sub

    Private Sub MyTrackBar_Scroll(sender As Object, e As EventArgs)
        Panel1.Width = AA * (sender.Value / 100)
        Panel1.Height = BB * (sender.Value / 100)
        Me.Text = sender.Value & "%"
    End Sub

End Class 


اخي الكريم بارك الله فيك وجزاك الله كل الخير
بالنسبة للTrackBar ايضا محلولة وانا لاارغب بها كونها تأخذ حجما لانني ربما اضع عدد كبير من الـ NumericUpDown (برامج رسم)
انا وضعت المثال فقط من اجل المعادلة الرياضية التي من خلالها التكبير والتصغير ليستفيد منها اخوتنا في المنتدى 
اريد تحديدا NumericUpDown بسبب ان لي بها اغراض واستخدامات اخرى