(*´д`*)ｱﾊｧ… VB初心者質問スレ Part21
■ このスレッドは過去ログ倉庫に格納されています
0457デフォルトの名無しさん
NGNGコードの書き方がおかしいと思いますが
下記のコードで出来ました。
Private Sub Command1_Click()
Dim val1 As Integer
Dim val2 As Integer
Dim val3 As Integer
val1 = txt1.Text
val2 = txt2.Text
Static x As Integer
val3 = x
lbl1.Caption = Format(val1 + val2)
x = lbl1.Caption
lbl1.Caption = Format(Val(lbl1.Caption) + val3)
End Sub
■ このスレッドは過去ログ倉庫に格納されています