[ digikv @ 31.07.2004. 10:45 ] @
Kako da dodam neku kontolu na primer txtBox na Formu u toku rada ?
I kako da skrolujem txtBox-ove na formi ako je broj txtBox dosta veliki pa ne moze da stane na formu pa bih morao da skrolujem ?
[ Ero S Ovoga Sveta @ 01.08.2004. 03:33 ] @
U General forme deklarisi promjenjivu NoTextBox tipa Integer



Primjer 1.

Na formu postavi jedan textbox i Index mu postavi 0

Code:
NoTextBox = NoTextBox + 1

Load Text1(NoTextBox)

With Text1(NoTextBox)
  .Left = Text1.Item(NoTextBox - 1).Left
  .Top = Text1.Item(NoTextBox - 1).Top + _
  Text1.Item(NoTextBox - 1).Height + 100
  .Height = Text1.Item(NoTextBox - 1).Height
  .Width = Text1.Item(NoTextBox - 1).Width
  .Text = .Name
  
  .Visible = True


Primjer 2.

Code:
Dim nCtrl As Control
Dim sFofmName As String
Dim sTextName As String

NoTextBox = NoTextBox + 1
sTextName = "Text" & NoTextBox

Set nCtrl = Me.Controls.Add("VB.TextBox", sTextName, Me)



        With nCtrl
          .Left = 200
          .Top = (NoTextBox * 700) + 200
          .Height = 500
          .Width = 1400
          .Text = .Name
          
          .Visible = True
        End With
Set nCtrl = Nothing
[ digikv @ 01.08.2004. 06:16 ] @
Hvala na primerima. Ali ostaje i ono kako da skrolujem te text boxove na formi ako ih ima na primer 100, a necu da koristim grid
[ mladenovicz @ 08.08.2004. 11:27 ] @
Stavi ih u picture box. PicBox moze da bude container kontrolama.