Wrote a repeat click button of a program, but there is one problem is that often run after a period of time there will be a real time error 91, a time is not sure, is the following error,

CodePudding user response:

"91 error" is: the object variable or variables With block is not set
(directly after the proposal that error message content, not only said a error code, no one willing to recite all the meaning of the error code!)


You use the Timer control timing "click", should be related to refresh WebBrowser1 web content,

Try this:

 Dim objCMD As Object 

Set objCMD=WebBrowser1. Document. Getelem..... '(completion) 
If (Not objCMD Is Nothing) Then objCMD. Click 

CodePudding user response:

All commented On the Error Resume Next statement, in VB6 IDE,
The error and then click the debugging, the cursor will stop error in the statement,
Or
In doubt may have a logical error statements in advance to set breakpoints, run through the breakpoint interrupt,

At this point can be used in the immediate window
? The variable name
Or
? The function name () function parameter
Or
Process (parameters)
Auxiliary debugging,

CodePudding user response:

reference 1st floor Chen8013 response:

"91 error" is: the object variable or variables With block is not set
(directly after the proposal that error message content, not only said a error code, no one willing to recite all the meaning of the error code!)


You use the Timer control timing "click", should be related to refresh WebBrowser1 web content,

Try this:

 Dim objCMD As Object 

Set objCMD=WebBrowser1. Document. Getelem..... '(completion) 
If (Not objCMD Is Nothing) Then objCMD. Click 

thank you, give you trouble, after guidance has been solved,

CodePudding user response:

reference qq_31063919 reply: 3/f

Quote: refer to 1st floor Chen8013 response:

"91 error" is: the object variable or variables With block is not set
(directly after the proposal that error message content, not only said a error code, no one willing to recite all the meaning of the error code!)


You use the Timer control timing "click", should be related to refresh WebBrowser1 web content,

Try this:

 Dim objCMD As Object 

Set objCMD=WebBrowser1. Document. Getelem..... '(completion) 
If (Not objCMD Is Nothing) Then objCMD. Click 

thank you, give you trouble, after guidance has been solved,

Problem solved, "ah,