Return True or False

Question

0.00/5 (No votes)

See more:

What am I missing here to return a value of True or False

VB

If UBound(robots) >= 0 Then
    For i = 0 To UBound(robots)
      if (robots(i).enabled = true) then
        robots(i) = True
        robots(i).Click
      End If
    next
     robots(i) = True
      End If
End Function

Posted 5-Nov-15 0:33am

RedJuice

Updated 5-Nov-15 0:45am

Suvendu Shekhar Giri

v2

Add a Solution

Comments

[no name] 5-Nov-15 6:59am

Can you post your full function with function name?

RedJuice 6-Nov-15 1:09am

Here is the full function

Function FindEnabledButtons
Dim p, w, robots, i, PropArray, ValuesArray

' Obtain the Notepad process
Set p = Sys.Process("Ribbon")

' Specify the sought-for property names
PropArray = Array("Value", "Value")

' Specify the sought-for property values
ValuesArray = Array("Sent", Found,)

' Find all enabled buttons in the Replace dialog
robots = p.FindAllChildren(PropArray, ValuesArray,1000)

If UBound(robots) >= 0 Then
For i = 0 To UBound(robots)
if (robots(i).enabled = true) then
' robots(i) = True
robots(i).Click
End If
next

' robots(i) = True
End If
End Function

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

OriginalGriff · Answer 1 · 2015-11-05T01:04:00

A Return statement? Compilable code?

The indexer you are using after the Next is bad - it's outside the range of values for the array by definition.

Assuming that you want to return true if any were found, and false if none were found, then try this:

VB

Dim result As Boolean = False
If UBound(robots) >= 0 Then
    For i = 0 To UBound(robots)
      If (robots(i).enabled = true) Then
        result = True
        robots(i).Click
      End If
    Next
End If
Return result