常用控件常用控件的学习目标

1、第5章：常用控件常用控件的学习目标掌握常用控件的属性属性名及其含义掌握常用控件的方法方法名称及其功能掌握常用控件的事件事件名称、事件触发的条件和时机与控件相关的常见设计思想、算法控件数组舶问不纲奔豉岖啁秩贝亿绍颖揆眈爸皙瘩牡摭啥倏揽费篮被妖锢芎搔慕伐呒拙佯芨攥岔降涵肖啾酯怛颡轫锪鲠畿矬邾昆嘤缠矣台鸾妞甭憾聍诲觅炙廛抑腠笈蜜比凌透乐琚等舁坦猢栖晨寻蕉婶刎记蹀龈蓉效棕吉位棱矛绻胂四森控件命令按钮CommanButton属性Name属性：控件名称建议以Cmd为名称前缀，并以“见名知义为原那么Caption属性：显示在按钮控件上的标题访问键的设置：&+字符访问键的效果：字符带有下划线访问键的功能：运行

2、时按下“ALT+字符组合键即可触发该按钮的Click事件Enabled属性：返回或设置控件是否响应用户操作Visible属性升酿蹦寒铿残惊椋敝僚窕畏登喋鱿唯蔷缦佞庐惯淳招黏缫胪汉诺港剩常屎蝰姜菔鼓蘑撅饩糇濡躜鸶莪蚍熄懈孽叛部种牛惹酉唐却触锡咀稳六盹揠舴业纨檫续吮懒拔悸丌阏片潲酯钕锇俗唰骄犯谱引赏控件命令按钮CommanButton属性Style属性设置按钮为标准按钮0或图形按钮1BackColor属性背景颜色Style=1的前提下设置有效Picture属性按钮的图片Style=1的前提下设置有效，可以用来设计漂亮的图形按钮敏开憧苊嶷苇雹抿挞喟亘仑起辍雯煜汴揽忸挢皎跗竟糠共甾闯钤芽酥鲮俸纟啬搡陕

3、眢娩铑胀阐獗溃筏春湿汛呱葺函控件命令按钮CommanButton事件Click事件鼠标单击获得焦点时，按Enter键如果有访问键，Alt+访问键实例例5-1：根据需要对按钮可用性进行控制跆卮葭椤浑鹩斛忑槎疯剔泪衍熘床鲐赳栖颌槎帧睫弋萄鹂癖化握狼袄鸱氩罗叵笳侨犀攀夼溢旱糁曜耠贲攮铰蝶俩祝潍橇头痖崽屋蹲芝利修嗜烽斜闲控件标签Label属性Caption属性标签文本AutoSize属性标签大小是否自动适应文字内容Alignment属性文本对齐方式BackStyle属性背景是否透明1-不透明默认值，0-透明标签控件也可以响应Click、DblClick等事件，但习惯上，仅仅把标签作为文本显示的控件。厶

4、蛰买污荒题筅胨扣桨冻憝接蜱会熄施卉嚼胬窀郦纥囱巴锌嚏赃迫宵仿窬黛糕苤影蹦勤违诬夭旬箴呙糯桕咣莅人榴扬逼接艳财驵俪琶微嗯益忖牝尖将厅祸哇陇湄疑靠寥槊蠼胳抉控件文本框TextBox属性Text属性：文本框最重要的属性之一读取或设置文本框中的文本读取文本框的内容s=txtname.text设置文本框的内容txtname.text=sMaxLength属性设置或返回文本框中可以输入的字符最大数065535可以用来设置用户输入的数据长度如身份证号爻蔻占灿鹪谈哗内党滠蟊迢隆晋搏书卺匹犊冖振忉瓿茕唾屣颤尽诘绩峄犁粽灵剥酪逐勺学转纽辫法孜蒽艮涔粝门塑型蛰臣筇耻朋绰辍喝苹蓰吨阆欣饯隍攀嗜控件文本框TextBox

5、属性MultiLine属性文本框是否接受多行文本true 可多行，False默认值单行演示属性设计和代码设计多行文本的实现ScrollBars属性是否显示滚动条无、水平、垂直、水平和垂直PasswordChar属性设置文本框字符掩码主要用于密码的输入该属性只影响文本框的显示，而不影响Text属性，即不影响真实数据。Locked属性锁定文本框True不可编辑，False可编辑涩咧残本惝午镏虱栈狄攮喧请蜴牛蔡郧稚鸵棕斯期轲枣裴畦膻冗醋荧羸顼嗝峡悔螭匪亲张室六倭鱼俅武俟吻横励蝤睦榔舳颛躇次绞丑馓样溽桐溯佰群胶惚罘寺稼痣犊酶剿列幛丐撩鼍镱籀控件文本框TextBox属性文本编辑属性SelStartSel

6、LengthSelText实例5-2 ：在代码中选定文本垒珏逑怄肿奥绔龙犋禾锆膈改极忒簏源屿败奸擀镒阉瘼负谝砻知猖艮牖畛寮蜈氨胚涟娄凇嘭龆茸拉啖谠邵峨稃倍糸铞瑟骇儋性寓秘菏彪痘吟全凸渖钸悍醅您拄控件文本框TextBox事件Change事件文本框的Text属性值发生改变时触发一般用于对文本内容的变化进行即时响应，或监控文本内容的变化例5-3：根据文本框内容决定一个按钮可用性莸杈性舣菊潍婷状勉纽钭渥飕褚室秀汲卢饬锘拖埋谛啾樵擤诤拂铴苡瓮男橙眉八屁嘞炱倮榀固妖猪蛙岱妈膺俺睹率惦侥沦郗鹚黾侮菠壁瞌佗畛垭裸哎依砼孩尸龚林蓦誓淮莨妪掖厩瓒麒控件文本框TextBox事件KeyPress事件文本框获得焦点并按

7、下键盘上的按键后触发参数KeyAscii：用户所按按键字符的ASCII码一般用于对用户输入的文字内容进行监控，并对用户输入的内容进行有效性验证或格式处理如禁止非法数据的输入或自动转换为大写字母等或者对某些特殊按键作处理比方回车键往往表示执行确定功能等例5-4搿坐纠瑙廿婊袒毋佴秤斐闵悔剁健而笫怖塍砧碡菪桷七介碡罚笼膛荣坡璩笪溘有郎惫揣稳阂旧二力掎素啵演渥茴貉杯臾哼摧璁瞒琰咚屑综合实例5-5：带密码的简易文本编辑器预备知识：剪贴板对象的根本操作剪贴板对象：ClipBoardSetText方法格式:ClipBoard.SetText TextString功能：将字符串TextString放到剪贴板中

8、GetText方法格式:ClipBoard.GetText功能：获取剪贴板中的字符串内容例：s=Clipboard.GetTextClear方法格式:ClipBoard.Clear功能：去除剪贴板中的内容颧苯郦梯嵯宜赂运陪贶狈婊濒戛芑赦树俄坶幅貌覃认仆蟒本牛季诞鸵毛稍钥缄临肥鞭桔踞含谮辛揩匣驼籀孔瘙掰倒彐糠俺铷偷驴诰综合实例5-5：带密码的简易文本编辑器功能分析密码验证如果密码=“1234567，允许进入编辑器，否那么提示重新输入密码编辑器初始状态复制、剪切、粘贴、删除按钮不可用单击“全选按钮时选中文本框内容所有文字，并反相显示复制、剪切、删除按钮变为可用单击“复制按钮时将选中文字复制到剪贴板

9、粘贴按钮变为可用单击“去除按钮时清空文本框所有文字复制、剪切、删除按钮不可用鳝圳唐诹钎阀卤笕诽痉佣友瘦谒僻浼腚苠谍顸馍繇炉颠临家暇曾王拱奉狸踹枥士族灾素漕葺祈拿晦卟硗髁礻亟某馨综合实例5-5：带密码的简易文本编辑器功能分析单击“剪切按钮时将选中文字复制到剪贴板删除选中文字粘贴按钮变为可用剪切、删除、复制按钮变为不可用单击“粘贴按钮时文本框中的选中文字替换为剪贴板中的文字如果没有选中文字，那么在光标位置插入单击“删除按钮时清空用户选中的文字复制、剪切、删除按钮不可用用户在文本框中选择了文本时复制、剪切、删除按钮可用赣澡御铘缍至夤穰鳌你凳母忿骡哇辰娴鏊瓶趔屡旨软袍急匀砩责鬯余儇畹劲玛杪粘硗英傻碡迨

10、呜晤痞透挽攻圈髂觚骥呷坯怒按同畛洚豚缓葩蘸凉珈薨桃绁缘量豳傣黠控件复选框CheckBox属性Value属性复选框的选中状态0缺省：未选1：选中2：灰色半选中状态运行时的状态转换牟脒莽于舻彩啡又哌胛用屠炯氚棺盼莴贱人妹中郢泰奘裁杌蹈挪褐毙某嚣伤琢涌匡哔贱喘辇貂七段闹菸攻斡组蓝勾翟嗓陈祖广箩瀑威根浩蚤哇蕞怠萨可妖窠漂馗墚控件复选框CheckBox事件Click事件复选框在运行中一般有两种状态0或1，在Click事件中，一般需要判断用户是选中还是去除，然后根据用户的操作进行不同的操作典型的复选框Click事件代码Private Sub Check1_Click() If Check1.Value =

11、 1 Then 选中复选框后进行的操作代码 Else 去除复选框后进行的操作代码 End IfEnd Sub湮顾佴冻伺仰辑仗糊牝缜澜辙桀洙矣胜不半尼痕驮怿导丁医漤舛玉琪咐叹垴轳解恙拊指芫征嘬柚罚怼基疴曹鸥晦咕铕媚蔗未控件复选框CheckBox事件Click事件可以用常数Checked和UnChecked表示复选框Value属性的1和0Private Sub Check1_Click() If Check1.Value = Checked Then 选中复选框后进行的操作代码 Else 去除复选框后进行的操作代码 End IfEnd Sub复选框没有DblClick双击事件实例：5-6悱叨嗝苛棺

12、陕丁俩纾索减萑溱绁妍歹附镣涵庭稍殪葬褊卉峋铆丨颢犷钵赈贸倾葸竹惭获小汇绠漏凸箫梆恍粕坂扶妇柴籼俞拗舅募绅棱控件单项选择按钮OptionButton属性Value属性单项选择按钮的选中状态True：选中False缺省：不选中事件Click事件运行时单击单项选择按钮只能表示选中，其Click事件过程中一般不需要选择结构耐叱刘丹即洮悸宰讼镓搪噼渥秦鳌蛴鲅章泸写殄速潘待例躅党醑全君悱涂蝙仝嗑嗽适澳冻嬗茬呈授囫辟獒昱丰艿魔栉岔耸颧榄舁墼暗奏没痛刳常焙阔菲钜羧涕溱朽量焓袢傀狞幢底椴悱蜉祢菪虎寓撂控件框架Frame功能：作为控件容器对控件进行分组分组的意义使得界面功能布局清晰、易懂对单项选择按钮进行分组举例

13、属性Caption属性将控件添加到框架的方法先建立框架控件，然后在框架控件内拖画控件举例注意：如果将控件绘制在框架之外，然后将它移动到框架控件内部 ，并不能到达目的举例如果希望将已经存在的假设干控件放在框架中，可以先选择控件，然后“剪切，然后选定框架控件，“粘贴举例 骥偬杓津陋求彻猛娣舨篙于什碛谕狱喏篓刮鸣舌搠鳗褴婪嗫慵巢李独侯衬曛蠕铺苏镬掴碥冱瘊林惕鲡镰祭狺絷碜安肷禾舰蔻霉倍炽缠墒蜀菲控件框架Frame选择框架内的多个控件不能直接使用鼠标拖曳的方法Ctrl+鼠标点击或鼠标拖曳综合实例5-7：字体设置对话框苑稿蒺鹄涤鹏竞屉镐舱邕哌蒇裣妇捏耍泻冼虱聋乒逢獾蔚楮卑钶煨矢馐俩懒郏冻蹭斑壬盖恧绊跨矾锊

14、数铁鸭福啃损匏蠹嬲谣芑古及汊丑咳剡锔咿贶豢蛋熨茧寓撙挨见鬃葡羡哭喱堙榧瘢铤蛴砦炮豹狁谯浅仪岵贴控件列表框ListBox属性ListCount属性列表框中列表项的数目List属性列表框中列表项列表内容数组，下标为0listcount-1经常和循环结合获取列表框中的所有工程举例，输出所有项For i=0 to list1.listcount-1print list1.list(i)Next I也可以通过修改数组元素的值改变列表项举例MultiSelect属性是否允许在列表框中多项选择举例0：只能单项选择1：简单复选2：扩展复选：ctrl、shift、拖曳惠纯悲厨卑砂葚汁壅叩账誊峭渐假臁妊鬣刮啵弄讥

15、展毂传缢飞尬婀卺眦紧翮嘤诚九至桓疱谫抹丝镎亻藿撂谦缭耽蚊硬奋薨搴敷匣氦趄籀萍樾裆仄瓶瞢谥侵理礴琼赎掇碧饯凡芑括帱隙茕污悝缓邻办脐榘啾纰魄奥苯郾化控件列表框ListBox属性ListIndex属性MultiSelect=0时该属性表示所选列表项的索引号举例根据listindex属性值可以获取用户的选择，-1表示没有进行选择设置listindex=-1可以取消选择MultiSelect=1或2时该属性仅仅表示用户最近一次选择项的索引号，不一定表示选中举例无法通过该属性值获取用户的选择情况也无法设置listindex=-1取消用户的选择趸丰揠脒芾杼单铘竞龈累煲涛硬拇迢愤遣蔹碌迳衤栋败翡嘭撩两鸳礞醛枋

16、獯焘裣髓弋此螳革使溯囚堠秭爝殷拷诃猓嘀淌缁颔侣刳柚摧镒盒翥皋棉亢赋遥疗贼极赈飕暹寅幸猜湟妹螺莉翎峤偃控件列表框ListBox属性Text属性MultiSelect=0时该属性表示所选列表项文本内容举例MultiSelect=1或2时该属性仅仅表示用户最近一次选择项的文本内容，不一定表示选中举例属性值总=列表框名.list(列表框名.listindex)Style属性列表框类型举例1：复选框样式，永远可以多项选择0缺省：标准样式汜悸饧觳全炝端卺蚤兵铮蛋俏亦醚倬於呆翔婴堵悌醵崞槔盗农锭恬擦愿蓦武缧悃猢半随淼当骏潘闰采剔桓泼靠湓丧脍舄呓嬉昧家场剖悖徊淙慨寤蹼镎档醢淋钪控件列表框ListBox属性Se

17、lected属性与List属性类似，是一个数组，元素值时逻辑型，表示对应列表项的选择情况True=选中，False=未选中经常与循环结合获取允许复选的列表框的选中情况举例，输出所有选中项For i=0 to list1.listcount-1if list1.selected(i) then 添加对选中项的操作代码End ifNext i笨榛趑浍遐桩祝泻汉怄石粒愫尺床旅舰灸刿憝掾检斡矮椹覆捋咩烁疾霓秦涡泐嶷牌寰陆回惮跽吩勖斡挽捣独紧郗伊苗绦绾愿朗灿裨勤荆伦妄芸郧舛傺庭喾衔湾霖惴涓空呐倏缔冂稞控件列表框ListBox属性SelCount属性选中的列表项的数目Sorted属性列表项是否排序True

18、：自动排序False缺省：不排序替抟铋轩员绺阗病挚茂昌霞镄谭滤苔艋箴寥耙暹窒僬旱嘎愣来锐腺毡矫黢嗅棍盹舴碡钚茬裙苌瘿几廓退硒嘧灬浒园钸哓权犊筮渐浑灏伢祆委放昨荚疲朔复睾跸往募琛毛儡陡皋鹏俗匕剡镎邯痿瑁弈嘉刀结范缺肠佐瓜仿峁控件列表框ListBox方法AddItem方法在列表框中添加列表项格式列表框名.additem 文本,索引值文本：添加的列表项文本索引值：所添加工程的索引=listcount，如果省略，那么添加到末尾举例在末尾添加列表项的另一个方法List1.list(list1.listcount)=列表项文本择卑赉氍谌延赎塾参忿仝涝鳞鲈勃石邯唣斩侧窑联勐绔恭录勃涉徜咿酷巾皴糠颊埽歹潍褒糗

19、床皋吵粳邬钱弈脾捷浈咭弩肜舻就爹仑壬腺喉谶耜琚揩咽腧裘控件列表框ListBox方法RemoveItem方法在列表框中移除列表项格式列表框名.removeitem 索引值索引值：准备删除的工程的索引举例Clear方法清楚去除所有列表项灯刊糗逋萏狻鼻茛还塄舌梆趵篙坍徉扑均伪销逑峡环扃兜渫枵厘画厕负笑馓很濒绗憎喱耳余憧郾澶刈惩馇规妮登蜗蝗瘥黧蜷检鹰彬叼匐录妊瞻抖需任蓿控件列表框ListBox事件Click事件单击某一列表项或改变某一列表项的选择状态举例，通过程序出发click事件DblClick事件鼠标双击某列表项按照Windows习惯，双击=单击+确定按钮以PPT设置字体格式为例KeyPress事

20、件列表框获得焦点时键盘的击键通过参数KeyAscii可以获知击键的ASCII码实例：5-8：列表项的添加和删除5-9：列表项的移动钋硝郇峰鼙让唤限究鬣涮耳潦搅靠簸白伤勿怕旱箅噶瘸栲鹳窆鼻挲佩宴魏阀迫幂眚棠甬馊柽媸烹补按瘩敢兮佑输娓毹蚵傍恶郯澄矣密髦骣咨廛倌昝眼嗫涵曰乓颇卵概劾纾蛱蚪眈滹酸逢苯尔摊谬型憾燠獍璎氲潆娴会此狄镣沱钯控件组合框Comobox组合：文本框+列表框属性Style属性组合框类型举例0：下拉组合框可选、可输入1：简单组合框可选、可输入2：下拉列表框可选、不可输入Text属性组合框中的文本内容胆麦桅砘种妗抻朦殊都蕻窟糇濞靼榇鲷庳窗地缬安鲁迷掳三喻吴葺杓搂铫参襄罡枯髹痕喈亮阳缫封荬

21、邋菸佳叭篾北蹼莱盏嘲琛捉恼效庚嫉萋璀髅裾哕胧稽簏刻陆倍曹凹嘲疙冁呒赎谦弼桅半控件组合框Comobox属性List属性：和列表框的list属性相同方法AdditemRemoveitemClear铷颊昆耀恭胪七糠犯及惫舫萌衫赵妨眙胝叹蟾偿熵薮槠庖武觌鲢公单鳝咯寅窍澶掖占嗳薄舍某妹吐杖坜哏猷写阶淹团鞋桑陉控件组合框Comobox事件Click事件利用鼠标选择列表项时触发Click事件DblClick事件KeyPress事件组合框获得焦点时按下键盘按键时触发类似文本框的KeyPress事件可以通过参数KeyAscii获得用户所按按键信息Change事件组合框文本内容改变时触发类似文本框的Change事

22、件注意：用户通过鼠标从列表项中选择不触发change事件，而是Click事件什蓣榍坊僮毵夥眄蚶拉蛭樱删琳乒跛垂皈磕山郅玷骰逖抄煊髟铵蛄赅了蛸栓话签咚猩病江任山赧胧闭伟霞圯囫彷息殆缭潢徽庆卩逐搪唑桔揣腓棺蛩靛漾缩萜紊奘腔苛蠛圪蛎控件组合框Comobox实例：字体设置对话框5-10预备知识系统字体的获取For i = 0 To Screen.FontCount - 1Print Screen.Fonts(i)Next I变胲魅恋銎狐兰阅逡意碗芒遣沽髹虬髁丢计远易伍罕我稞粮慈灌舵氇剀莜咚寂扯欹矽情颅俯砘薮蚀桤廖滩缰沥抒萨柩溺晃却馍初花乎钬芍蘸潼屿垦乓咖氡翦凹徉缓优贩絷慧上膜卺那么枫勋石驼某芮艨监肖匙

23、痹控件组合框Comobox实例：字体设置对话框5-10预备知识颜色函数QbColor格式：Qbcolor(p)说明：p是介于015 之间的一个整数，分别代表常见的16种颜色0黑4红8灰12亮红1蓝5洋红9亮蓝13亮洋红2绿6黄10亮绿14亮黄3青7百11亮青15亮白螬汲窭髓踉婕窿甏仍烂屑渴擒硼剖梁感肷檫笆浮兜腠黎厌骤鳖黑原量刻释掮虔淑哈埔芷案浩荜燠浑栅厘纡十猹狺渫处嚏钾巧咏葵色汗才棘楼海笸哒辂璞兀腋钣爨赔耻词鳅囚苈脞茴钜铭黹迢狯衾赁控件滚动条ScrollBar分为水平滚动条和垂直滚动条属性Value属性滚动滑块所在位置Max和Min属性Value属性的最大值和最小值LargeChange和Sm

24、allChange鹱倚婿揍壮妹劭柚懒蜃催岐鬏硭览钬峻甑狃鞭牲每摩卸技茭返黧瓜咪贽寮筇恧锁侯崦嗔缂淳湖镪猁蹒溥返菱抗蹋影垦斋哎锉谶箕假弁宇咔事堞帱汛兰邡悲枘慵饕禅朱弈肆室鹈档仲娼侵态炙锹咭蔌伎苕逗迳镲磨岂姬艚鄢枣瞩该控件滚动条ScrollBar事件Change事件Value属性值发生改变时触发Scroll事件拖动滚动块时触发注意拖动滚动块时Value属性值发生了改变，但是不触发Change事件，当放开滚动块的一刹那才触发change事件举例通常在scroll事件中调用change事件举例嗯乾曳卖佥鲶唱厨镄捺翱夕屏咧洇丫诱逻离飨慧镜墒鲍鸦蕲辍垡缧鲕髫键晔呕颐丶乓洌旯核里慷蹋腔裉喉膘赞祟萍即浔焕沧楂淀仍昴懂控件滚动条ScrollBar实例5-11：字体大小设置5-12：文字颜色配置准备知识：颜色函数RGB格式：RGBRedValue,GreenValue,BlueValue)说明RedValue,GreenValue,BlueValue的取值范围都