Question

vb应为语句结束 急求~~~

Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
Dim TextBox1.Text As Integer
TextBox1.Text = Val(TextBox1.Text) + 1
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TextBox1.Text = 0
End Sub
End Class

Answer 1

针对楼上[lclhunter]的回答：

第一，题主应该是少贴了最上面的 Public Class Form1 之类的代码。

第二，Dim TextBox1.Text As Integer 确实不是正常人能理解的。

Dim xxx As yyy 这句是声明一个 yyy 类型的名字为 xxx 的变量。

而 TextBox1.Text 是一个属性值，是不能作为变量名的。

 

【附：VB变量命名规则】

1、只能由字母、数字和下划线组成。
2、第一个字符必须是英文字母，最后一个字符可以是类型说明符。
3、总字数不能超过255个（超过255了只能识别前255位）。
4、不能是保留字（所谓保留字就是C语言的关键字，VB 本身自已已经使用了，比如 Sub、If、End等等）。
5、不区分大小写。

 

TextBox1.Text 违反了第1、4两条规则。

 

同意[dwlad]的观点，从代码上看根本不理解题主的意图是啥。

 

猜测一下有可能是：

    Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
        Dim a As Integer = Val(TextBox1.Text)
        TextBox1.Text = a + 1
    End Sub

 

最后告诉题主，这是 VB.NET 不是 VB。

追问

改了还是不可以 我的意图就是你点击窗口点了几次TEXTBOX里都会显示出来

追答

题主直接说问题不就好了嘛！

 

Public Class Form1
    Dim a As Integer
    Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
        a = a + 1
        TextBox1.Text = a
    End Sub
End Class

追问

但是仍然不会显示呗点击了几次啊

我刚刚学VB.NET......什么都不会。。。。

追答

追问

OK~~谢谢你~~~

Answer 2

这段码子里面下面两行的出现已经不是我们这个次元能理解的了
Dim TextBox1.Text As Integer

End Class

追问

最后的结尾不是END CLASS？ 书本上也是这样的 而且不是我打的 END CLASS 是自带的好吗

至于Dim TextBox1.Text As Integer 是我从其他知道上看来的 我写不来只能学着写

我要是写的全对也就不用来提问了 是吧

Answer 3

看不懂具体要求是什么？