Oppure

Loading
11/08/09 15:21
manvb.net
Esattamente:

MenuStrip1.Items.Add("testo elemento";)

e per sapere quando l'utente clicca su un elemento:

   Private Sub MenuStrip1_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MenuStrip1.ItemClicked
      Dim elemento As String = e.ClickedItem.Text
      'Con elemento ci fai quello che vuoi
    End Sub

Ultima modifica effettuata da manvb.net 11/08/09 15:22
aaa
11/08/09 15:32
maxas
    Function ReadBookmarks(ByVal PathFile As String) As List(Of String)
        Dim R As New Io.streamreader(pathfile)
        Dim BookmarkList As New list(Of String)
        Do Until r.endofstream
            bookmarklist.add(r.readline)
        Loop
        r.close()
        Return Bookmarklist
    End Function
    Private Sub GhToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GhToolStripMenuItem.Click
        Dim L As List(Of String) = ReadBookmarks("C:\Programmi\Preferiti\Preferiti.txt")
        For Each S As String In L
            ToolStripMenuItem.Items.Add(S)
        Next
    End Sub

dici cosi

non mi sono spiegato bene forse XD

Aggiungo il sito hai preferiti e vorrei che per ogni sito che aggiungo
sotto preferiti mi crear tipo menu ToolStripMenuItem
che quando ci clicco mi apre il sito se non mi sono spiegato bene dite ^^
aaa
11/08/09 18:52
manvb.net
Postato originariamente da maxas:

    Function ReadBookmarks(ByVal PathFile As String) As List(Of String)
        Dim R As New Io.streamreader(pathfile)
        Dim BookmarkList As New list(Of String)
        Do Until r.endofstream
            bookmarklist.add(r.readline)
        Loop
        r.close()
        Return Bookmarklist
    End Function
    Private Sub GhToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GhToolStripMenuItem.Click
        Dim L As List(Of String) = ReadBookmarks("C:\Programmi\Preferiti\Preferiti.txt")
        For Each S As String In L
            ToolStripMenuItem.Items.Add(S)
        Next
    End Sub

dici cosi

non mi sono spiegato bene forse XD

Aggiungo il sito hai preferiti e vorrei che per ogni sito che aggiungo
sotto preferiti mi crear tipo menu ToolStripMenuItem
che quando ci clicco mi apre il sito se non mi sono spiegato bene dite ^^


No, non dico così, ma così:

    Sub ReadBookmarks(ByVal PathFile As String)
        Dim R As New Io.streamreader(pathfile)
        Do Until r.endofstream
            GhToolStripMenuItem.Items.add(r.readline)
        Loop
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'Carica tutti gli elementi nel Menu
        ReadBookmarks("C:\Programmi\Preferiti\Preferiti.txt")
    End sub

    Private Sub GhToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GhToolStripMenuItem.Click
        WebBrowser1.Navigate(e.ClickedItem.Text)
    End Sub


Ti posso dare un consiglio: studia di più.
aaa
11/08/09 23:20
manvb.net
Comunque, cerca di non utilizzare percorsi assoluti(c:\ecc...), metti che sul pc di un utente non c'è l'unità c:?
Ti conviene fare cosi:

ReadBookmarks(Application.StartupPath & "\Preferiti.txt")'In questo modo il file viene creato nella stessa cartella dell'exe


Quindi sostituisci tutti i "C:\Programmi\Preferiti\Preferiti.txt" nel tuo programma con:

Application.StartupPath & "\Preferiti.txt"
Ultima modifica effettuata da manvb.net 11/08/09 23:23
aaa
12/08/09 7:25
maxas
cosi dici
Application.StartupPath & "Preferiti.txt\Preferiti.txt"
aaa
12/08/09 10:01
ruggy94
Postato originariamente da maxas:

cosi dici
Application.StartupPath & "Preferiti.txt\Preferiti.txt"

No.
Application.StartupPath & "\Preferiti.txt"
Che indica il file Preferiti.txt all'interno della cartella del tuo programma.
Ultima modifica effettuata da ruggy94 12/08/09 10:02
aaa
12/08/09 18:13
maxas
capito
ma i preferiti me li fa vedere solo al riavvio del browser..
aaa
12/08/09 18:34
ruggy94
Postato originariamente da maxas:

capito
ma i preferiti me li fa vedere solo al riavvio del browser..

Beh, è perchè ReadBookmarks è messa nel Form_Load...ma puoi metterla dove vuoi.
aaa