переменная в файле .txt

Есть несколько способов сделать это. Например, вы можете сохранить значение в текстовом файле, двоичном файле, XML-файле, ini-файле или файле конфигурации. Самый простой вариант - использовать встроенный фреймворк настроек. Для этого перейдите в свойства своего проекта и щелкните вкладку настроек. Создайте новую настройку под названием «DZien» и установите ее тип на целое число. Затем в коде вы можете получить доступ и установить значение в файле конфигурации следующим образом:

Dim dzein As Integer = My.Settings.Dzien.ToString()  ' Read value from config file
My.Settings.Dzien = 5  ' Write new value to config file

Скорее, если вы хотите сохранить одно число в текстовом файле, вы можете сделать это следующим образом:

Dim dzein As Integer = Integer.Parse(File.ReadAllText("C:\Plik.txt")) '  Read value from text file
File.WriteAllText("C:\Plik.txt", dzein.ToString())

В вашем случае, когда вы пишете приложение для Windows Phone, вы можете сделать это так:

Partial Public Class_1
    Inherits PhoneApplicationPage
    Private dzien As Integer

    Public Sub New()
        InitializeComponent()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles Button2.Click
        Try
            dzien = CInt(IsolatedStorageSettings.ApplicationSettings("dzien"))
        Catch ex As KeyNotFoundException
            dzien = 0
        End Try
        If dzien = 0 Then
            ' ...
        End If
    End Sub

    Private Sub Class_1_Unloaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Unloaded
        IsolatedStorageSettings.ApplicationSettings("dzien") = dzien
    End Sub
End Class