Question

我已将变量声明为整数。我希望它从1开始，不超过6.有一种简单的方法吗？

  Dim IntNum as Interger = 1-6

我试过了，但它没有用

Answer 1

根据您的评论，您似乎想要限制单个Integer的下限和上限 - 也就是说，您希望确保单个值不小于X并且不大于Y。在这种情况下，只需使用If语句，以避免在值超出范围时更改值。

Dim IntNum as Interger = 1

...

' Inside the button's click handler: only increment IntNum
' if it's less than 6.
If IntNum < 6 Then
    IntNum = IntNum + 1
End If

...

请注意，我没有添加代码来检查IntNum是否小于1 - 如果您只是将1添加到IntNum，则无法成为1小于IntNum，所以没有必要检查。如果您稍后添加按钮以递减1，则必须在该按钮的处理程序中进行类似的检查，以确保不会低于{{1}}。

您的问题非常模糊，所以我不确定这是否是您正在寻找的答案。

Answer 2

编辑*

Option Strict On
Option Explicit On
Option Infer Off
Public Class Form1
    Dim counter As Integer = 0
    Dim counterMax As Integer = 6
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If Not counter = counterMax Then counter += 1
        MsgBox(counter)
    End Sub
End Class

在VB中为整数分配多个值

2 个答案: