|
■No85118 (しろ さん) に返信 > 釦を押すごとにカウント
private int counter; private void Form1_Load(object sender, EventArgs e) { counter = 0; label1.Text = counter.ToString("N0"); } private void button1_Click(object sender, EventArgs e) { label1.Text = (++counter).ToString("N0"); }
Public Class Form1 Private counter As Integer Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load counter = 0 Label1.Text = counter.ToString("N0") End Sub Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click counter += 1 Label1.Text = counter.ToString("N0") End Sub End Class
> Label1.Text = Label1.Text + 1
VB のそれは、Option Strict On ではエラーになるのご注意ください。
Option Strict Off の場合に限りコンパイルが通りますが、その場合は Label1.Text = CStr(CDbl(Label1.Text) + 1.0) に相当するコードとして処理されることになります。
|