Io metterei il numero NON nelle Risorse, ma nelle Impostazioni (My.Settings) impostandolo come Integer. Nell' esempio ho chiamato il Setting "Numero"
codice:
Public Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
AcceptButton = Button1
TextBox1.Text = My.Settings.Numero.ToString
Dim data As DateTime = Today()
TextBox2.Text = data
End Sub
Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
Static Counter as Integer = My.Settings.Numero 'Inizializza Counter
PictureBox1.Image = My.Resources.BASE
If Not TextBox1.Text = "" Then
Counter +=1
TextBox1.Text = Counter.ToString
End If
TextBox8.ReadOnly = True
AcceptButton = Button1
TextBox4.Text = ""
TextBox6.Text = ""
TextBox8.Text = ""
TextBox7.Text = ""
Combo1.Text = ""
Combo2.Text = ""
TextBox4.Focus()
'qui dovrei aggiungere la stringa per salvare il numero
My.Settings.Numero = Counter
My.Settings.Save
End Sub
Dovrebbe fungere.....