Hi, FishVal, a very useful code, especially for making guided data entry (e.g. if control1.value is 2 then go to control5).
For the current task, to cycle through controls of subform and after last is attended (having been on focus) and "enter" ) trigger the "NEXT subform" procedure, I have found solution and implemented it into codes.
As I mentioned, unexpectedly the problem of focus emerged, which still...
FelixS
Last Activity: Aug 22 '09, 04:02 PM
Joined: Feb 9 '09
Location:
-
Solving the same problem I have encountered the following next one:
I can set focus using statement
Forms![F20]![FormSec].SetFocus
However, at each moment the name of the form opened (F20 in the example above) is stored in variable PubCurForm. But i have not found any reasonable way to use the above statement with variable in place of Form name.
Code like
Select PubCurForm
case...Leave a comment:
-
at the moment I have only tested part of code and general Idea.
It could be done using
Private Sub Form_Timer()
<procedure to run every ### milliseconds>
End Sub
Sub Form_Load()
Me.TimerInterva l = 1000
End Sub
and ActiveControl Property
Dim ctlCurrentContr ol As Control
Dim strControlName As String
Set ctlCurrentContr ol = Screen.ActiveCo ntrol...Leave a comment:
-
FelixS started a topic How to set focus to text box on subform if name of the control if public var.in Visual BasicHow to set focus to text box on subform if name of the control if public var.
Situation: A form is opened containing subform, contents of subform is changing dynamically on form Open. I would like to have the first text box of subform under focus. Before opening, the name of the control is assigned to pubFirstControl variable.
So far I could not find the way to solve this problem.
Any hints? -
I have found how to do this.Leave a comment:
-
1. 1 means 1 next, 2 means previous.
2. The main question is how to do this without class module for subform. In other words, how to fish up the situation of focus on last control in the subform, from the main form. Once more, it is very straightforward to handle this event being in subform and using class module for this subform. However, the solution, being searched is how to do this without class modules for subforms.Leave a comment:
-
It is very simple there, in class module
Private Sub NextForm_Click( )
Call NextPriv(Me.Nam e, 1)
End Sub
NextPriv is determining which section is to include in subform.
For example, there is main form F02 and section forms F02001 - F02005
Next for F02005 is saving records and close F02. For all other the next Form is
determined as nextFrm and changes settings by statement...Leave a comment:
-
Detecting a Sub-Form event from the Main Form 2
I have developed a way to enter the data from long medical document, using structure: Mainform (subform1,... subfromN). This is reflecting the logical model of data: Document(sectio n1,section2,... sectionN).
The MainForm has only one control, subfrom, in Detail which displays consecutively section1,...sec tionN. This is done by buttons "Next" and "Previous" located in MainForm's Footer.
I was... -
Dear Fish, Your last recommendation has solved the problem!.
Thank you very much. Now it works as expected.Leave a comment:
-
1. Status for now: Problem is not solved.
2. Suspicion that installation of SAS principally causes this problem has not confirmed, since on the other PC in the unit SAS and MS access are working well together, the module in quesion has been copied there and tested.
3. I can't catch the step-by-step actions to test the last suggestion:
<<Or better search registry for "Microsoft Scripting Runtime" or try to...Leave a comment:
-
scrrun.dll: Search returns no results on my PC C:\Leave a comment:
-
No. As I said already, I was registering msadox.dll, didn't help.Leave a comment:
-
no - no -no. I am exercising with *.mdb original file. Ones more, when copying it to another machine, where SAS is not installed, I can observe it working as expected.Leave a comment:
-
In my version of MS Visual Basic, when I go to Tools->References I see the Box with names of libraries and box for ticking before each name. No "MISSING" words. In the list of available references now there are 5 ticked ones, The others are empty. First of all, I think, this was also before it happens. Besides, I have no idea, what another library I needLeave a comment:
-
Well, How I know which library is not connected (referenced). Usually there are only 5-6 out of many available.In fact, I have found already that error occurs while creating new folder by
Set fs = CreateObject("S cripting.FileSy stemObject")
...
fs.CreateFolder (path)
...Leave a comment:
-
Automation Error -- Library not registered.
I have running one application (.mde file) of MS access 2003, quite a long time on Windows XP, - it was working well. Recently on my PC was installed SAS, after that while running my .mde application I am getting message
"Automation Error -- Library not registered".
I have found in WEB one recommendation - register module msadox.dll.
Regsvr32.exe "C:\Program Files\Common Files\System\ad o\msadox.dll"...
No activity results to display
Leave a comment: