Backup and recover physical and cloud-based servers and workstations, as well as endpoint devices that belong to remote users. Avoid downtime and data loss quickly and easily for Windows-based physical or public cloud-based workloads!
Public Function SelectAll(lst As ListBox) As Boolean ' Comments: ' Params : lst ' Returns : Boolean ' Modified: On Error GoTo PROC_ERR Dim lngRow As Long If lst.MultiSelect Then For lngRow = 0 To lst.ListCount - 1 lst.Selected(lngRow) = True Next SelectAll = True End If PROC_EXIT: Exit Function PROC_ERR: MsgBox Err.Number & vbTab & Err.Description, vbCritical, Me.Name & ".SelectAll" Resume PROC_EXIT End Function
Call AddToWhere(Me.lstYear.Column(0), "lstYear", strYearCriteria, intArgCount)
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.