Виконано

Randomizing A Recordset In VB6

I have an application written in VB6 that basically is a multiple choice test generator using an Access 2.0 database file. I want the user to be able to select the number of questions to answer and then have the software display the questions in random order. I wrote the same application in VB3 and it works great, but it does not work correctly in VB6. In VB6 the code below randomizes the questions, but it always generates the same ramdom order, instead of truly randomizing the order. What I need is someone to modify the code I have listed below so that it works correctly with VB6, as it did with VB3. Here is the code. Dim TestNum As String TestNum = InputBox("Enter Number Of Questions You Would Like Included From This Chapter.", "Create Random Test From ") If TestNum = "" Then Exit Sub End If If TestNum = "0" Then Exit Sub End If Call Randomize [url removed, login to view] = "SELECT Top " & TestNum & " * FROM table1 where chapter='" & [url removed, login to view] & "' ORDER BY Rnd(id);" [url removed, login to view] End If As I said, in VB3 it worked flawlessly, but in VB6 is as if the Ramdomize statement is not working.

## Deliverables

I just need the modified code, so that when executed it will come back with a truly randomized order, not the same random order each time the program is run.

## Platform

As I said this is written in VB6, so it should work with Windows 95, 98, ME, 2000, XP.

Навички: Техніка, Microsoft Access, MySQL, PHP, Архітектура ПЗ, Тестування ПЗ, Visual Basic

Деталі: random recordset vb6, vb6 test questions, vb6 0, test code generator, ramdomize, in vb6.0, c test generator, and in vb6, vb6, randomized, multiple choice database questions, access multiple choice test, access multiple choice questions, visual basic multiple choice, access 2003 test questions, application written visual basic, recordset, access multiple choice, random number program code visual basic, vb6 create code

Про роботодавця:
( 2 відгуки(-ів) ) United States

ID Проекту: #2896064

Доручено:

deanconsulting

See private message.

$7 USD за 14 дні(-в)
(50 відгуків(-и))
4.6

6 фрілансерів(-и) у середньому готові виконати цю роботу за $17

jeivw

See private message.

$17 USD за 14 дні(-в)
(131 відгуків(и))
7.6
creativexso

See private message.

$41.65 USD за 14 дні(-в)
(81 відгуків(и))
5.9
appdevservice

See private message.

$3.4 USD за 14 дні(-в)
(90 відгуків(и))
5.6
dillonagoma

See private message.

$8.5 USD за 14 дні(-в)
(5 відгуків(и))
1.3
vw631999vw

See private message.

$25.5 USD за 14 дні(-в)
(2 відгуків(и))
0.7