This page is going to show you a very simple and easy way to be able to pass an array of controls to a function or subroutine.
|
1 2 3 4 5 6 7 |
Sub ClearTextBoxControlArray(TextBoxArray As Variant) Dim i As Integer: For i = TextBoxArray.lbound To TextBoxArray.ubound 'assuming you want to clear all the textboxes in the array TextBoxArray(i).Text = "" Next i End Sub |
To use:
lets say you have an array
Here is a simple sub routine that makes it easy to center any on object or control to another.
The object you want to center is [objToCenter]. The object you want to center [objToCenter
One of the problems with visual basic is the ability to gracefully pause the code for one reason or another. Doevents is pretty awful in that it does very little to tame the processor and
Avoid Split() Coding: Use Splits Class to Avoid Tedious Split() Function Coding.
The Split() function is something that has to be used over and over again. The split function allows you to
This is a very short and very effective code that allows you to use a Vertical scrollbar in conjunction with a control container so the scrollbar scrolls the contents of the container.
As an
bConfirm Coded – YesNo Confirm Msgbox code .
This code presents a Yes No message box and returns true if the user presses YES.
|
1 2 3 4 5 6 7 8 9 |
Dim iyn As Integer iyn = MsgBox(sMsg, vbYesNo) If iyn = vbYes Then bYes = True End If End Function |
Split Function Code – basic code to perform and process the results of Split() function.
|
1 2 3 4 5 6 7 8 9 10 11 |
Dim sParts() As String sParts = Split(sList, ##) Dim iUpp As Integer, i As Integer iUpp = UBound(sParts) For i = 0 To iUpp '### code Next i |