Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. Crazier

    Numbers in sequence

    This is what I have please let me know if I am on the right track CLS DIM total(1 TO 5000) firstNumber = 1 lastNumber = 2 FOR Sequence = 1 TO 4999 FOR lastSequence = 1 TO 5000 total = firstNumber + lastNumber IF total + lastNumber <> 10000 THEN lastNumber = lastNumber...
  2. Crazier

    Numbers in sequence

    The starting number is supposed to be determined by the computer in the program. And yes it has to be exactly 10000. The actual question is &quot;Write a program that will output the first integer and last integer for each and every series of positive, consecutive integers whose sum is equal to...
  3. Crazier

    Guessing Game

    I have written this code for a guessing game but it doesn't clear the message box to allow for a new guess. Any suggestions would be appreciated. Dim intIndex As Integer Dim intGuess As Integer Dim intIndexCount As Integer intIndexCount = 1 intGuess = txtGuess Do While intGuess <>...
  4. Crazier

    Numbers in sequence

    I need to write a program that adds numbers in sequence that add up to 10000. My problem is that I don't know how many numbers it has. I have been racking my brains trying to figure out how to do this. I figured a For,Next with a Do while loop in the for next but how do I write these numbers...
  5. Crazier

    Randomizing strings

    Oh right. Thank you so much and please excuse my ignorance. thanks again.
  6. Crazier

    Randomizing strings

    Do you know how to do it with strings. I need responses to pop up at random instead of numberic values. Thanks for your help
  7. Crazier

    Do while, If, select case

    Yes I did try it first and I was having problems with my program, so I wanted to make sure that you could do the three things together. I try to work out my problems first before I get help and that was all I needed at the time and I thank you for your response.
  8. Crazier

    Randomizing strings

    I can't seem to get this program to work I am not too familiar with randomizing with strings. I have done it several times with numbers. How can I make this work. Dim Answers$ (1 to 8) RANDOMIZE -TIMER CLS OPEN &quot;reply.txt&quot; FOR OUTPUT AS #1 WRITE #1 Yes WRITE #1 seldom WRITE #1...
  9. Crazier

    Do while, If, select case

    that doesn't work
  10. Crazier

    Do while, If, select case

    can you use a do while then an if and a select case in one loop?

Part and Inventory Search

Back
Top