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

ListBox项的控制-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
ListBox项的控制-VB资料
ListView和TreeView可以通过HitTest来实现对各项的控制,那么ListBox有没 有方法方法实现对其项的控制呢?答案上肯定的。
下面的例子实现的ListBox各项的自动选择,就象弹出ComboBox的下拉框,然后 移动鼠标时,光条跟着移动。
>>步骤1----建立新工程,在窗体上放置ListBox控件。
>>步骤2----编写如下代码:

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 Const LB_ITEMFROMPOINT = &H1A9

Private Sub Form_Load()
With List1
.AddItem "程序编制:小马哥"
.AddItem "Mailto:Schunte@sina.com"
.AddItem "Http://MaJiFeng.Top263.net"
End With
End Sub

Private Sub List1_MouseMove(Button As Integer, Shift As Integer, _
X As Single, Y As Single)

Dim lXPoint As Long
Dim lYPoint As Long
Dim lIndex As Long
lXPoint = CLng(X / Screen.TwipsPerPixelX)
lYPoint = CLng(Y / Screen.TwipsPerPixelY)
With List1
lIndex = SendMessage(.hwnd, LB_ITEMFROMPOINT, 0, _
ByVal ((lYPoint * 65536) + lXPoint))
If (lIndex >= 0) And (lIndex <= .ListCount) Then
.Selected(lIndex) = True
Else
.Selected(lIndex) = False
End If
End With
End Sub

>>步骤3----编译运行,鼠标在ListBox上移动,看看是不是自动选择。
Google的中国梦如何死于傲慢与不得力公关 [回顾]昨日黄花,那些被人们遗忘的11个操作系统 管理企业级API的7个最佳实践 Java 与 .NET 的平台发展之争 英特尔正在开发3D深度感知摄像头 可读出人类的情绪等 从数据平台到运营平台:国产开源移动统计Cobub Razor发布0.6版本 八月网络事故频现,CN域名遭最大规模网络攻击 Google云平台或将成为Amazon最大竞争对手 Camera360宣布完成1800万美元B轮融资 利用ZK Ajax框架 高效扩展Web App Web开发者需养成的8个好习惯 GitHub工程师专访:奶昔+海象+游泳池=开源 Paymill发布移动SDK,实现应用内直接支付 免费到付费:全球第二开源Web Server Nginx“堕入”商业化 乐视发布新版智能电视操作系统LetvUI 2.3—Schnauzer 进步还是灾难的开始?科学家首次通过互联网实现“心灵感应” 叫板Apple TV 谷歌发布Chromecast的iOS应用 性能提升100倍的秘密武器:一行SQL代码的妙用 60个开发者不容错过的免费资源库 专门针对初学者的Node.js教程 初创公司Parse.ly:1年内捕获1.6亿独立访问用户,收入增5倍 融资新方式:用未来10年收入的6%融资10万美元 小米手机-HAXLR8on:创客32小时全纪实 图文:看苹果下一代iPhone细节 能吸引你购买吗? [开源推荐]Intention.js:通过HTML进行响应式开发 Android副总裁Hugo Barra将加盟小米 三星将召开首届开发者大会 推新SDK和S Pen 15个步骤创立技术公司,并收获千万用户(三) H3Cloud:为企业提供最优化IaaS方案 VMware、红帽对决云管理平台 大数据辅助决策,构建智慧城市 请问如何用程序改变本机在局域网中的IP地址? help! 为什么session不可用?iis服务器配置错在那里? 一个关于数据库的问题,望各位高手多多指教.(很急) 大个大姐快开金口吧,从我启动PB 开是教我吧,没想到新手这么难呀!(共送700分!!!) 今天这件事说没完就没完,谁的面子我也不给,结了我就再发,删ID就换马甲,如果想封IP那就谢谢了,能让我下定决心离开 这个页面如何? MDI主窗口的背景,怎么显示阿? 高分求助!如何用程序获取显卡的物理地址? 请问LOEBBS的系统占用时间 在Tomcat4.0环境下,运行JSP,程序出错? 向大家推荐一个品质计数计量图控制程序 来者有分,班长请高抬贵手,不删此贴,谢谢 谁知道哪儿有cloudscape数据库的安装程序? 老大,infopower2000的密码是多少阿? 100分求<壮志雄心>8-20集的下载 能讨论一下 VB开发财务相关软件的经验吗,各位高手??(UP都有分) 简单的问题,送分 请教:ADO方式连接Oracle数据库时出现:多步OLE DB错误,请检查每个OLE DB状态,怎么办? 错乱 如何用jdbc连接oracle 老大,infopower2000的注册号,密码是多少阿? 向大家推荐一个品质计数计量图控制程序,来者有分,班长请高抬贵手,不删此贴,谢谢 线程管理 向大家推荐一个品质计数计量图控制程序,来者有分,班长请高抬贵手,不删此贴,谢谢 能不能提供一些有关图像分割的算法和实现代码!谢谢 如何实现语音聊天技术~需要什么? 如何实现语音聊天技术?需要些什么 请问如何用delphi语言将一文件夹压缩? 老大,infopower2000的注册号,密码是多少阿? 我现在是2000系统,想装一个98系统而不破坏2000,请问有解决办法吗?谢谢! [求助高手]VB注册表的读取 (dave_adl)将军请进来啊!给你分啊! 谁有数据结构与算法的东西,我在技术区可以给分 局域网内收发邮件?? 怎样利用主键不可重复的特性? 在ACCESS中如何在中间插入记录呢? 有谁知道,jbuilder7.0是调用了那些命令打包成EXE文件的? 一个简单的问题 OpenDialog控件怎么初始化路径? 使用regsvr32 时怎样不显示成功的对话框(即参数?) 怎样提高专家分? 网关屏蔽了QQ、聊天,如何使用QQ和聊天 如何配置声卡? 使用Excel时为什么不能更新图表? 欢迎踊跃参加 Office开发技术网上竞赛 使用Excel时为什么不能更新图表? 有人熟悉中科红旗吗? 请教DataBufferFloat的问题,没什么我的文件说找不到 会不会出BCB6中文版啊 http://go3.163.com/21jsp/cn/com/lyfupload.htm 请问各位:你们怎样在程序中用SQL脚本来建表啊?!!不会是叫客户自已创建表吧? 请进来看看,关于CString和WFC编程的! 关于定义一个struct 的 array问题?帮忙阿 雅诗儿这种减肥药有没有人吃过呀?说说效果呢/要亲身经历的.急.我本身162体重62公斤我想减下去,一直在努力运动减肥我不敢吃减肥药怕有肝肾什么的不好.可是运动减了一个月了减了大概四 两个不同品牌蓄电池里面的液体能混合在一起么?两个液体蓄电池里面都没多少硫酸了蓄电时间太短 新旧锂电池交替使用好吗?一块是已使用一年的(旧的),一块是新买的(新的).这两块电池交替使用好吗? 漏电保护器接法这个地方能接出来用吗?用万用表测量和旁边是通的.接出来后还有能有漏电保护作用吗? 制作电瓶车的电瓶需要买什么材料? 手机电源短路的原因有哪些呢? 农村家庭里面一般安装什么规格的漏电保护器?所有的电器都接在那个漏电保护器上可以吗? (1)从排尿的反射过程上分析,两者有什么相同之处?(2)从排尿的反射过程上分析,两者有什么不同之处?(3)成人在有尿意而不具备排尿环境时可暂时不排尿,说明脊髓具有什么功能?Sorry忘 电源短路的原因有哪些 关于漏电保护器接法...今天看了一下家的电,从总闸的出现端有4根线..再接到漏电保护器上...但是看不出是怎么接的....想弄明白.. 女生小便的方式是什么样的 手机不开机 用电源表连上就短路,是怎么回事啊?我是用电源表加电的时候 电压在15V是烧坏的.我的手机是智能手机. 质量m=30kg的物体,在180n的水平向右的牵引力的作用下,沿水平面从静止开始运动,运动后5s末 法桐树是什么样子的那法桐树的售价是多少 电源短路的原因 质量为m=8kg的物体,在F=12N的水平力作用下,沿光滑水平面从静止开始运动,运动时间为t=5s,试求1:力F在3s内对物体所做的功W.2:力F在3s内对物体做功的平均功率P 法桐树的作用 电源板短路怎么排查短路原因.我是初学者,在工作中出现这样的问题.麻烦大家帮忙解答一下.非常感谢.一个电源板输入交流11V和22V电压.输出是直流 5V,24V,11V.其中出现 1.保险斯爆掉的现象.2.保 光滑水平面上,一个质量为0.5kg的物体从静止开始受水平力作用而运动.在前5s内受到一个正东方1.该物体在前5s和后10s各做什么运动2.第15s末的速度大小及方向怎样 我家的桐树为啥死啦 HELP.!有什么办法证明空气中含有二氧化碳和水蒸气.? 一个质量为5千克的物体,在40N水平拉力的作用下,从静止开始在水平面内运动,到第5S末该力消失.物体与水平面的动摩擦因数0.2,且g=10m/s².求:(1)该物体运动过程中最大速度是多少?(2)物 那法桐树的售价是多少 为什么桐树的蘑菇不能吃,我家的蘑菇长的能很黑木耳蘑菇 质量为5kg的物体放在水平桌面上,在F=12.5N的力作用下沿水平方向由静止开始运动(摩擦力为5N),若经5s撤去外力,此物体还能滑行多远? 玉米红薯可以同吃吗 死桐树根旁边的小蘑菇能吃吗颜色呈淡黄 我想问一下可以买卖珙桐树吗?需要什么手续吗? 甘薯、玉米为什么要引入 桐树上出的蘑菇能吃吗? 家里一般用多大的漏电保护器?我朋友给我按了一个62A,是不是家用太大了,有事我家漏电,总闸都跳了,我家的不跳,请问高手是怎么回事? 关于月球的小知识(20字) 平面上三个力F1F2F3作用于一点且平衡,F1的模=1N,F2的模=(根号下6+根号下2)/2,F1F2夹角45°,求F3大小 哪里卖珙桐树 将一根有磁性的钢条从中间折断,折断的左方定为甲右方定为乙,则甲为——极,乙为——极.请填空并说明理由.这根钢条未折断之前为左端是N极右端是S极,不好意思没图 1.螺线管的磁感应线和条形磁铁相似,那么在内部,是直接由N极到S极,还是由外部N极到S极后再从S极内部穿过回到N极?总之就是,是由S到N,还是N到S?2.将铁芯插入螺线管,铁芯的磁极为什么会和螺线 什么是珙桐树, 在光滑的水平面上固定一根条形磁铁,分别有塑料块,铝块,铜块,铁块以匀速正对着磁铁滑来,在接近磁铁过程中,问这几个物体的动能如何变化,请解释原因. 平面上三个力lf1l=1N,lf2l=2N,f1与f2的夹角为60度,则f3的大小为? 空调要用多大的漏电保护器?最近重新搞了电,想问下,72三匹的空调我从中间添加了一个漏电保护器,为什么不起作用?每次短路或者有问题,都是直接跳总闸,是不是漏电保护器太大了?我用的是60 有关磁铁内容的物理题 (看图回答) 新旧电池可以混用吗新旧电池可以混合使用吗?为什么?电池指的是圆柱形的,不可以充电的那种. 珙桐树是什么被子植物吗 桐树花的用途 新旧电池能混用吗?我家电视里的遥控器里的电池其中有一个被我拿出来用了一会,然后又装进遥控里了,这样对遥控器会有伤害吗?因为是新的遥控器,所以以后再也不这样做了.关健现在不方 家用5500瓦功率,用多大的漏电保护器 请用箭头和名称表述小腿肌肉细胞产生二氧化碳的排出体外的途径→ 为什么新旧电池不能混用? 和蓄电池能一起串连使用吗? 珙桐树为什么叫做“和平树”? 桐树油有什么用途? 红薯的能量1.食部( %) 2.热量( ) 3.蛋白质 4.水分 5.脂肪 7.糖类 家庭漏电开关用多大 肌细胞能产生二氧化碳的场所是哪里 做匀速圆周运动的物体:( ) A.一定受平衡力的作用 B.它受到的力可能平衡,也可能不平衡 C.它受到的力一选A吧既然是匀速,应该平衡吧 电池的并联合串联有什么区别 桐树有什么用? 做匀速圆周运动的物体在什么方向上一定不受力的作用 牛奶跟地瓜玉米可以同食吗 关于新旧电池搭配使用的说法中 不正确的是()Ⅰ、旧电池内阻大,浪费新电池电能 Ⅱ、新电池能激活旧电池继续放电 Ⅲ、为了避免浪费 新旧电池不宜混用
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘