在PB中如何将读取的txt文件显示在listbox控件中？
展开全部
//您好，给你个例子
//读取d:\temp.txt 加载到listbox:lb_1
integer li_FileNum
string ls_Emp_Input
long ll_re
li_FileNum = FileOpen("d:\temp.txt", linemode!, Read! , LockWrite!, Replace!)
ll_re = FileRead(li_FileNum, ls_Emp_Input)
do while ll_re <> -100
lb_1.additem(ls_Emp_Input+string(ll_re))
ll_re = FileRead(li_FileNum, ls_Emp_Input)
loop
FileClose(li_FileNum)
//读取d:\temp.txt 加载到listbox:lb_1
integer li_FileNum
string ls_Emp_Input
long ll_re
li_FileNum = FileOpen("d:\temp.txt", linemode!, Read! , LockWrite!, Replace!)
ll_re = FileRead(li_FileNum, ls_Emp_Input)
do while ll_re <> -100
lb_1.additem(ls_Emp_Input+string(ll_re))
ll_re = FileRead(li_FileNum, ls_Emp_Input)
loop
FileClose(li_FileNum)
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
