带坐标的语句(vb)

时间:2013-04-16 00:20:04

标签: vb.net visual-studio-2010 integer point

我有这段代码,if carloc = (250,524)部分有错误。代码是检查汽车(图片框)是否在某处,然后在推动'A'时将ti移动到其他地方。这是代码:

Public Class Form1
Dim carloc As Point
Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
     Select e.KeyCode
        Case Keys.A
            If carloc = (250,524) then
                carloc = New Point(285, 524)
                car.Location = carloc
            End If

    End Select
End Sub

结束班

1 个答案:

答案 0 :(得分:2)

您需要单独检查坐标:

If carloc.X = 250 AndAlso carloc.Y = 524 Then
    carloc = New Point(285, 524)
    ' ....

如果你正在处理一个值类型(Structure),在这种情况下,或者类型实现IEquatable(Of T),你也可以写:

If carloc = New Point(250, 524) Then
    carloc = New Point(285, 524)
    ' ....

在这种情况下 ,但不是任何类型的一般规则。