-
Nov 10th, 2000, 01:55 AM
#1
Thread Starter
New Member
i need to get a text file to text box.
i have:
Open cname & ".txt" For Input As #2
sho.Text = #2
Close #2
-
Nov 10th, 2000, 02:36 AM
#2
Code:
Open cname & ".txt" For Input As #1
sho.Text = Input$(LOF(1), 1)
Close #1
-
Nov 10th, 2000, 06:38 AM
#3
transcendental analytic
Don't use Input$ function for that kind of operation, open in Binary and use Get:
Code:
Dim buffer as string
Open file for binary as 1
buffer=space(lof(1))
Get#1,,buffer
close 1
sho.text = buffer
Use
writing software in C++ is like driving rivets into steel beam with a toothpick.
writing haskell makes your life easier:
reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|