Salve a tutti,
vorrei un consiglio utile per risolvere il mio problema.
Il mio problema consiste nel salvare le pagine all'interno di un tabcontrol. Nel mio programma ho messo un button per aggiungere una pagina:
codice:
'ottiene il numero delle pagine
Dim a As Integer = TabControl1.TabPages.Count
Dim new_tabpages As New TabPage
'imposta il testo della TabPage
new_tabpages.Text = "'Senza nome" & a + 1
Dim new_richtextbox As New RichTextBox
'imposta i bordi, Fill dichiara che tutti i bordi devono
'essere ancorati al contenitore
new_richtextbox.Dock = DockStyle.Fill
new_richtextbox.Font = New Font("Microsoft Sans Serif", 12)
new_richtextbox.Size = New Size(592, 265)
new_richtextbox.Name = a + 1
'aggiunge la RichTextBox alla TabPage
new_tabpages.Controls.Add(new_richtextbox)
'aggiunge la TabPage alla TabControl1
TabControl1.TabPages.Add(new_tabpages)
End Sub
Private Sub ColoreCarattereToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ColoreCarattereToolStripMenuItem.Click
If TabControl1.SelectedIndex = 0 Then
If RichTextBox1.SelectedText = "" Then
ColorDialog1.ShowDialog()
RichTextBox1.ForeColor = ColorDialog1.Color
Else
ColorDialog1.ShowDialog()
RichTextBox1.SelectionColor = ColorDialog1.Color
End If
ElseIf TabControl1.SelectedIndex = 1 Then
End If
Ok, come faccio, però, a salvare il file? Nel salvataggio vorrei che mi salvasse le pagine del tabcontrol, il testo delle pagine del tabcontrol e il testo di ogni richtextbox all'interno di ogni pagina.
Infine, i comandi da utilizzare per l'apertura. Devo utilizzare i savefiledialog e gli openfiledialog oppure altri comandi? Spero di essere stato chiaro.
Grazie in anticipo!