battle programmers alliance

battle programminga forum for elite programmerswith extreme will powerto sharpen theire skills
 
HomeCalendarFAQSearchMemberlistUsergroupsRegisterLog in
Search
 
 

Display results as :
 
Rechercher Advanced Search
Latest topics
» android mobile app dev APK
Yesterday at 10:01 pm by Moti Barski

» battle programmers alliance new features :
Yesterday at 5:25 pm by Admin

» urban prepper grimoire
Sat Aug 18, 2018 1:03 pm by Moti Barski

» broadcast receiver dead
Sat Aug 04, 2018 7:51 am by Moti Barski

» programming tool : find dif between 2 texts
Tue Jul 31, 2018 6:32 am by Moti Barski

» java class that filter numbers out of a string
Mon Jul 30, 2018 11:20 am by Moti Barski

» android studio execises
Mon Jul 09, 2018 1:43 pm by Moti Barski

» problem with firebase authentication
Thu Jun 28, 2018 9:52 am by Moti Barski

» text art canvas
Wed Jun 20, 2018 8:55 pm by Moti Barski

August 2018
SunMonTueWedThuFriSat
   1234
567891011
12131415161718
19202122232425
262728293031 
CalendarCalendar
Social bookmarking
Social bookmarking digg  Social bookmarking delicious  Social bookmarking reddit  Social bookmarking stumbleupon  Social bookmarking slashdot  Social bookmarking yahoo  Social bookmarking google  Social bookmarking blogmarks  Social bookmarking live      

Bookmark and share the address of battle programmers alliance on your social bookmarking website
Share | 
 

 tree view control

Go down 
AuthorMessage
kurosen

avatar

Posts : 62
Join date : 2012-04-17

PostSubject: tree view control   Tue Dec 09, 2014 8:09 pm

create a tree view at runtime :

Code:
Public Class Form1
  Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
     'create a new TreeView
     Dim TreeView1 As TreeView
     TreeView1 = New TreeView()
     TreeView1.Location = New Point(10, 10)
     TreeView1.Size = New Size(160, 160)
     Me.Controls.Add(TreeView1)
     TreeView1.Nodes.Clear()
     'Creating the root node
     Dim root = New TreeNode("Application")
     TreeView1.Nodes.Add(root)
     TreeView1.Nodes(0).Nodes.Add(New TreeNode("Project 1"))
     'Creating child nodes under the first child
     For loopindex As Integer = 1 To 4
         TreeView1.Nodes(0).Nodes(0).Nodes.Add(New  _
             TreeNode("Sub Project" & Str(loopindex)))
     Next loopindex
     ' creating child nodes under the root
     TreeView1.Nodes(0).Nodes.Add(New TreeNode("Project 6"))
     'creating child nodes under the created child node
     For loopindex As Integer = 1 To 3
         TreeView1.Nodes(0).Nodes(1).Nodes.Add(New  _
             TreeNode("Project File" & Str(loopindex)))
     Next loopindex
  End Sub
End Class
I can feel it moti
the power of these var
the possibilities
its not easy to aquire the jutsu you were talking about
but its just too cool to let go
Twisted Evil
Back to top Go down
View user profile
kurosen

avatar

Posts : 62
Join date : 2012-04-17

PostSubject: perfecting D jutsu platform   Fri Jan 23, 2015 7:03 pm

Code:
Public Class Form1
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
       
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'create a new TreeView
        Dim TreeView1 As TreeView
        TreeView1 = New TreeView()
        TreeView1.Location = New Point(10, 10)
        TreeView1.Size = New Size(300, 300)
        Me.Controls.Add(TreeView1)
        TreeView1.Nodes.Clear()
        'Creating the root node
        Dim root = New TreeNode("hadoken")
        TreeView1.Nodes.Add(root)
        TreeView1.Nodes(0).Nodes.Add(New TreeNode("Project 1"))
        'Creating child nodes under the first child
        For loopindex As Integer = 1 To 4
            TreeView1.Nodes(0).Nodes(0).Nodes.Add(New  _
                TreeNode("Sub Project" & Str(loopindex)))
        Next loopindex
        ' creating child nodes under the root
        TreeView1.Nodes(0).Nodes.Add(New TreeNode("Project 6"))
        'creating child nodes under the created child node
        For loopindex As Integer = 1 To 3
            TreeView1.Nodes(0).Nodes(1).Nodes.Add(New  _
                TreeNode("Project File" & Str(loopindex)))
        Next loopindex
        TreeView1.Nodes(0).Nodes(0).Nodes.Insert(2, New TreeNode("hya"))
        ' Set the caption bar text of the form. 
        Me.Text = "tutorialspoint.com"
    End Sub
End Class
layered : TreeView1.Nodes(0).Nodes(0).Nodes.Insert(2, New TreeNode("hya"))

vared : # regex of ""
* layer was added at index above end sub
Back to top Go down
View user profile
 
tree view control
Back to top 
Page 1 of 1
 Similar topics
-
» Tree View: Expanding a node by searching for element by text using xpath
» Change The Control Panel to Classic View in Windows 7
» Security Alert with yes, no, view certificate button
» Selenium Remote Control misbehaves
» How to disable Remote Control page popping up?

Permissions in this forum:You cannot reply to topics in this forum
battle programmers alliance :: battle programming alliance :: battle programming-
Jump to: