[Mohamed20]

اريد اضافة عدد من الصور الى جميع image control الي عندي مثلآ عندي
4 image controle اسمهم Image Image2 Image3 Image4 و عندي 10 صور اريد اضافة اول 4 صور الي4 control image و اضافة button عند الضغط عليى ينتقل الي الاربع صور الاخري

مثلآ في Windows Form ممكن نستخدم

كود :

               Dim ImageControl = Me.Controls.OfType(Of Image)().Where(Function(x) x.Name.Equals(Image))

لاكن كيف في wpf

[بدري]

تعديل للكود
Dim ImageControl = CType(Me.Content.Children, UIElementCollection).OfType(Of Image)().ToArray


ولوضع صوره بالكود
Image1.Source = New BitmapImage(New Uri("images\img_5.png", UriKind.Relative))


ولو فرضنا ان الصور اسمءها img_1 وimg_2 وهكذا مرقمه فيصبح الكود في الالبوتون لعرض الصور بعد الرقم 4
Dim ImageControl = CType(Me.Content.Children, UIElementCollection).OfType(Of Image)().ToArray
For i = 0 To ImageControl.Count - 1
    ImageControl(i).Source = New BitmapImage(New Uri("images\img_" & ((i+1) + 4) & ".png", UriKind.Relative))
Next

[Mohamed20]

(10-04-19, 04:32 PM)بدري كتب : تعديل للكود
Dim ImageControl = CType(Me.Content.Children, UIElementCollection).OfType(Of Image)().ToArray


ولوضع صوره بالكود
Image1.Source = New BitmapImage(New Uri("images\img_5.png", UriKind.Relative))


ولو فرضنا ان الصور اسمءها img_1 وimg_2 وهكذا مرقمه فيصبح الكود في الالبوتون لعرض الصور بعد الرقم 4
Dim ImageControl = CType(Me.Content.Children, UIElementCollection).OfType(Of Image)().ToArray
For i = 0 To ImageControl.Count - 1
    ImageControl(i).Source = New BitmapImage(New Uri("images\img_" & ((i+1) + 4) & ".png", UriKind.Relative))
Next

شكرآ اخي