PixelSearch on VisuanBasic 6.0 or 2010

[tellme]

Func 1()
    $example = PixelSearch(548,450, 548,450, 0x5A3C32)
    If IsArray($example) = True Then
        Send("Hello")
    EndIf
EndFunc

----------------------------------------

This is the true function for autoit but when comes VisualBasic 6 or 2010;

Dim autoit As New AutoItX3Lib.AutoItX3

'autoit.PixelSerch(nLeft As Long, nTop As Long, nRight As Long, nBottom As Long, nCol As Long, [nVar As Long], [nStep As Long = 1])

'in VisuaiBasic PixelSearch need to be like that, if i write like autoit:

---------------------------------------

autoit.PixelSerch(548,450, 548,450, 0x5A3C32)

'The color always wrong. İf anyone can help about that, I would be grateful... Thanks for all and sorry for my english.

[JohnOne]

Show all your code, including how you test it.

[tellme]

Dim autoit As New AutoItX3Lib.AutoItX3
Dim x As Integer

Private Sub Check1_Click()
If Check1.Value = 1 Then
x = autoit.PixelSearch(548,450,548,450,0x5A3C32)
autoit.Run (notepad.exe)
autoit.Sleep (1000)
autoit.Send ("hello")
End If
End Sub

--------------------

i dont know even this script is true on VisualBasic, but this is what i want to do and red place is wrong, the error is " Compile error: Expected: list sperator or ) "

[JohnOne]

What about the color, where does it say it's wrong?

[tellme]

Syntax error from " x = autoit.PixelSearch(548,450,548,450,0x5A3C32) " this line. Probably color is wrong, my opinion vb is not supporting this color and i tryed to write color like HEX: VB,RGB, i dont know it was true or not but just tryed. Thaks a lot for trying to help.

Edited December 19, 2013 by tellme

[tellme]

Dim autoit As New AutoItX3Lib.AutoItX3
Dim x As Variant


Private Sub Check1_Click()
If Check1.Value = 1 Then
x = autoit.PixelSearch(100, 588, 100, 588, &H0)

If IsArray (x) = True Then
autoit.Run ("notepad.exe")
autoit.Sleep (1000)
autoit.Send ("hello")
End If

End If
End Sub

İ Solved it. Dim x need to be variant and color need to be write with " &H " sign. Thanks for all.


 

Edited December 19, 2013 by tellme