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

VB利用API 使Text框只读

HTML文档下载 WORD文档下载 PDF文档下载
VB利用API 使Text框只读

声明:
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Long) As Long
Const WM_USER = &H400
Const EM_SETREADONLY = (WM_USER + 31)
使用:
' 例如使 TEXT1 只读
Dim RetVal As Long
RetVal = SendMessage(Text1.hwnd, EM_SETREADONLY, True, ByVal 0&)
与设置DISABLE 属性不同的是,TEXT1 只读后光标还是可以定位,并能支持多行的移动。
98-7-22 更新: 其实在 VB5 中的 Locked 属性也有类似的效果,更方便。

在 Textbox 中,录入 N 个字符后移到下栏
在 Textbox 的 Change 中加入:
IF (LEN(TEXT1)) >= N THEN
SENDKEY "{TAB}"
END IF
《近匠》融云,自主研发真正“不丢消息”的IM云服务 【CTO讲堂】听云CTO Wood:APM实现原理及对IT和产品运营的价值 从7个维度浅析虚拟现实Alpha年 Maker Faire上的微软:将技术与工具带给Maker才是关键 友盟2015年Q1移动互联网报告:车联网App崛起 多面编程语言Scala NEC高可用集群软件EXPRESSCLUSTER X3.3面向中国市场正式发布 【探秘ES6】系列专栏:模版字符串 专访图书作者祁宇:C++11让程序更简洁、更现代、更强大 滴滴打车CTO张博:生死战役,技术和时间赛跑 Qualcomm拥抱创客文化:如何基于DragonBoard 410c创造和创业? 【探秘ES6】系列专栏:剩余参数和默认参数 专访资深程序员庄晓立:我为什么要选择Rust? 主会讲师确认,2015中国人工智能大会火热报名中 容联&#183;云通讯线下沙龙:IM 5.0助力App社交化 【CTO讲堂】全数据驱动产品优化,美国互联网公司A/B测试经验分享 《近匠》易快报:以报销做企业消费场景下的Slack 纷享销客D轮融资1亿美金,启动开放平台战略! 专访4秒源码商城CTO陈杰:扎根互联网的“不安的心” iOS UIView动画实践(一):揭开Animation的神秘面纱 【前端人生】Teambition前端工程师陈涌:非计算机专业,依托社区不断成长壮大 iOS UIView动画实践(二):Spring Animation与人机交互 基因组与数据整合:DNA应用开发正在临近 2015 PHP框架调查结果出炉,Laravel最受欢迎! 【CTO会员专访】KEEN创始人兼CEO王琦:在GeekPwn,遇见一极棒的安全人才 创业公司都在使用的3款Python库 深入理解Objective-C的Runtime机制 你不知的Docker 创办人兼CTO游走美法的浪漫狂放 《近匠》环信CEO刘俊彦:移动客服的未来化场景 iOS UIView动画实践(三):Transition Animation 【CTO讲堂】无社交,不App!——为App加载强大的通讯社交引擎 在编写的用户控件中公开所引用控件的事件怎么实现啊 这是我的usb口的问题吗? 考程序员前想先考全国三级,请问三级种哪个科目考C编程?何时报名? 调用DLL时候出现Bad Dll calling convention错误,为什么?代码如下 如何建立一个小数据库? 我想问下,网络技术到底是指什么??? 为什么会出现这个问题呢??急救??? 在不同操作系统出现不能正常运行的问题,和默认字体语系乱码问题 C# 静态类成员 新手请求各位前辈帮助 如何查询我连接到哪个数据库? 哭着请求帮助。。。。。页面显示问题!!在线等着 网络技术到底是指什么???? 我想在<<三国九>>里输入正确的中文,有法子么? 能帮我改改么? 紧急求助,请高手支招 请问在JTABLE中如何将某几行设置成可以被选择的,其他几行设置成不能被选中的? 请问怎样修改SDI框架的标题及去掉最大化按钮??? 在自定义的用户控件上公开引用windows控件的事件怎么做啊!!谢谢 2003中为什么IDE设备只能用PIO模式? 在FAQ里见到这样一句,不明白什么意思 怎么我用vc 的 odbc 做数据库时,工程名为try ,在工程工作区的“class view”面板里没有tryview类的? 不能使用xmldocfile() 文档对象的问题 关于键盘纪录,高手 如何使用IPAddress控件? 初学者问:怎么用UpdateAllViews()? 无法创建asp.net应用程序 大家帮帮我吧,我都快崩溃了 中文乱码的问题 !!谁在VMWare 3.2里装过RedHat 9.0和RedFlag 3.0,请看看这些问题(100分)!! 如何使在输入框选中的文字在提交后仍然显示在输入框中? 无法创建asp.net应用程序 高手在上,请问怎么样在win2k中实现关闭程序和绘图[内详] 初学者问:如何在listview中查找其中一行? 怎样在调试窗口中看到变量值? 郁闷中,狂散分。。。。。。 DCOM怎么使用? 想做一个地区门户一般要包含那些栏目?? 线程 怎么能让DELPHI编出来的程序最小化以后进入到系统托盘? C++问题,请进来帮忙! help me ~!!! 以下行为究竟是关闭端口还是使用端口 callzjy(【剑客西门吹雪原来是仁者帮帮主...】) 怎么翻了这么多老帖子出来了??? 求原代码下载 大家都在干什么? 有什么东东大家可以一起研究研究? 初学者问:如何在listview中查找其中一行? fortran语言的高手请进,分数不够再加 我是一个刚刚步入JAVA世界的小鸟 恳请得到大家的帮助 。。 ActiveForm发布问题。 第三题.求道理.物理高二的. 请问“世界上,是鸡生蛋,还是蛋生鸡?” 谁能帮我看图写一段话 为什么自然光的反射和折射光都是偏振光大神们帮帮忙 电茶壶是将电能转化成什么能? 等腰梯形三角形AOB的面积是15cm2,线段OB的长度是OC的3倍,求梯形ABCD的面积是多少 甲乙两列火车长为92米和84米,若相向行驶,经过1.5秒完全错过(即从两车头相遇到两车尾离去)若同向行驶,则相遇后经过6秒超过,求两列火车的速度。 已知点P是圆F1:(x+1)2+y2=8上任意一点,点F2与点F1关于原点对称.线段PF2的中垂线m分(2011•惠州模拟)已知点P是圆F1:(x+1)2+y2=8上任意一点,点F2与点F1关于原点对称.线段PF2的中垂线m分别 帮我看图写一段话,急用啊, 甲、乙两列火车的长为92米和84米,若相向行驶,经过1.5秒完全错过(即从两车头相遇到两车尾离去),若同向行驶,则相遇后经过6秒超过,求两列火车的速度. 雕刻机切木板用什么刀最快18mm 厚的木板,不是实木.都是千层饼一样的木板.雕刻机用途主要是开板,不雕花.现在转速10000,30%进给速度.容易黑刀而且很慢,开一片板差不多两个小时.请问师傅开板 看图写一段话,100字 电源短路的路段电压是多少 我想知道这木板上的结是什么东西RT.需要很快的知道答案.我只要知道这的名字.不是虫眼.类似于结痂的一种东西形成的. 传动惯量是什么意思 一个质点在作匀速率圆周运动时(   ) A.加速度改变,B.加速度不变,C.一个质点在作匀速率圆周运动时(   )A.加速度改变,B.加速度不变,C.加速度改变,D.加速度不变,最好说明一下 为什么一块木板可以架得起比它重的东西? 平行四边形ABCD底边BC高是3cm,梯形ABCD与三角形ECD的面积是15cm2,长多少厘米? 如何测出一个电器是用直流电还是交流电? 矩形ABCD的对角线AC、BD相交于点O,过点C作BD的垂线与角BAD的平分线相较于点C,求证AC=CE 请帮忙看图写话 玻璃是拿什么做的 如图,矩形ABCD中,过点C作BD的垂线与角BAD的平分线相交于点E求证CE=BD 怎样使二氧化碳更多的溶于水中 长大后,我就成了你,才知道那块黑板写下的是真理……才知道那支粉笔画出的是彩虹.是哪首歌 一个平行四边形切割后可以拼成一个长方形,拼成的长方形长24厘米,宽5厘米.原来平行四边形的面积是( )平厘米?快 为什么二氧化碳溶于水中使水密度变大 通过波形如何判断音叉叉股的长短 关于灭蚊器我想买个灭蚊器,有没有人用过什么灭蚊器觉得效果比较好了随便说说觉得好就采取一楼 我想用非化学的二楼 我用过,效果很不理想三楼 我这里挂不了蚊帐 在三角形ABC中,点D是BC的中点,DE垂直AD,角EAD=角BAD.当角BAC=90,AB=8,AD=5时,求线段CE的长. 马拉着重为10000牛的车在水平公路上匀速前进,30min走了5.4km,车在前进的过程中受到的摩擦阻力是1000牛,(1)马拉车前进的速度是多大?(2)马对车的水平拉力是多大?马在这段时间内对车做了 英语翻译开展企业内部控制评审的实践探索内容摘要:如同“人无完人”一样,企业内部控制同样存在缺陷之处.如何弥补内控缺陷、完善内控执行系统,正是本文要探讨的内容.本文首先明确了 其中小球1固定在碗低A点,小球2可自由运动,平衡时小球2位于碗内的B位置处,改变小球2的电荷量把他放在图中 甲火车长420米,每秒行15米.乙火车长390米,每秒行20米.乙追上甲并超过甲需要用几秒? 轻木板,(模型常用的那种)沈阳哪里有卖的 如何更换显微镜的目镜 一辆车装满货物共重4.9乘10000牛,在平直公路上匀速行驶,在十分钟内前进了6千米.接上:在这时的功率为6.615乘10000瓦,求(1)这段时间内汽车的牵引力做了多少功(2)汽车所受重力做了多少功 矩形ABCD的对角线AC\BD相交于点O,过点C作BD的垂线与角BAD的平分线相交于点E,求证A求AC=CE 什么时候使用低倍儿镜什么时候使用高倍镜(显微镜) A,B两个小物块用轻绳连接,绳跨过倾角为30°的光滑斜面顶端的轻质滑轮,B悬空A放在斜面上A恰好静止第二次将B的质量改变发现A自斜面顶端由静止开始向下运动,经时间t速度大小为v已知物块A的 紫藤萝瀑布 如何理解"花和人都会遇到各种各样的不幸"? 什么时候显微镜的目镜成正立放大的虚像不是成道理放大的虚像吗 李伯伯参加飞镖比赛,投了4镖,成绩是37环.李伯伯至少有一镖为什么不低于10环,为什么?(例算式) 三棱镜顶角的测量报告怎么写? 已知,如图,在△ABC中,点D是BC的中点,点E事BD的中点,AB=BD,求证:∠CAD=∠EAD 敲击音叉的力越大,则发出的声音()A越高B越低C越响D越轻 弧度,有没有数字来表示它? 数据结构哈弗曼树,哈弗曼编码?已知字母{ A(7) B(2) C(2) D(5) E(7)F(10)}求哈弗曼树求哈弗曼编码求帮忙讲讲解题思路 已知圆F1:(X+1)^2+Y^2=1/4 F2:(X-1)^2+Y^2=49/4 动圆M与F1 F2都相切求1;动圆圆心M的轨迹方程 1.五边形ABCDE相似五边形A1B1C1D1E1,已知AB比A1B1=K,则它们的对角线长之比AC比A1C1= ,五边形ABCDE与五边形A1B1C1D1E1的周长之比为,面积之比为如图,在平行四边形ABCD中,EF//CD,分别交AB,CD于点E,F,AD=1,A 是先有蛋还是先有母鸡 一个圆形钟面的直径是16厘米,它的周长是几厘米,它的面积是几平方厘米一个圆的半径扩大3倍,周长就扩大 倍,面积就扩大 倍丨两个圆的半径分别是3cm和5cm,它们的直径的比是 ,周长的比是 面积 北宋初期商人李某从海外经商归来准备到东京探亲.他从泉州上岸发现港口停泊着许多大船一片繁忙途径黄河域发现棉田遍布路过淮河流域闻到稻花飘香他选购了一套本朝史书当读到“恨金邦 电锯反转是什么原因 我国第一部磁悬浮列车已经在上海投入使用,如图所示是磁悬浮的原理,下面的圆柱是柱形磁铁,上面使用高温超导材料制成的超导圆环,将超导圆环放在柱形磁铁上,它就能在磁力的作用下悬浮 世界上到底是鸡生蛋还是蛋生鸡 如图,已知五边形ABCDE相似五边形A1B1C1D1E1,且AB=4cm,A1B1=3cm,连接AC,AD,A1C1,A1D1.试问五边形ABCDE和五边形A1B1C1D1E1的周长之比是多少 三角形ABC和三角形A1B1C1相似吗?三角形ABC与三角形A1B1D1面积之比是什 焦点在x轴上的椭圆上有一点P(3,4),F1、F2是椭圆的两个焦点?焦点在x轴上的椭圆上有一点P(3,4),F1、F2是椭圆的两个焦点,若PF1⊥PF2,求椭圆的标准方程? 世界上到底是鸡生蛋,还是蛋生鸡? 看图写一段话. 以色列攻击叙利亚军事基地 目标是俄制默克尔遭美国监听 德议员称斯诺登愿协国际新闻早报:美国务卿将访沙特修补关美媒:日本大幅升级预警机应对中俄海南乐东退休局长房屋夜半遭强拆 警方初三女生因学习压力大 屡次到超市偷零宁波红光集团等6企业涉税违法被罚23浙江省省级28个部门三公经费(附表)海南乐东退休局长房屋夜半遭强拆 警方思鑫坊曾是杭城近代建筑代表 如今成无新消法引入\"举证倒置\" 经营者需前3季度国内渔业产值达5362亿元 上海自贸试验区营造“宽进严管”的营商谷歌雅虎数据遭美国国安局窃取 美媒称菲律宾议员“港人生命值钱说”激起香港俄罗斯核武部队大规模战略演习 抗衡北台湾花莲发生6.7级地震 杭州等多地医生举报官员公款出游 出门戴钢盔执擀美国务卿将访欧洲中东八国 重申与沙特俄律师称斯诺登在俄找到工作 新工作与\"免费\"医疗让俄罗斯进退两难 仅一对“90后”情侣因出卖其子在广东中广西环保抽查问题频现 多家企业被要求田振玉、丁卫冬因严重违纪被终止山东省缅甸议员:油气管道对中缅双方都有利江西一担保公司办事处负责人非法吸储过发改委:清理整顿中介服务相关文件即将辽宁省监狱管理局党委常委宋万忠接受组张杰自称\"小鲜肉\" 谈与谢娜造人“最美和声”三度唱响 杨坤回归张杰首原标题:土耳其警察拘捕冲进执政党大楼美媒称麻将风靡美国 中网友:替老妈报内蒙古通报原公安厅长杀人案 称其公安2015年度“中国愚人榜”出炉 张柏泰国诗琳通公主大寿赦天下 全国制印有巨额投资诈骗疑案之多重内幕河南中原之门烂尾 资金链条断层成烂尾资料:钟世间曾称自己受监督才能监督别宁波“天网7号”行动严惩黑车 共查处大学生曹承全用旗杆连救两人 被授“见湖南展出300余幅自闭症儿童作品江西瑞金一餐饮店老板为八旬孤寡老人送
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘