Ako som Presuňte Z textové pole do stromu

? Presunutie z " textové pole " do " TreeView " kontrolou vo vašom jazyku Visual Basic.NET aplikácií možno ľahko vykonať pomocou niekoľkých myši vlastnosti udalosti . Môžete použiť " MouseDown " udalosť sledovať , kedy užívateľ klikol na kontrolu " textové pole " . Použite " MouseMove " udalosť spustenie kódu , ak používateľ pohybuje myšou cez ku kontrole " TreeView " . Použite " DragEnter " a " dragdrop " udalosti v ovládacom prvku TreeView " " zistiť , kedy myš vstúpi a klesne informácie . Veci , ktoré budete potrebovať v Microsoft Visual Studio
Zobraziť ďalšie inštrukcie Cestuj 1

Spustite program Microsoft Visual Studio , kliknite na tlačidlo " Nový projekt " v ľavej časti okna obrazovky počítača , a rozšíriť " Visual Basic " pod " Nainštalované šablóny . " Kliknite na " Windows " a double - kliknite na " Windows Forms aplikácie " od centra v dialógovom okne vytvoriť nový projekt .
2

Double - kliknite na " TreeView " pridať nový ovládací prvok stromové zobrazenie na formuláre . Double - kliknite na " textové pole " pridať nové textové pole do formulára .
3

Pravým tlačidlom myši na textové pole a potom kliknite na tlačidlo " Vlastnosti " zobrazíte okno vlastností . Kliknite na ikonu " Udalosti " , ktorý sa podobá osvetlenie štrajk , a dvakrát kliknite vedľa " mouseDown " vytvoriť novú udalosť .
4

Pridajte nasledujúci kód pod " Public Class Form1 " vytvoriť globálna premenná :

Súkromná mouseDown As Boolean = False
5

vnútri " mouseDown " udalosť pridajte nasledujúci riadok kódu nastaviť globálne premennú " To je pravda : " klipart

mouseDown = TRUE
6

skopírujte a vložte nasledujúci kód na vytvorenie " MouseMove " udalosti pre ovládací prvok textové pole , a začať ťahanie :

Private Sub TextBox1_MouseMove ( byval odosielateľ As Object , byval e ako System.Windows.Forms.MouseEventArgs ) Kľuky TextBox1.MouseMove

Ak mouseDown Potom

TextBox1.DoDragDrop ( TextBox1.Text , DragDropEffects.Copy )

End If

mouseDown = false

End Sub
7

skopírujte a vložte nasledujúci kód na vytvorenie " DragDrop " udalosti pre ovládací prvok TreeView " " , a pridať nový uzol pomocou informácií v textovej pole :

Private Sub TreeView1_DragDrop ( byVal sender As Object , byval e ako System.Windows.Forms.DragEventArgs ) Kľuky TreeView1.DragDrop

Me.TreeView1.Nodes.Add ( e.Data.GetData ( DataFormats.Text ) )

End Sub
8

skopírujte a vložte nasledujúci kód na vytvorenie " DragEnter " akcie pre " TreeView " kontrola ukázať " DragDropEffects : " klipart

Private Sub TreeView1_DragEnter ( byval odosielateľa Ako System.Object , Bývalá e As System.Windows.Forms.DragEventArgs ) Kľuky TreeView1.DragEnter klipart

Ak je ( e.Data.GetDataPresent ( DataFormats.Text ) ) Potom

e.Effect = DragDropEffects.Copy

Else

e.Effect = DragDropEffects.None

End If

End Sub
9

Stlačte " F5 " na spustenie programu , a zadajte text do textového poľa . Kliknite na textové pole , a ťahajte myšou cez ku kontrole " TreeView " , zatiaľ čo držíte tlačidlo myši . Tlačidlo myši uvoľnite pridať nový uzol .

• Predchádzajúca strana: ? Aké sú logické výrazy 
• Ďalšia strana: Ako čítať súbor do Listbox