因为大家热心帮助我,我才想要把自己的最高分给大家,请问...

stephenz2 2000-07-23 09:30:00
我在用VB时遇到了一个问题:
我想要把一个文本文件装入一个textbox,并且想要知道实际显示在这个textbox中的文本(假设textbox中未装完整个文本)实际占了原来文本文件的几个字数,我该怎么做?
谢谢!
...全文
131 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
stephenz2 2000-07-24
  • 打赏
  • 举报
回复
chengwenlong你好!
你能不能说得详细一点?
因为我是一只菜鸟,不懂selstart,selbeging等函数操作
谢谢!
stephenz2
chenwenlong 2000-07-24
  • 打赏
  • 举报
回复
1 首先得到行数,列字符数。
2 在用SELSTART,SELBEGING等函数操作。
stephenz2 2000-07-24
  • 打赏
  • 举报
回复
补充:

对不起,可能我的表达有误,
我想说的是,一个textbox装入了整个文本文件,而这个textbox没有滚动条,我想知道的是这个textbox显示出的字符占整个文本文件的几个字数?
谢谢!
stephenz2
UserReg 2000-07-24
  • 打赏
  • 举报
回复
没有是么好的方法,不过我可以给你提供两个参考思路:
思路1,自己做一个textbox控件,提供你要的借口。
思路2,如下算出字数
首先通过得到两行之间的间距为a,每一行的高度为b=text1.fontsize,这样可以得到
textbox总共可以显示的行数=text1.height/(a+b)
接下来得到两个子之间的间距为c,每一行可以显示的字数为=text.width/(c+b)
如此就得到在textbox显示区域可以显示的字数为=行数*每行字数
这样,你就可以根据你的文件来写一个文件,确定每一行显示到哪一个字符。
每一个字符应该在第几页的第几行的,第几列显示。如此每一个字符都能准确地地位一个
三位坐标。同时每一页也能对应到文件中的那个字符。
当然同时要考虑一些细节问题:
如:遇到回车换行则后面的都要转到下一行,
twips和pixel坐标的转换等。
yk_001 2000-07-23
  • 打赏
  • 举报
回复
len(text1.text) /filelen(文件名) 就可以了
peng_hui 2000-07-23
  • 打赏
  • 举报
回复
一个textbox中能容纳的字数不是固定的吗?难道你程序中的textbox会忽大忽小?

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧