2012-07-01 78 views
0

我是VB新手。我讀了一本書,並按照其代碼如何在VB中正確聲明?

Public Class Form1 

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
    Dim Wrap As String 
    Wrap = Chr(13) & Chr(10) 
    Dim i As Integer 
    For i = 1 To 4 
     PictureBox1.Image = System.Drawing.Image.FromFile("C:\face0" & i & ".ico") 
     MsgBox("Click for next face") 
    Next 
End Sub 
End Class 

它工作。但是,我嘗試調整代碼以使Wrap成爲可用於整個form1的變量。我做了以下,但它不起作用。爲什麼?

Public Class Form1 

    Dim Wrap As String 
    Wrap = Chr(13) & Chr(10) 

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 

    Dim i As Integer 
    For i = 1 To 4 
     PictureBox1.Image = System.Drawing.Image.FromFile("C:\face0" & i & ".ico") 
     MsgBox("Click for next face") 
    Next 
End Sub 
End Class 

回答

1

在課堂上你不能有任意的代碼段。 Wrap = Chr(13) & Chr(10)是一段任意代碼。

如果你想賦值給變量,用一個初始化這樣做:

Dim Wrap As String = Chr(13) & Chr(10) 

更重要的是,使用ControlChars.CrLf這是同一個預定義的常量。

0

因爲你把代碼放在函數之外,所以這裏只允許聲明。

順便說一句,CHR(13)& CHR(10)可以通過一個非常美好版本relaced:vbCrLf 這是一個恆定的,所以你不要需要聲明它,它做的都是同樣...