listbox max value and save button question

[tehProxy]

Hi there. I managed to create a button which shows the total number of the items of a listbox.

Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
        MessageBox.Show(listBox.Items.Count.ToString())
End Sub

However the "listBox.Items.Count.ToString() doesn't work outside of the button. The questions are:

1. How to make a label which will autoupdate the total number of the items of a listbox every 1 minute? I am guessing a timer will be needed and something like

        Dim counter As Integer = 0

        lblTotal.Text = ""
        For counter = 0 To listCustomers.Items.Count - 1
        lblTotal.Text &= listCustomers.Items.Count.MaxValue
        'Hm this must be converted to integer ^^ ?
        Next

2. How to create a save button which will save the items of a listbox without sql stuff.

Thanks in advance.