With the new era of mobile computing, smartphones and tablets, wireless communications and cloud services, the USDA sought to take advantage of a mobilized workforce and the blurring lines between personal and corporate computing resources.
Private Sub cmdAsset_Add_Click() Dim controlArray() As Variant: controlArray = FormControls() Dim ctl As Variant For Each ctl In controlArray MsgBox Controls(ctl).Name Next End Sub Private Function FormControls() As Variant() FormControls = Array("txtAssetType", "Forms!frmMain.txtInnoScan") '"txtInnoScan", End Function
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
13 Experts available now in Live!