2012-03-22 117 views
1
Module Module1 
    Public cccounter = 9 
End Module 

Public Class frmNim 

    Private Sub btnSelect_Click(sender As System.Object, e As System.EventArgs) Handles btnSelect.Click 
     MsgBox(cccounter) 
    End Sub 

End Class 

爲什麼這會產生錯誤?我找不出任何其他方式通過點擊按鈕來使一個簡單的計數器上升。這令我沮喪不已。有什麼東西很簡單,我明顯失蹤?爲什麼這個簡單的消息框不起作用?

+0

你正在得到什麼類型的錯誤?不,對錯誤發表評論。 – 2012-03-22 06:23:34

+0

在VB.NET項目中禁用「Option Strict」和「Option Explicit」也是很好的做法。這樣,你將不得不指定類型(好東西),例如Public cccounter Integer = 9. – 2012-03-22 06:36:14

回答

5

使用MessageBox.Show(ccounter)

我認爲你正在使用的舊VB6編碼。這在VB.NET中不起作用。

MSDN

如果您需要櫃檯上去,你就需要一個額外的代碼行:

ccounter += 1 

編輯:

錯過了模塊中的聲明(VB.Net有點生鏽現在一天)

你應該宣佈ccounter作爲@Eddie Paz提到的變量) 我做了一個快速sampl e每按一下按鈕就會增加1。

Module Module1 
    Public ccounter As Integer = 9 
End Module 


Public Class Form1 

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
     ccounter += 1 
     MessageBox.Show(ccounter) 
    End Sub 
End Class 
+1

這沒有什麼區別 – 2012-03-22 06:24:11

+0

另外,我在.Net 4.0 Framework上使用Microsoft Visual Studio 2010。這是VB.net – 2012-03-22 06:26:23

+0

我在VS2010/4中編寫了一個快速的VB.Net應用程序,並且我的代碼工作正常。消息框顯示cccounter爲10.你獲得了什麼值? – 2012-03-22 06:34:32

0

您聲明cccounter是Module1中的變體。您應該指定類型,如整數。在btnSelect:

cccounter = cccounter + 1 
MessageBox.Show(cccounter) 

我認爲MsgBox仍然在VB.Net工作,但我不記得。我現在嘗試使用.NET方式。

+0

不知道MsgBox已被棄用。但是,是的,它仍然在VB.net中工作 – 2012-03-22 06:27:39

+0

此外,這不起作用。你沒有真正提出任何建議,你只是告訴我指定我嘗試過的類型。 – 2012-03-22 06:30:52

+0

對不起,這個錯誤實際上是由與我發佈的代碼完全無關的事情造成的。你無法回答我的問題。調試沒有指向那個...... – 2012-03-22 06:33:11

相關問題