تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
for loop تكرار الادوات
#1
مرحبا


انا لدي مشروع ويحتوي على picturbox وweb browser


فكيف نكرر ال piturbox على عدد for loop

انا كتبت الكود التالي


     Dim p As PictureBox
        Dim ii As Integer
        For ii = 1 To 5

            p = ii

        Next


ولم تتكرر ادات الصور
الرد
تم الشكر بواسطة: سعود
#2
السلام عليكم اخي الكريم
هذا مثال على اضافة صور عدد 12 في الاداة FlowLayoutPanel1
اما بالنسبة للـ WebBrowser فأنا لم اتعامل مع هذه الاداة ولا اعرف خصائصها
لذلك استميحك عذرا لعل احد اعضاء المنتدى الكرام يفيدك يذلك
دمت بخير


الملفات المرفقة
.rar   AddPicture1.rar (الحجم : 101.05 ك ب / التحميلات : 8)
الرد
#3
اعجبني المثالSmile
واضفت حدث Pic.click
PHP كود :
       AddHandler Pic.ClickAddressOf Pic_Click
Private Sub Pic_Click(ByVal sender As System.ObjectByVal e As System.EventArgs)
        LoadImage(sender)
    End Sub

 Private 
Function IsValidImage(ByVal picpath As String) As Boolean
        
Try
            Dim img As Image Image.FromFile(picpath)
            Return True
        
Catch ex As Exception
            
Return False
        End 
Try
    End Function

    Private Sub LoadImage(ByRef pic As PictureBox)
        If IsNothing(picThen Exit Sub
        Dim o 
As New OpenFileDialog
        
If o.ShowDialog Windows.Forms.DialogResult.OK Then
            
If IsValidImage(o.FileNameThen
                pic
.Image Image.FromFile(o.FileName)
            End If
        End If
    End Sub



and this after edit
Private Function addPictur() As PictureBox
        Dim Pic 
As PictureBox = New PictureBox()
        Pic.BorderStyle BorderStyle.Fixed3D
        Pic
.BackColor Color.Coral
        Pic
.Width 100
        Pic
.Height 100
        Pic
.Margin = New Padding(5)
        Pic.SizeMode PictureBoxSizeMode.StretchImage
        AddHandler Pic
.ClickAddressOf Pic_Click' هذي اضافة الحدث المكتوب
        Return Pic
    End Function 
الرد
#4
اخي سعود مبدع ومتألق 
وكعادتك لابد من ان تترك بصماتك الرائعة المفيدة
بارك الله فيك وجزاك خير جزاء
الرد
تم الشكر بواسطة: سعود , سعود , asemshahen5 , ابو روضة , الحازمي


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اذا امكن احدكم من مساعدتي اريد مثل الصوره لمنع تكرار الاسم mostafa12 2 146 15-10-19, 05:20 AM
آخر رد: mostafa12
  [VB.NET] الارقام العشوائية بدون تكرار 3boody 0 41 12-10-19, 08:55 PM
آخر رد: 3boody
  منع تكرار البيانات المدخلة على قاعدة البيانات الرائد 11 383 01-09-19, 02:46 PM
آخر رد: الرائد
  محتاج كود او مثال لبرنامج تكرار السطر Mohamed Magdy 7 246 16-08-19, 01:14 AM
آخر رد: Mohamed Magdy
Question كيفية التخلص من تكرار تخزين البيانات الرائد 13 599 14-08-19, 12:25 PM
آخر رد: الرائد
  التحكم في الادوات في الكرستال ريبورت المتألق9 2 215 15-07-19, 02:07 PM
آخر رد: ابراهيم ايبو
  التايمر وال for loop dasktop 10 441 11-07-19, 08:07 AM
آخر رد: dasktop
  هل هناك كود ممكن عن طريقه معرفة كل الادوات و المكتبات المرتبطة بملف تنفيذي asemshahen5 5 375 21-06-19, 09:22 PM
آخر رد: asemshahen5
  [VB.NET] استعلام للبحث عن عدد تكرار كلمة في بيانات حقل واحد في سجل واحد tarek 0 239 24-03-19, 09:09 PM
آخر رد: tarek
  طريقة تكرار الامر تلقائيا | حل مشكلة script error في webbrowser عند فتح صفحة ما soloxocf1 6 660 18-03-19, 09:16 AM
آخر رد: 5000

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم