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

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
走进支撑过8亿用户的Yahoo!数据中心 Napier,一个引领Rackspace14年老兵功成身退 Twitter最新测试版被指仿Facebook的界面设计 成功求职者的自述:如何向应聘企业展示自身价值? 仅用移动开发服务:一分钱不花,开发native应用 苹果员工爆辞职内幕 Windows Phone 8.1被曝光信息汇总 Phaser:开源的HTML5 2D游戏开发框架 HTML5调查:做的好,收入不比iOS差 汽车巨人福特让“数据”说话 基调数据解读2014网购行业的3大变化 测测:用百度Clouda占卜移动互联网 微软的无奈:或允许Android应用运行于Windows平台 如何选择适合自己的编程语言 Google Now新增语音命令:生活简单一点,让爱更近一点 千万美金收购案:GetJar是一家怎样的公司 传苹果与时代华纳等公司合作,推新一代Apple TV 追本溯源 解析“大数据生态环境”发展现状 为Hadoop存储层增加对OpenStack Swift的支持 详解并行逻辑回归 在AWS上使用GPU实现分布式神经网络 大数据时代,看“小数据”如何支持决策 22人15天研发 微信红包系统发起“珍珠港偷袭”的背后 开发产品防脱节,DevOps来帮忙 手游福音:官方中文版Unity用户手册免费发布 支持多平台!2D和3D游戏引擎Godot宣布开源 从Google备份互联网看“数据安全” NBA全明星周末,数据打造下的辉煌盛事 2014情人节没活动?我们来帮你! Windows 8授权销售已超过2亿份 速度不及Win 7 IDC:2013年第四季度Windows Phone出货量大幅增长 给定一个email地址及DNS服务器地址,如何检测此email地址对应的SMTP服务器?(请ludou,funtek等进来领分) 如何在mfc下编译一个c源文件 高手请帮忙解决这个难题-关于.vox文件 请问!想去上海的外企,英语水平要多高才可以?口语重要吗? 在sybase中如何建表的时候把中文注释加入?以便在建数据窗口的时候label显示中文。 请问win2000_Server的service pack在哪有卖,D版?北京? 安装JBuilder5对机器有什么性能要求吗(内存、cpu...)?Thanks!(内空) 关于PB作为OLE SERVER的问题 我想做个启动画面的窗口 关于MYSQL的问题 数据库高手请进,值得一看 怎么从文本文件里取出其内容? 请大家帮忙看一下,关于Delphi的三层MIS开发 如何获得经典的C++/MFC方面的电子文档,中英都行,谢谢! 压缩中提到的文件头有什么作用 , 请问各位专家,在网页上如何制作视频点播?有几种方式! 我报了中程谁有历年的中程试卷? 我收到的信都是?号,怎么看???? VB中是否有移位操作符??是否有_能够得到数据类型宽度的函数? 哪里有core java的e版down啊? 有事好商量!请进! DLL编程错误,请高手指教一下!! 活见鬼,真气人....... 问一个trigger问题? 问一下:我的char*都用_T("asdfsafd")表示了,资源也没任何问题,可有时候运行程序显示乱码 在论坛里,发一个帖子新开一个窗口,当发完后让原来那个窗口刷新一下 我的机子到底怎么回事???? 我试试.. CListCtrl中如何选定整个一行? 来到济南天气太热,特来送分 ★★★★★ 见于现在伪ID和盗用密码的现象十分嚣张,我提议…… ★★★★★ 请教各位,我用vb6.0访问ms sql7.0数据库,为什么有时出现,“过期,数据已超时?” 请问COM和DLL有什么区别和联系?(30分) 关于侯老师 win95-a-developers-guide 一书的源配书... ISAPI中不能存取ASP中的Session、Application变量?高手你老人家在哪里? 大家来看看这些招聘题目合不合适 提一个网页制作的问题哈,大家不要扔西红市啊,网叶制作可是程序员的基本技能之一 activeskin里的skinbuilder有谁用过???来讨论吧 我在msdn上看到vb中的字符串有两种:定长字符串和变长字符串。请问如何分别声明这两种类型? 怎样在ADO中引用已打开的recordset的某一字段值,请给几个例,谢谢了! seedundersnow and holyfire help me!about 8253! 谁有cute ftp 4.2.6 beta的注册码 请问如何把页面查询到的记录导入到Excel中呢? 有用过TAdvStringGrid的吗?OnGetEditorType( )为何不被调用? 请教高手如何用Xsl编制函数控制Xml??急急 哪位给一个MD5的例子!谢谢了 长春的李延生来领分 求救:一个VC中多线程的问题 提个问题,原来对VC尤其是界面和C++语法这一块比较熟,现在由于公司需要转C++BUILDER,难不难,需要熟悉哪些 [总300分,会继续加分]哪位大哥用编程实现过创建SQL Server的DTS package并且run the package的全过程[急] 能不能使用html 一共有360千克的水果糖,每袋4分之一千克,5小时已经装完6分之5,平均每小时装多少袋? 6元=()元 6分=()元 3角5分=()元 10元1角=()元 一块红布子30m,宽1.5m,用它做2条直角三角形都是5分米的等腰直角三角形小旗,可以做多少面? 把六分之五千克的糖,平均分成五份,每份是五千克得几分之几,提出理解快急啊快~~~~~~~~~~~~~~~~~ 有一个三角形的周长是3分之2分米,其中两条边的长度是4分之1分米,6分之1分米,这个三角形 一块长方形红布长20米,宽1.5米,用它做腰是5分米的等腰直角三角形小旗,可以做多少面.求列算式(公式)符号!&*/¥%…#我看不懂 比六分之五千克多三分之一千克是多少千克,比六分之五千克多三分之一是多少千克? 有一个三角形的周长是3分之2分米,其中两条边的长度是4分之1分米,6分之1分米,这个三角形是什么形状的三角形? 一块长120分米,宽8分米的红布,剪成腰长是2分米的等腰直角三角形小红旗,可以剪出多少面这样的小红旗? 第一道:1000米的十分之七是( ) 第二道:120分的六分之五是( )分直接说得数就行 一个等腰三角形,其中两条边长度分别是5分之3分米、4分之1分米,求周长 一块长25分米,宽20分米的长方形红布,裁剪成直角边都是2分米的等腰直角三角形小红旗,最多可以做多少面小红旗?百度知道 4分之三千克的六分之五是多少千克.八分之7米的七分之三是多少 米 一个等腰三角形,其中两条边的长度分别是五分之二米,四分之一米,求这个三角形的周长? 一块长方形红布,长9厘米,宽6厘米,要用它做成底是2厘米、高度是3厘米的直角三角形小旗,可以做多少面? 18个六分之五是( );120米比( )米多25%. 一个等腰三角形,其中两条边的长度分别是2/3米和1/4米,求这个三角形的周长.要式子 20立方米的水大概有多重? 1,2,3,4,5,6,7,8,9,10哪个是质数 一个等腰三角形,其中两条边的长度分别是三分之二米,四分之一米.求这个三角形的周长.学校举行口算比赛,设一,二,三等奖各若干名.获一,二等奖的占获奖总人数的十分之九.获一,二,三等奖的 每立方米水有多重? 三分之一,2,1,-6,0,9,7,3,-9,14,-1.4,二又五分之一【自然数,整数,质数,三分之一,2,1,-6,0,9,7,3,-9,14,-1.4, 二又五分之一【自然数,整数,质数,台数各分类.】 一个等腰三角形的周长是70厘米,相邻的两条边长度比是1比3.这个三角形的底是多少厘米 一个蓄水池,用去存水的70%后,注入100立方米水,这时池内的水正好是原来的50%.这个蓄水池原来有水多少要方程,一步一步解 八分之九至少加上()个九分之一,和是最小的质数? 一个三角形的周长是十分之七分米,其中有两条边的长度都是五分之一分米,还有一条是多少分米?这是一个什么样的三角形? 一个蓄水池,用去70%,注入一百立方m,现在的水正好是原来的一半,原来多少水 一根六分之五米长的钢绳重3千克,这种钢绳每米重多少千克?每千克钢绳有多长? 一个三角形的周长是12/7分米,其中有两条边的长度都是6/1分米,还有一条边长是多少分米? 一个蓄水池,用去存水的70%后,注入100立方米水,这时池内的水正好是原来的一半.这个蓄水池原来有水多少立方米 一根6分之5米长的钢绳重3分之2千克,这种钢绳每米重多少千克?每千克钢绳有多长? 一个三角形的周长是7/10分米,其中有两条边的长度分别是1/5分米和3分之一分米,还有一条边的长度是多少分米? 一个蓄水池用去存水的70%后,注入100m3水,这是池内的水正好是原来的一半,这个蓄水池有水多少立方米? 一根六分之五米长的钢管重2千克,这种钢绳每米重多少千克,每千克钢绳有多长 用一块长40厘米,宽30厘米的长方形红布做直角小旗,小旗的两条直边分别是10厘米和5厘米,这块布最多可以做 一个长方体的蓄水池,长20m,宽18m,深2.5m.池里的水离池口0.5m,池里的水是多少立方米? 一根6分之5米的钢绳重3分之2千克,这种钢绳每米重多少千克?每千克钢绳有多长? 用一块长为120厘米、宽为96厘米的红布,最多可以制成底是8厘米、高是20厘米的直角三角形小旗多少面?损耗忽略不计 挖个长10m.宽8米,深5m的长方体蓄水池. 水池能蓄水多少立方米? 一根5/6米长的钢绳重3千克,这种钢绳每米重多少千克?每千克钢绳有多长? 用一块长40cm,宽30cm的长方形红布,做直角三角形的小旗,小旗的两条直角边为10cm,5cm,这块布最多可以做 长方体蓄水池长40米,宽15米.深2米,池内现有900立方米的水,水面距池口多少米?很急! 有一座建筑物,在地面上A点测得顶点C的仰角为30度,向建筑物前进50M 到B点,又测得C的仰角为45度,求建筑物的高度,精确到0.1米 用一块长40厘米、宽30厘米的长方形红布做直角三角形小旗,小旗的两条直角边分别是10厘米和5厘米.这块布最多可以做多少面小旗?要算式,要图! 一个长方体蓄水池长8.5m,宽4m,深1.5m.这个蓄水池占地面积是多少? 二元依次解数学题王大伯承包了25亩土地,今年春季改种茄子和西红柿两种大棚蔬菜,共用去成本44000元.其中种茄子每亩成本为1700元,获纯利2400元,种西红柿每亩成本为1800元,获纯利2600元,王大伯 一种直角三角形的小旗,一条直角边长15厘米,另一条直角边长24厘米,做150面这样的小旗,至少要用红布多少平方米一种直角三角形的小旗,一条直角边长15厘米,另一条直角边长24厘米,做150面这样 有一个圆柱形蓄水池,底面半径为2米,池深20分米,先往池内注入15分米深的水,注入了多少立方米的水? 某市出租车收费标准为:3千米及3千米内收费6元;3千米以上每1千米收2元.现在贝贝有28元钱,他想乘出租车去离家18千米外的外婆家,钱够么?(写出计算过程) 一块红布长3米,宽1,5米,用它做两条直角边都是5分米的直角三角形小旗,可以做多少面? 一个蓄水池的容积是240立方米,它的池深3米,这个蓄水池的占地面积至少是( )平方分米? x-2xy=3是2元1次还是2元2次 一块红布长30米,宽1.5米,用它做两条直角边都是5分米的直角三角形小旗,可以做多少面? 有一个蓄水池如果蓄盛水,可盛600立方米水,已知这个水池长是15米宽是8米,池深应是多少米? 6元3角5分=( )元=( )角=( )分 一块红布长30米,宽1.5米,用它做两条直角边分别是5分米、6分米的直角三角形小旗,可以做多少面? 一个圆柱形的蓄水池,底面半径是4m,深2米,这个蓄水池最多能蓄水多少吨?(1立方米重1吨) 把六分之五的糖,平均分成五份,每份是五千克得几分之几,提出理解 3角5分用分数是多少元? 一块红布长40米,宽20米.用它做两条直角边都是4分米的等腰直角三角形小旗,可以做多少面?请帮请我弄上答案,再告诉我怎样求出的,
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn