Question

我是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

Answer 1

您不能在类级别拥有任意代码段。 Wrap = Chr(13) & Chr(10)是一段任意代码。

如果要为变量赋值，请使用初始值设定项：

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

更好的是，使用ControlChars.CrLf这是预定义的常量。

Answer 2

因为你把代码放在函数之外，所以这里只允许声明。

Btw，Chr（13）＆amp; Chr（10）可以通过一个非常好的版本来关联：vbCrLf 它是一个常数，所以你不需要声明它，它也完全一样......

如何在VB中正确声明？

2 个答案: