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

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上移动,看看是不是自动选择。
隐藏桌面上的图标-Delphi资料 用DELPHI编制Windows95下的钩子函数 用Delphi的THML控件实现触摸屏的使用 用Delphi实现禁止用户关闭Window9X 用Delphi制作能够干净地删除自己的程序 用DELPHI 做一个简单的屏幕保护程序 用Enter键代替Tab键-Delphi资料 用修改文件时间的方法来加密文件-Delphi资料 用最原始的方法编制程序-Delphi资料 运用Delphi编写Windows NT中服务程序 在DELPHI编程中确定系统运行模式 在Delphi程序中调用控制面板设置功能 在DELPHI下读取与设置系统时钟 在Delphi中避免2000年问题的捷径 在Delphi中调用API函数 在Delphi中获取和修改文件的时间 在Delphi中控制扫描仪 在Delphi中实现对WIN9X应用程序使用权限的设置 在Delphi中实现对目录拷贝、删除和搬移的操作 在Delphi中使用自定义光标 在Delphi中用拼音首字符序列来实现检索功能。 在DELPHI中用线程排序 在Delphi中制作背景音乐 在Dephi中使用TStream读写数据的技巧-Delphi资料 在应用程序中跟踪MOUSE的坐标-Delphi资料 怎样建立回调函数-Delphi资料 怎样显示自定义鼠标光标(Cursor)-Delphi资料 找出消失的 Delphi 窗口 执行外部程序-Delphi资料 执行一程序并等待其结束-Delphi资料 制作一个不在任务栏及任务列表中显示的幽灵程序-Delphi资料 如何不运行编译? 有谁知道怎么从perl里调用一个c库里的函数????????? 请问在CB中如何隐藏WINDOWS的任务栏呢? 今天不爽,下班后打星际,大家一起来。 指点!在PB中怎样用程序作成一张动态的交叉表 编辑控件怎样才能显示那些怪字符? 有没有人喜欢郑智化 大家推荐好听的几首歌吧! 请教:怎么学c++? 高手点拨! 各位网络高手.如何在程序里讲ip地址转化为域名 有什么方法,可使表单内的组件背景变成透明的而文字不透明,请看例子: 编辑控件怎样才能显示那些怪字符???? swall(壹心) 你还在深圳特区吗? 如何设置Session的密码?请高手指点迷经^^^^^ 哪位可以解释一下下面的代码? perl 的人气太差。罢了罢了。找本perl自己搞定 MsSQL7.0 当日志文件大小未限制而变得很大时,怎样清日志文件,使其减小? 请教诸位牛兄牛姐牛夫人---有难度哦(着急出活!) 基本问题:如何将一个.txt中的内容读入到内存再从内存中读出并存为另一个文件?谢了先!!!! 高手帮帮忙!!!!!!!!!!!!!! 又有台风了。。。。 在zip包中加入ASP推荐的PAD File有用吗????? PB连接SQL数数库,为什么显示的表会不全 如何把一个文件file.dat里的数据写入软盘0磁道0磁头1扇区. 我要骂人! chris2001(牛虻),不是东西 华为工程师 谁知道 vb 的序列号?????? VS.NET 有开了个新铺子。为什么我的ejb/j2ee还没有开张。气愤。 老大们:我是菜鸟,有问题要问,不过不要笑我。一定给分的 再次发问:关于在SQL SERVER中的某张表上建立触发器...... 没有有这样的病毒,或者文件 各位老大,如果有asp、sql基础学jsp和php是不是比较容易一些呀?言者有分哦! dll中怎样调用主程序中的函数? 新手请教接口聚合!!!!!!!!! 高分求教!有没有谁编写过WEB服务器程序? 微软OfficeXp女孩 请教一个报表问题? 小技巧!!! delphi中调用MessageBox出错,高手指点一下。 大家好,这是我提的第一个问题!我学DELPHI才两周!对您的指点,小弟万分感激! 请问sybase12。0中,游标能不能用动态sql申请 紧急求助:如何调用父对话框的函数 各位好,我在VB下做了一个ACTIVE 控件,但是加不到CBUILDER 上,但能加到VB里,为什么? 婚介所 关于C++打开文件的问题? 请教一下关于多表查询的问题 求助:中文Delhpi帮助 为什么我的rose装好后没有html帮助?还有安装时应该选择client还是administrator? cathy0505;chenkane;zhangshicun;swall;(_2_);riluo;wt13;MonkeyLin;seedundersnow;qancy_chen;cathy0505;acute 一个很简单的问题,怎样把一个php字符串变量转为实型变量 氢气在氯气中燃烧不用太详细,用比喻也可以,比如“可以烤肉的温度”……之类的,哈哈哈,当然, 请问一立方100摄氏度的开水有多少热量?一立方300摄氏度的水蒸气 压力为9.8公斤 有多少热量? 管道压力表、真空压力表一般与何种阀门连接?现在有两种阀门Z43F-16C Q41F-16C 压力表一般和哪种阀门连接啊. 是氯气在氢气中燃烧,还是氢气在氯气中燃烧 用0.6MPa压力的管道蒸汽直接加热1T水,从15摄氏度到100摄氏度,需要多少立方蒸汽,换算KW数要多少KW能量 φ76的管道,压力0.5Mpa每分钟流多少方水 如何提升氢气燃烧火焰温度?需要添加何种助燃剂?在纯氧下一般温度为2860度,现需要提高到3400度以上,谢谢QQ123WE的建议,在此说明的是用于切割金属,现用添加汽油可提升温度,但现想找一 不同压力下水升高1摄氏度需要的热量一样吗蒸汽锅炉里的压力大约是1MP,50摄氏度升到80摄氏度需要多少热量?和在标准大气压下一样吗? 管道φ219,压力0.4-0.5MPa流量150m3/h需提高压力1.0mpa用多大管道增压泵 氢气,氯气,氧气A汞蒸气B水蒸气C碘蒸气D酒精蒸汽选出和上面三种同一类的物质,并说明理由 如果3个溢流阀依次串联联接,且它们的调定压力依次为6MPa、4MPa、7MPa 那么液压泵的出口压力为多少? 给水管道试验压力是如何确定说明其合格标准 非金属性氧大于氯气,为什么氯气与氢气反应比氧气更容易 反应釜机械密封压力怎样调节,使用什么测量,依据什么来调整 请问进气管道压力5MPa 管子直径10毫米,忽略阻力,求1小时流量是多少?出口0.1MPa,空气,管道长度1米 氢气 氧气 氯气氢气 氯气 氧气 的混合气体 点燃,恰好完全反应,冷却至室温,所得溶液溶质的质量分数为25.26%,则原容器中氢气,氧气,氯气的体积之比为多少? 溢流阀的选择 我做实验用的,液体压力要维持在3mpa,4mpa,6mpa等,溢流阀选哪种合适呢,可调可控就是我设定一个值,到达那个值后就溢流,不到继续上压 差压变送器测流量用的温压补偿公式设计温度和设计压力是怎么来的?有没有通用数值的?我们厂的煤气管道就是露天的,夏天最高有45度,冬天最低-5度吧.另外是不是说不同的管道这2个参数不同 氢气 氯气 哪个和氧气更容易反应 在精馏操作中,塔釜压力为什么是一个重要的参数?塔釜压力与什么因素有关? 孔板流量计为什么要加压力补偿和温度补偿 氧气和氢气的混合物,采用降温液化的方法分离,首先液化的是__________. 很多地方提到高压反应釜,到底承受多少压力才算是高压反应釜.有高压就有中压和低压吧,如何区分? 孔板流量计上的NM3是什么单位 氢气燃烧与氢气液化的本质区别是什么? 酯化反应釜操作压力问题我设计的反应釜酸酐进料压力0.1Mpa,醇进料压力i0.1Mpa,出料0.9Mpa.1.搅拌釜内操作压力是0.2Mpa还是0.9Mpa呢?2.夹套内用水蒸气加热,工作压力是该温度下水蒸气的饱和蒸汽压 谁讲一下跟孔板流量计相关的知识, 木炭,镁粉,氢气都能在氧气中燃烧,其变化的本质和现象有不少共同之处木炭,镁粉,氢气在氧气中燃烧的共同点(1)_________________________________(2)_________________________________(3)________________________________ 搪瓷反应釜、搪玻璃反应釜的性能 请问孔板流量计的测量原理? 木炭、镁条、白磷、氢气、四种物质都能在氧气中燃烧、其变化的本质和现象有不少共同之处、如:反应都需点燃、反应物都有氧气等、再归纳出三点、 压力反应釜正负压怎么做 孔板流量计安装条件孔板流量计(流量计油表)安装管道在安装的时候有没有什么条件 沼气在常温下能不能液化沼气在常温下能不能被液化?详细一点 什么样的压力容器需要型式试验,搪玻璃反应釜需要吗?新容规上说蓄能器等需要做型式试验,这个等包括反应釜吗? 在标准状况下1mol任何气体的体积都是22.4L那么在标准状况下11.2L氢气中的分子数是多少个 常温下使甲烷液化需要多大的压力?安全标准是什么?谢谢!RT 带夹套的不锈钢反应釜是不是需要检测的压力容器?蒸汽加热,需要温度105 容器内为常压,所需蒸汽压力2公斤请提供解释或依据夹套内为水蒸气,容器内为水和肉(猪肉、牛肉或羊肉),它是低压 在标准状况下,1mol任何气体的体积都是22.4L.那么,在标准状况下,11.2L氢气中的分子数是几个 氧气和氢气,哪个容易液化请说明理由 哪里有沼气液化的设备?哪里有沼气液化工程? 搪瓷反应釜是几类压力容器 氢气氧气液化条件氢气需要多少pa的压强才能液化.氧气呢. 沼气能液化吗?沼气如果直接用高压瓶装后还能用吗?建沼气政府有补贴吗? 半管加热的反应釜是否属于压力容器? 为什么氨气易液化 ,而氮气和氢气通常情况下不易液化? 氧气在多大压力下可以液化?一般的医用氧气,纯度达到99%.99以上的氧气,在多大的压力下可以实现液化?这个压力大约等于多少公斤?我还想问下,在一定的压力下,氧气可以通过加压的方式实现缩 甲醇对20号压力容器用钢材有没有腐蚀性? 天然气`液化石油气`氢气有什么共同性质 氢液化的温度是多少?常温下将氢液化的压力是多少?等于多少个大气压氢气在室温下不可能液化的话,那市场上买的那种氢气钢瓶里装的液态氢不是会爆掉吗? 求一反应釜各管道连接图 氢气密度小,为什么会很难液化RT..密度小应该更容易啊. 供暖压力达到多少才能保证供热效果 压力表连在管道上,为什么压力表与管道连接处之间管道是弯成一个圆的样子 氢气在空气中燃烧会怎样;在纯氧中燃烧有会怎样?一般我们用什么方法制造氢气,如何收集氢? 采暖总热负荷 循环泵流量 电机功率的关系? 管道压力表怎样装 1.氢气在空气中燃烧颜色(),在纯氧中(),氢气纯度为100%时()2.一氧化碳在空气中燃烧颜色(),在纯氧中(),氢气纯度为100%时()3.写出C、CO、CO2、O2之间所有能发生的的化学方程式感 按流量供暖怎么计算 请问有没有关于化工设备(比如精馏塔,反应釜,管道等)的国家标准可查?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn