国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁(yè) > 學(xué)院 > 開(kāi)發(fā)設(shè)計(jì) > 正文

用SendMessage函數(shù)實(shí)現(xiàn)VB程序的查詢功能

2019-11-18 17:43:54
字體：大 中 小
來(lái)源：轉(zhuǎn)載
供稿：網(wǎng)友
在API文本瀏覽器里，當(dāng)我們?cè)谒阉鳈谳斎肴我庾帜福翱捎庙?xiàng)”里以該字母開(kāi)頭的項(xiàng)目以高亮顯示以引起我們注意該項(xiàng)是不是我們所需的。象這樣的功能一切提供搜索選項(xiàng)的程序都應(yīng)該具備。以下例子采用SendMessage函數(shù)實(shí)現(xiàn)這一技術(shù)。
請(qǐng)給標(biāo)準(zhǔn)工程添加ListBox和TextBox控件各一個(gè)，其各項(xiàng)屬性均取默認(rèn)值，然后將下列代碼拷貝到你的工程：

OptionExplicit

'申明API函數(shù)
List1.ListIndex=SendMessage(List1.hwnd,LB_FINDSTRING,-1,ByValCStr(Text1.Text))

EndSub

以上程序適用于單項(xiàng)目為多個(gè)字母的查詢，但必須注意，在TextBox的KeyPress事件中要作相應(yīng)的改動(dòng)。->

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板： 桐柏县| 巴中市| 庆阳市| 新宾| 邳州市| 拉萨市| 抚远县| 赤壁市| 曲麻莱县| 平顺县| 扎兰屯市| 渑池县| 兴安盟| 加查县| 大同市| 苍溪县| 兴海县| 张家港市| 堆龙德庆县| 麻城市| 湾仔区| 宽甸| 当雄县| 霞浦县| 福安市| 遵义市| 治县。| 宝应县| 前郭尔| 平和县| 青浦区| 德江县| 通化县| 安龙县| 郁南县| 澄城县| 鹤峰县| 卢氏县| 罗城| 桐梓县| 泗洪县|