Vb6 turn off screenupdating
Status Bar = Format(counter, "0,000,000") Next n Next m Next l Next k Next j Next i Application.
Status Bar = False End Sub (Please note that because I cut and pasted here, all the lines that were indented showed up on a straight left indent.
If you will like to see the code for the combination, let me know, and as soon as I receive it tomorrow, I will copy it and paste for your information. Kenny i do my best to test code works before i post it, but sometimes am unable to do so for some reason, and usually say so if this is the case.
Note code snippets posted are just that and do not include error handling that is required in real world applications, but avoid On Error Resume Next Thanks Pete for pointing me to your thread. I prefer your idea of generating 6 number combinations, each with a sum within a certain range (in this case 160 – 175).
I read through the posts in the 5 threads I found in the VB6 forum and they didn’t quite meet my needs in terms of the first part – the generation of the combinations.
If you remember the title of your thread and let me know, I will be glad to search for it.
He told me that he might have a code - written for him by an old friend programmer - that would help me with the first part – i.e.
1) Firstly I have 30 non-consecutive numbers, and I need a code that will generate all possible 6-number combinations out of the 30 numbers.