Как в basic в цикле создать PictureBox'ы?

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by namak, 21 Nov 2011.

  1. namak

    namak Member

    Joined:
    29 Jan 2009
    Messages:
    66
    Likes Received:
    8
    Reputations:
    0
    необходимо в цикле создать 100 штук PictureBox, и дальше в них вставить картинки, так же в цикле.
     
  2. 2r0k

    2r0k New Member

    Joined:
    29 Nov 2011
    Messages:
    1
    Likes Received:
    0
    Reputations:
    0
    добавляешь пикчер бокс на формую. далее в свойствах устанавливаешь значение index равное 0, тем самым сздаешь массив пикчер боксов с именами picturebox(x) где х - индекс массива!
     
  3. Feonor

    Feonor Elder - Старейшина

    Joined:
    23 Jul 2008
    Messages:
    128
    Likes Received:
    52
    Reputations:
    19
    PHP:
    PictureBox[] pb = new PictureBox[100];
                for (
    int i 0pb.Lengthi++)
                {
                    
    pb[i] = new System.Windows.Forms.PictureBox();
                    
    pb[i].Location = new System.Drawing.Point(10150 30);
                    
    pb[i].Name "PictureBox" i.ToString();
                    
    pb[i].Size = new System.Drawing.Size(7523); //размеры
                    
    pb[i].TabIndex i;
                    
    pb[i].Image // тут картинка 
                    
    Controls.Add(pb[i]);
                }
     
  4. namak

    namak Member

    Joined:
    29 Jan 2009
    Messages:
    66
    Likes Received:
    8
    Reputations:
    0
    что то не нашел я свойств index. Visual Basic 2010


    php это круто, но это не бейсик и там такое не прокатавыет, все писал в синтаксисе бейсиковском.
     
  5. Feonor

    Feonor Elder - Старейшина

    Joined:
    23 Jul 2008
    Messages:
    128
    Likes Received:
    52
    Reputations:
    19
    Это не PHP это c#.net очень схож по синтаксису с vb.net. Опять из за отсутствия тегов на форуме, возникают сложности. (если не затруднит, зайди в тему поддержи предложение по поводу тегов, может администрация внимание обратит наконец)

    Если по сабжу, то сейчас попробую на vb переписать синтаксис более менее прост..
     
    1 person likes this.
  6. Feonor

    Feonor Elder - Старейшина

    Joined:
    23 Jul 2008
    Messages:
    128
    Likes Received:
    52
    Reputations:
    19
    Вот VB.NET
    PHP:
        Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
            Dim pb
    (100) As PictureBox
            Dim i 
    As Integer

            
    While 100
                pb
    (i) = New PictureBox() 
                
    pb(i).Name "PictureBox" i.ToString()
                
    pb(i).Location = New System.Drawing.Point(10150 30)
                
    pb(i).Size = New System.Drawing.Size(7523'размеры 
                pb(i).TabIndex = i
                pb(i).Image = Image '
    тут картинка  
                Controls
    .Add(pb(i))
                
    1
            End 
    While
        
    End Sub
     
    #6 Feonor, 30 Nov 2011
    Last edited: 1 Dec 2011
  7. namak

    namak Member

    Joined:
    29 Jan 2009
    Messages:
    66
    Likes Received:
    8
    Reputations:
    0
    [​IMG]
    вот такой косяк вылазит у меня(
     
  8. Feonor

    Feonor Elder - Старейшина

    Joined:
    23 Jul 2008
    Messages:
    128
    Likes Received:
    52
    Reputations:
    19
    Отредактировал пост #6. Пропустил создание объекта..