Question

vb中如何让text1中显示一个变量a,a的初始值为100，然后按一下command text就变成98，再按一下是96

依次类推。求完整的说明

Answer 1

Dim a As Integer

Private Sub Form_Load()
a = 100 '初始值100
Text1.Text = a
End Sub

Private Sub Command1_Click()
a = a - 2 '每按一次减2
Text1.Text = a
End Sub

追问

Dim a As Integer
这句要写在哪里

Answer 2

private sub command1_click()
static a as integer
if a=0 then a=100
text1.text=a
a=a-2
end sub

Answer 3

你的意思就是让控件text1显示100。你在text1的属性text设为100.
在command代码编辑里编写：text1.text=text1.text-2 即可。

追问

不行啊

Answer 4

网海1书生 | 十二级 正解