473,324 Members | 1,856 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,324 software developers and data experts.

Im making a speed test program

84
Hi there:

Im making a speedtest project. for example: I had two options: the 1min and 2min in the combo box. I had two listbox. The first listbox, I had a text that I ahb deen encode. Then the 2nd listbox, there you will be type the words that had been written in the 1st listbox. If I will select the 1minute, then the stop will appear so that you cannot be able to type and the time was already finsihed.

For example I am the instructor. Then I will have a test to an encoder. I will tell him/her to encode the text written in the 1stlistbox. If I choose the 2minute, when he/she was still encoding and the time waas already finished. The timer will be stop and he cannot be able to type becazuse the time was ended.

This is a simple speed test.

Can you arrange my code. Just only the 1minute and 2minute code.

Private Sub Combo1_Change()
List2.Clear
If Combo1.ListIndex = 0 Then
List2.AddItem "Present and surrender the coupon at mercury drug stores and avail of discount of partcipating products."
Else
List2.AddItem "aicel"
End If
List2.AddItem "maricel"
End Sub

Private Sub Combo1_Click()
List2.Clear
If Combo1.ListIndex = 0 Then
List2.AddItem "Present and surrender the coupon at mercury drug stores and avail of discount of partcipating products."
Else
List2.AddItem "aicel"
End If
List2.AddItem "maricel"
End Sub

Private Sub Combo2_Click()
If Combo2.ListIndex = 1 Then
Timer1.Interval = 60000
If Combo2.ListIndex = 2 Then
Timer1.Interval = 120000
End If
End Sub

Private Sub Combo2_Click()
If Combo2.ListIndex = 0 Then
Timer1.Interval = 60000
Else
Timer1.Interval = 120000
End If
End Sub

Private Sub Timer1_Timer()
Form2.Show
End Sub
Apr 23 '08 #1
2 1410
what exactly are you askin? and you could program it differently with the timers.
Apr 23 '08 #2
I Can't get ur code
Why is Private Sub Combo2_Click() given twice
Apr 23 '08 #3

Sign in to post your reply or Sign up for a free account.

Similar topics

2
by: Dr. Peer Griebel | last post by:
Hi, I have a class with some properties. I would like to verify that only valid values are assigned to the properties using assert. Therefore I code setters and getters and use property() to...
6
by: J. Campbell | last post by:
Hi everyone. I'm sure that this is common knowledge for many/most here. However, it was rather illuminating for me (someone learning c++) and I thought it might be helpful for someone else. I'm...
30
by: Mike Cox | last post by:
Hi. I recently ran a benchmark against two simple programs, one written in Java and the other in C++. The both accomplish the same thing, outputting "Hello World" on my screen. The C++ program...
15
by: TJ Walls | last post by:
Hello All, I am baffled ... I am trying to improve the speed of a program that I have written that performs random access within a file. It relies heavily on fseek and is very slow. To test, I...
4
by: hamil | last post by:
I wrote a VB.net "echo" program using the Tcp client/listener class to determine how fast the transactions would occur. I got a speed of about 160 echoes per second. A friend did the same test...
11
by: Sezai YILMAZ | last post by:
Hello I need high throughput while inserting into PostgreSQL. Because of that I did some PostgreSQL insert performance tests. ------------------------------------------------------------ --...
8
by: mast2as | last post by:
I am sure this topic has been discussed a thousand times and I read a few things about it today on the net. I also want to say I am trying to start a polemic here, I am just curious and willint to...
2
by: tavspamnofwd | last post by:
Referred here from the tutor list. ---------- Forwarded message ---------- From: Evert Rol Hi Tom, Ok, I wasn't on the list last year, but I was a few days ago, so persistence pays off;...
0
by: ryjfgjl | last post by:
ExcelToDatabase: batch import excel into database automatically...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: Vimpel783 | last post by:
Hello! Guys, I found this code on the Internet, but I need to modify it a little. It works well, the problem is this: Data is sent from only one cell, in this case B5, but it is necessary that data...
0
by: jfyes | last post by:
As a hardware engineer, after seeing that CEIWEI recently released a new tool for Modbus RTU Over TCP/UDP filtering and monitoring, I actively went to its official website to take a look. It turned...
0
by: ArrayDB | last post by:
The error message I've encountered is; ERROR:root:Error generating model response: exception: access violation writing 0x0000000000005140, which seems to be indicative of an access violation...
1
by: PapaRatzi | last post by:
Hello, I am teaching myself MS Access forms design and Visual Basic. I've created a table to capture a list of Top 30 singles and forms to capture new entries. The final step is a form (unbound)...
1
by: Defcon1945 | last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
0
by: af34tf | last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you
0
by: Faith0G | last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.