| Quoting Post
|
|
 | Archived Topic: It will not be bumped to the top of the forum. |
|
|
| Topic vb6 run time error 13 |
| Membername |
Not a member? Sign Up Free (takes 20 seconds) |
| Password |
Forgotten your password? |
| Post
|
Font: Size: Color:
FAQ Keyword Search:
|
|
| Post Options |
|
| Favorites Manager |
Notify me of new replies to this topic by email
Notify me of new replies to this topic by private message
|
| Original Post
|
|
|
Link01 |
Posted at 1:52 am on Feb. 9, 2007 |
| | Code: | | Open "games.csv" For Input As #1 totvalue = 0 While Not EOF(1)
totvalue = totvalue + cost
Input #1, Console, Game, price, Age, Genre, cost, Condition, quantity
lstGame.AddItem Console & Game & price & Age & Genre & cost & Condition & quantity
Console(x) = Console(x) + " "
Console(x) = Left(Console(x), 19)
Game(x) = Left(Game(x) + " ", 16)
price(x) = Left(price(x) + " ", 14)
Age(x) = Left(Age(x) + " ", 16)
Genre(x) = Left(Genre(x) + " ", 17)
cost(x) = Left(cost(x) + " ", 14)
price(x) = Left(price(x) + " ", 14)
quantity(x)=left (quantity(x) " ",3)
Wend |
I keep getting runtime error 13. I have done a similar program before. So i baes it on that it won't work help. |
|
697 users online 
223577 members 
You have 1 new message.
