说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

快速读取 TextBox 第 N 行的资料 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
快速读取 TextBox 第 N 行的资料 -VB资料
TextBox 是以 vbCr+vbLf 为分行符号, 如果我们要逐一读取 TextBox 每一行,
无非是寻找 vbCr+vbLf 的所在位置, 然后取出每一行的字串, 不过这个方法真
的不快,而且如果我们要读取第 N 行资料, 还是要从第 1、2、┅N-1 行逐一读
起, 实在麻烦。
还好 Windows API 提供有读取 TextBox 第 N 行的功能, 细节如下:

1. API 的声明:

Const EM_GETLINE = &HC4
Const EM_LINELENGTH = &HC1
Const EM_LINEINDEX = &HBB

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (
ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As
Any) As Long
Private Declare Sub RtlMoveMemory Lib "KERNEL32" (lpvDest As Any,
lpvSource As Any, ByVal cbCopy As Long)

注:如果以上的声明放在「一般模块」底下, 应在 Const 之前加上 Public 保留
字, 并且将 Private 保留字去掉。

2. 程序范例:

Sub TB_GetLine(ByVal hWnd As Long, ByVal whichLine As Long, Line As
String)
Dim length As Long, bArr() As Byte, bArr2() As Byte, lc As Long

lc = SendMessage(hWnd, EM_LINEINDEX, whichLine, ByVal 0&)
length = SendMessage(hWnd, EM_LINELENGTH, lc, ByVal 0&)
If length > 0 Then
ReDim bArr(length + 1) As Byte, bArr2(length - 1) As Byte
Call RtlMoveMemory(bArr(0), length, 2)
Call SendMessage(hWnd, EM_GETLINE, whichLine, bArr(0))
Call RtlMoveMemory(bArr2(0), bArr(0), length)
Line = StrConv(bArr2, vbUnicode)
Else
Line = ""
End If
End Sub

' 假设要读取 Text1 第 5 行的资料
Dim S As String
Call TB_GetLine( Text1.hWnd, 5, S )
' 传回值 S 即等于到 5 行的资料
注:TextBox 的行次是从 0 起算。

Android开发经验谈之应用间数据共享 android_asset这个URL详细使用方法 Android 2.3系统自带高清UI图标下载 设置ScrollView滚动条的颜色 WakeLock使用方法示例代码 Concurrent并发库常见问题总结 Android数据库SQLite性能优化技巧 Android开发之Java设计模式基础篇 Android开发之Java设计模式入门篇 Android开发之Java设计模式 Android开发之Java并发包集合类性能分析 Android开发之Java集合类性能分析 Android开发之Java虚拟机原理和内存分配 Android开发之Java基础系列教程目录 Android Theme主题样式开发注意点 Android 3.0开发用的平板推荐 android.resource://这个Uri你知道吗 ADT插件的10.0.1必须要Eclipse 3.5才能升级 Android线程优先级设置方法 Android Zip文件解压缩代码 Android开发之设置断点单步调试 Android裁剪图片最简单方法 Android平台待开发软件列表 Android开发知识-3月13日总结 Android平板开发注意点 Android 3.0自带的天气预报例子代码 Loader和Fragment使用示例代码 LoaderManager - Android 3.0新特性 帮助ADT改进DDMS中的Logcat中文乱码问题 Fragment API将兼容Android 1.6到3.0 通过Linux Shell实现Android横竖屏切换 delphi7与delphi5的差别? 《雨季会再来》 SQL SERVER的同步问题 怎样在DLL中添加一个不可见部件??? 请帮忙给个思路(分再加) 关于WIN2K管理员密码 查找时,随便符合一个字段中的条件,是否可以用or ? 关于读取oracle中clob字段的中文信息的问题 如何让IE6不显示保存图片按钮? 時間比較問題 如何固定DBGridEh的列? 如何在vb.net里面使用资源文件 关于WIN2K管理员密码 在tomcat服务器上发布soap的问题,高分相赠 JSP在websphere4.0中的应用问题! 急,关于COM调用的问题 请问各位C#有DBChart控件吗????????? select的问题 有没有好一些的MP3播放器推荐 关于声音的问题…………等…… xml是不是马上必学的?????? 呜呼!我巍巍中华,铿锵汉字,终将进博物馆了吗? 创建虚拟目录,在另一计算机上的共享位置? 用javascript怎样remove掉数组中的一个元素???急 存储过程问题 java基础类 网络错误718,是什么问题呢?分不够可以再给,急呀!! 怎样加大数据库的连接时间,因为通过远程连接,所以想加大连接时间 紧急求救? 这样的弹性页面能实现吗? 100分求"公司网络管理办法" 寻开发公司 请帮我,关于从WIN2000到WIN98的问题(在线等) 关于firework的问题?急急急!!!!!!!!!!!! 用VC.net应该怎么调试.cpp文件 老有人反复发一些老帖子,早被别人转了几百遍了,烦啊! 展示 怎样删除页面布局表格 或 页面布局单元 各位大侠,外挂里的自动捡物是怎么实现的? 如何在运行中删除动态创建的 POPUPMENU 的某个菜单项呢? 安装包怎么做? 怎样将mysql数据库里某个字段的所有值绑定到form的<select>选项里。 我的com+组件两台机器间不能执行方法 怎样获得InputBox、InputQuery的值? 我用的光盘版的maya5.0,serial number不对啊?谁有可以用的啊? 请教:MPP文档是什么概念啊? 哪里有VF做的工资管理系统下载 怎样在一个中英文混合的字符串中添加回车键后而不出乱字符 救命啊!!!!! 关于ocx的问题 如何响应Esc键按下? You're a dead dog stupid kin中文什么意思 急配电子元件!电阻-N-公司里传真/扫描/复印一体机坏了,原因是应该用100V电源的直接插到了200V的电源插座上,东西是日本进口的.请电子行业朋友们告诉我哪里可以买到以下电子元件:电 我国有什么海洋的科研成果? 有什么部件能够将力矩电机的转动角限制住,不让其做圆周运动 会计中,如何更容易理解权责发生制与收付实现制的区别? 有关曝的成语,曝的意思必须是“晒” 三角形ABC的内切圆与三边的切点构成三角形EDF则三角形ABC的内心是EDF的外心,为什么 “肥田出瘪稻”请问在经济学中是什么现象啊? 生命教育要从小开始? 任意三角形ABC 的三个角的三等分线 交出的三角形 EFD 一定是等边三角形 新的生命从何时开始 水力学的三大方程是什么?最好把式子列出来 青蛙属于什么科? 蜘可以组哪些词? 第五签、中签丑宫:【刘晨遇仙】 求姻缘 此签何解第五签、中签丑宫:【刘晨遇仙】 一锥凿地要求泉,努力求之得最难;无意偶然遇知己,相逢携手上青天.诗意:此卦锥地求泉之象.凡事先难 青蛙属于哪个科? 蜘蛛的蜘可以组什么词 请大师帮忙解命 解姻缘 观音灵签 第五签、中签丑宫:【刘晨遇仙】我农历1982年(第一个4月)23日 子时出生,男性,命运,婚姻如何 这几年家里帮相了几个女孩子到交情没有多久都是人 若三角形ABC的三边长度之比为3比5比7,与它相似的三角形EFD最长边长为21,则其余两边之和为多少, PS中旋转并复制方式? 生命是什么? 生命为什么? 青蛙所属科类 在PS中怎样才能完成旋转复制 为什么人一出生就开始走向生命的尽头 【有图】求助2个简单的圆周运动问题1使小球在最高点释放,多大的速度能让小球紧贴圆面滑下?因为最低点向心加速度为0,所以我觉得无论速度多大都会在下降过程中抛出.2假设小球在图示位 在PS里要以中心旋转复制怎么做? 地球人都知道我爱上了你 用英语怎么说 青蛙是什么发育?变态还是不变态? 解签,求事业!一锥卓地要求泉,努力求之得最难;无意偶然遇知己,相逢携手上青天.欲望心事 西方可求曰:不如英动 立地可谋 生命的死亡就是开始之前的状态吗,为什么? 腰为10,底长为6的等腰三角形的内切圆在两腰上的切点间的距离为?要解题思路和过程~~~ 第五签,一锥卓地要求泉,努力求之得最难,无意偶然遇知己,相逢携手上青天,解欲望心事,西方可求 《地球人都知道我爱上了你》歌词 住房公积金贷款是怎样计算的 等腰三角形ABC的内切圆,切点分别为D E F,已知三角形ABC的两边长是4和6,求FC 一锥卓地要求泉,努力求之得最难.无意偶然遇知己,相遇携手上青天. 抵抗的近义词是什么 证明 等腰三角形的内切圆与底边的切点是底边的中点 凌晨3点,看到悬吊着的蜘蛛在头上,过了会又爬到身上,这是什么预兆啊?.. 抵挡的近义词是什么? 谁能给总结下 圆周运动,匀速圆周运动等运动的不同点我要考试了,匀速圆周运动这一部分还分不清, 夸同学作文好用什么四字词语 成语青梅竹马的由来 申请住房公积金贷款应具备什么条件 《过草地》张爱萍 这首诗的意思这首诗是有关于红军长征的诗,有谁知道这首诗的意思吗?我有急用! 抵挡的近义词 申请住房公积金贷款需要具备哪些条件 如何面对困难的诗歌《过草地》 抵挡和接到的近义词是什么? 怎么画旋转图形 底力9是啥意思?弹幕里的 抵抗、伤害、饶恕的近义词 公积金贷款的条件是什么? 海洋科研属于工业么 Unless you are dead虾米意思?RT 住房公积金贷款条件是什么? 力竭斯底是什么意思啊? 收音机拉线滑轮打滑 住房公积金贷款的条件我现在已经上缴3个月的住房公积金,因急需买房,已经向公司申请补缴满12个月的住房公积金,也就是补缴了9个月的,我想问一下这算不算连续正常缴纳满12个月?如果不算 那个底力究竟是什么公式计算的呀?激励哥,底力8级,气力120,满血时轰杂兵5000+,40%HP发动了底力,没有发动异性生命体(气力130).同一招,同一武器,同一杂兵,必定会心,12000+.有没有高手告诉怎么 天价球员托雷斯强势复苏 切尔西登上积市民投诉劳动仲裁超期 南京人社局称人NBA新赛季首期实力榜:热火占鳌头 湖南长沙现“土豪金”大道 200公斤“株连式”拆迁频现 媒体称背后是权力实拍:中国核潜艇导弹发射平台、艇员住美议员:监听确保了欧洲安全 盟友们应埃及一运动员因支持穆尔西而被剥夺比赛茶党加速美国政坛裂变 抓住政府软肋屡日本孤独人群增多朋友租赁登场 每小时湖北公安县屡曝摊派烟酒 动用“红头文中韩文化交流大会在北京举办“监听门”尚难撕破美欧关系巴基斯坦:一部族长老家遭武装人员袭击马尔代夫选举委员会驳回提前选举建议14岁小驴友遗骸没有外伤 小温爸爸作广西一米粉店夫妇被枪击一死一伤 行凶第二季中国好声音总决赛短信中奖观众信巴西强盗入室抢漫画美国:电视仍占据儿童一半屏幕时间转基因食品争论 英法态度迥相异火锅加小酒,小心胰腺亮红灯北碚用文化提升城市品质,建起网上图书男子为发泄情绪驾车冲进公园玩漂移被刑赤子一生邱少云,血火炼成英雄魂昨日,这些车辆违章了慌里慌张下公交 她把6万元公款落车上土耳其矿难救援仍在继续汽修工的小发明 在全国推荐使用不要只重视孩子的智商情商,逆商也很重美国中期选举今天开始投票 奥巴马恐成环保建设杯·圣灯山摄影大赛作品关注读本微信,火锅免费试吃单体楼改造完成了,你看变样没旅游第一案 8名游客一审全部败诉一连串的手机没电 走失女童的回家路绕暴走神探阮经天 双手抱起两女主角莎姐青年志愿者服务队昨日成立巴基斯坦穆斯林用赤脚踩热炭纪念伊玛目雷霆有意签前火箭控卫 二少伤停急需找丹麦甜心挑战马拉松为慈善 成绩喜人小圈内人证实俞丽被带走:这是体育界反腐
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘