Option Strict On Option Explicit On Public Class Form1 Dim i As Integer = 100 Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load REFNOTextBox.Text = CStr(i) End Sub Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click i = i + 1 REFNOTextBox.Text = CStr(i) End Sub End Class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)