Question

vb.net点击按钮一次，数值加一

非常简单的一个问题：我就是想实现一个页面里，有一个button，一个label，label的text等于一个数值，每点击一次按钮，这个数值就加一，比如，点第一次的时候，页面显示：这是第一次点击，再点一次，就显示第二次点击……感觉非常简单的问题，咋就实现不了呢，真是老了 - -!

我这样写的按钮click事件：
dim a as integer
a=a+1
lebel1.text=cstr(a)

这样不行，然后我加个循环：
dim i,a as integer
for i=1 to 100
a=a+1
next
label1.text=cstr(a)

还是不行，点击一次直接显示到了100

我把a定义为全局变量也不行
我在click事件里识别页面也不行:加上if page.IsPostBack

唉，实在没辙了，跟我说下吧

Answer 1

dim a as integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

a = a + 1
Label1.Text = a.ToString
End Sub

追问

跟我写的代码完全一样，这样是不行的，不会累加

追答

但在我这里是可以的啊！
dim a as integer
不能放在按钮单击事件里面。

追问

还是不行，放在声明里也不行，你要不直接把所有代码给我看下，.aspx的、.aspx.vb的都给我看下，奇了个怪了，我感觉没啥问题的啊

追答

你是网页里的啊？
我是在窗体里调试的。

追问

嗯，我用vs2005做asp.net网站

追答

是服务器控件吧！
如label:

追问

是的

追答

我来做个试一试。
----------------------------------------------------------------------------------------
确实和你的结果一样。但是可以用Session保存，可以满足你的要求：
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
Dim a As Integer
a = Val(Session("A")) + 1
Session("A") = a
Label1.Text = Session("A").ToString
End Sub

追问

呵呵，哥们，在你回答之前，我就用session试过了，不行，按照你这个，好像也不行，但是我觉得原因不在于语句了，可能是其他地方的原因，我感觉session是肯定可以的，我再看看吧，非常感谢！