простой счетчик для отслеживания формы использования?

Question

Я хотел бы знать, как я могу прочитать число из текстового файла, затем умножить это число на единицу и записать это обратно в исходный текстовый файл, я пытаюсь создать счетчик, чтобы отслеживать, сколько раз мойформы выполнены.Затем эта информация будет использоваться для определения успеха моих приложений в нашей компании.

Answer 1

Вы можете использовать это:

Private Sub Increment()
    Dim Path_To_File As String = "Path to the file"
    Try
        Dim Counter As Integer = CInt(My.Computer.FileSystem.ReadAllText(Path_To_File))
        My.Computer.FileSystem.WriteAllText(Path_To_File, (Counter + 1).ToString(), False)
    Catch Ex As Exception ' Modifiy to catch specific errors if you want
        MessageBox.Show("An error occured: " & Ex.ToString())
    End Try
End Sub