[RESOLVED] VB6, Cannot jump to x because is hidden

[luta]

Hi,

My first post, new to VB and to the forum.

I am working on a old vb application developed by someone else but I got to this error on a class module while trying to undertand and get a definition for this.

Cannot jump to 'pbDataImport' because is hidden.

DoEvents
    frmImport.pbDataImport.Value = 1000

Why is this? and what would the 'pbDataImport' used for. is set to different values at in different places.

Private Sub Form_Load()
On Error GoTo Err_Form_Load
Dim rcdReportDates As New ADODB.Recordset

    Call ClearMessages
    optNew.Value = True
    optRepeat.Value = Not optNew.Value
    pbDataImport.Min = 0
    pbDataImport.Max = 1000
    pbDataImport.Value = 0
    
    frmImport.Left = 50
    frmImport.Top = 50
    
    'Need to populate the Report Date DataCombo with values
    Connect
    Set rcdReportDates = svr_Query(cnCDior, "spReportDateGet")
    SwitchToClient rcdReportDates
    fPopulateDataCombo rcdReportDates, Me.cbointReportDateURN, "intReportDateURN", "txtReportDate"
    Disconnect
    
Exit_Form_Load:
    Exit Sub
    
Err_Form_Load:
    Resume Exit_Form_Load
End Sub

thanks
luta

[zeezee]

Welcome To the forum


Guessing from the name it could be a Progress Bar Control.
And these lines

pbDataImport.Min = 0
pbDataImport.Max = 1000
pbDataImport.Value = 0

makes it more prominent. But could be anything else. Try to get the definition of Min, Max or Value. You cant get the difintion of the ProgressBar but you can get the difnitions of its properties.

[RobDog888]

Yes, its a progressbar named pbDataImport residing on form frmImport.
If you go to the Object Browser you will be able to see all of its properties and mehtods etc. by searching for progressbar.

[luta]

thanks a lot for all your help
luta