Search:

The limit applies/applied to code modules e.g. frm, bas, cls.

I'm not sure but I think this limit is a thing of the past. I know for a fact that it was a limit in old forms of basic and have...

It depends on the usb device being used.

For example it could be.

A Printer
A Serial Port
A Flash Drive
An External Hard Drive
A Network adaptor
A Camera

I generally use the timer for the seed.

In VB6 and prior versions this was done by adding the line


Randomize Timer

prior to the rnd function. In gives pretty much the closest that you...

You don't need a loop for what you are trying to do, Instead you need a counter that retains its value.

Public Class Form1
Dim MyCounter as integer=0
Private Sub Button1_Click(ByVal sender As...

I was assuming that the file shad not been stored in thier own seperate directory and that there was path information in the vbp since you indicated that you had a problem before.

If the project...

First make sure that all of your project files are in thier own directory.

In this case create a directory named FRED for example. Do a save as on every file in the project and insure that they...

I had an oversight adding the last piece of code. It is cleanign up now but using more memory on mine that what you are seeing.

On my system it is running at 14,332K and going to 17,968 then back...

This is what I had on the last run


Public Class Form1
'Private Declare Function GetTickCount Lib "kernel32" () As Long

Private Sub Form1_Click(ByVal sender As Object, ByVal e As...

Oops my bad.

I missed removing one line and added the code after the new bitmap.


Me.BackgroundImage = New Bitmap(BmapBuffer)

c.Dispose()
If Not Me.BackgroundImage Is Nothing Then...

I added the declare to the form and put back the gettickcount but it errored on the t=gettickcount with the message make sure you are not dividing by 0. :confused:

That seemed to help, only adding 4 megs per click now was 7 before

I did not see a gettickcount in the help index either nor any include in the code so I do nto know but since it is not inside the loop I would not think it made a noticable difference in the...

Yes and yours from 279

One small change made to Gremmy's code which may or may not be having an effect. The GetTickCount was not recognized in the designer and I changed it to...

Running the same exes on the slower PC I get

VB6 563
VB2005 953
Faster PC runnign XP Pro SP3
Slower one running XP MCE SP2

Just tested on another computer. This time running the exe files without the designers loaded. Last tests were with both designers running during the test and in debug mode. I also did 2 builds of...

I'm not sure if I am using the right files or not but I am seeing a huge difference between VB6 and dot net on this pc.

VB6 Code running at an average of 300

Dot Net 2005 avg 2230

Both...

I was wanting to run some tests myself but can't seem to find the VB6 code that is being used. Could someone point me to it... please :rolleyes:

That is because the step is assigned at the top of the loop [on the first pass] and is not altered by the later value of B

If the code were a nested loop where the value of b changed in the...

Really? I didn't know that. Could be useful. :)

Doesn't dot net also have the ability to take advantage of the multi core processors? Would be interesting to see how much faster it goes when offloading some of the work to a second core or 3rd and...

One other thing. I am not aware of any benefit in trying to declare the variable in the same line of code as in for X as integer as opposed to simply using a dim statement prior to the line. Of...

Not using a for loop.. or at least not that I am aware of.

The real purpose of a for loop is to execute a block of code a specific number of times. If you want a block to execute until a...

Any For statement expects a next statement which will send the code back to the for statement and increment the for var. The default is +1 but this can be set using the step parameter.

For...

One way would be to create a variable for use as a flag then check the var in the routine you have above to see which box should be loaded. Since it seems that you are dealing with abjects on two...

You mean something like ?


For C=0 to A
Next