VB常用标准控件(一)

，这种共同控制的形式，陈耀清是在三亚、北新经济、市场和国际贸易中被Xi理工大学1。标签2。文本控件3。定时器4。命令按钮5。组合框6。单选按钮7。复选框，陈耀清摄于太湖(2001年2月)，8。微调按钮9。图10。表格11。命令按钮组12。第13页。形状14。行，本章的主要内容。6.1文本控件2003年8月由陈耀清在三亚海滨拍摄的标签和文本，通常用于在程序运行过程中显示恒定的文本信息，并经常用于标记不具有标题特征的控件。标签控件的图标是标签的默认名称，其中“x”是建立文本框序列的序列号。例如，对象名称：标签1、标签2等。标签的属性可以分为一般属性和其他属性。其中，公共属性是许多控件共有的。6 . 1 . 1 label Table，general property，适用于控件，如ableText(无标题)formcommandpictruemage。控件的一般属性总结如下：标题显示对象名称对象名称字体粗体斜体字体名称字体字号下划线高度对象高度宽度左上顶上背景颜色背景前景色前景色前景色前景色前景色有效(真有效假无效)可见是否可见(真可见假隐藏)，1。标签1的一般属性。名称和标题名称标题标题(给出标签中显示的文本)。2.尺寸和位置高度宽度提升左页边距上页边距，6.1标签属性，3。字体、字号和字体样式、字体名称、字号、粗体、斜体、斜体、下划线、字体删除线、6.1标记属性，以上属性都是常用属性。适用于标签文本(无标题)格式。标签的其他属性。1.对齐和调整大小对齐0左对齐显示1右对齐显示2中心显示自动对齐自动调整大小保持标题为假保持设计大小。超过个字符不显示文字换行垂直和标题匹配中的真实更改大小水平和标题匹配中的虚假更改大小6.1标签属性。2.外观属性可见对象可见不可见真可见假不可见启用对象有效真有效，清除显示假无效，灰色显示背景样式标签透明和不透明0透明1不透明(默认)边框样式标签边框0无边框(默认)1边框，6.1标签属性。PrivateSubLabel1 _ Click()标签1 . font size=223360标签1.fontname= chinese script 标签1。WordWrap=False 水平改变大小以匹配内容边框样式=0:标签1.backstyle=0 无边框标签透明标签1.forecolor=rgb (0，0，255)标签1.caption=在来自广阔天空的狂风中猿类呜咽着，楚清沙白鲸飞回。树叶像瀑布的水花一样往下掉，长江是不会枯竭的。标签2 . font size=223360 label 2 . font name= Fangzheng shuti label 2 . wordpwrp=false border style=0: label 2 . back style=0 label 2 . fore color=RGB(255，0，0) label2.capture=我已经走了三千英里。带着秋天的悲伤，带着我百年的悲哀，我独自爬上了这个高度。在经历了艰辛和痛苦的仇恨之后，白发布满了头发，酒杯的杯盏也暂停了。 EndSub，示例：标签字体字体字体设置。标题属性。边境。透明设置，PB06，PB07示例：标签字体，字体大小设置，私有子标签1_Click()标签1。标题=信息管理标签1。父级。字体名称=中文行字母标签1。字体大小=40标签1。字体大小=真正斜体标签1。字体下划线=真加下划线标签1。对齐=2个中心标签1。Bor Derstyle=无边框标签1，Derstyle=透明标签1。ForeColor=RGB(255，0，0)将前景(字符)设置为红色endsub和6.1.2文本框，这是一个文本编辑区域，通常用于在程序运行期间输入、编辑和显示文本。文本框控件的图标是文本框的默认名称TextX，其中“x”是建立文本框序列的序列号。例如，对象名称：文本1、文本2等。，6.1.2文本浪费属性，1，文本通用属性：文本框中显示的文本字符(无功能属性)名称对象名称启用有效(真有效清晰显示，假无效灰色显示)可见(真可见假隐藏)字体粗体字体斜体字体名称字体字号下划线下划线高度宽度左顶上顶矩，第二，文本框的其他属性1。外观属性背景颜色前景色前景色(字符)边框样式标签边框0无边框(默认)1边框，6.1标签属性，前景色，背景色，边框和无边框设置效果。最大长度允许最大字符数0允许32k多行文本(默认)多行设置此文本是否换行真允许多行文本假不允许换行滚动条设置文本框滚动条0无滚动条1仅水平滚动条2仅垂直滚动条3水平和垂直滚动条2。文本显示，3。文本框事件和方法。1.文本框的事件Clisk在单击文本框时触发事件。更改文本框中的输入字符或更改或新设置文本框的属性都可以触发事件。当焦点进入文本框LostFocus时触发事件当文本框失去焦点2时触发事件。文本框通用方法：聚焦对象。 SetFocus将光标移动到指定的文本框，6.1文本控件，private子命令1 _ click () command1.move200，8000，1500，700command2.move200，9000，1500，700 text 1 . font name= Chinese script : text 1 . font size=20 text 1 . text=一轮明月挂在首都上空，一万只木槌在敲打。秋风吹起了易道的声音，每个家庭都记得守卫边境的人。哦，鞑靼军队何时会被征服，我丈夫何时会从漫长的战役中归来！“信使将在第二天离开，她被告知，她缝制了一个战士的礼服整夜。她的手指感到针凉了，哪把剪刀？工作完成了，她把它送到很远的地方，它什么时候会到达战士居住的城镇？是的endsubprivatsubtext 1 _ Change() text 1的更改事件Text2。Font name= Chinese line letters : Text 2 . Font size=20 Text 2 . border style=0 Text 2 . Text=Text 1 . textendedsub，PB09示例：命令按钮的移动和定位、文本框的字体和字体设置、文本属性、私有子命令1_Click()文本1。FontSize=20Text1。Text= McRosofVisualbasic endsubprivatesubtext 1 _ Change()Text 2 . Font Size=20 Text 2 . Text=lcase(Text 1 . Text)Text 3 . Font Size=20 Text 3 . Text=ucase(Text 1 . Text)endsubprivatesubcommand 2 _ Click()endsub，6.1文本控制，程序PA03，示例：更改事件，字体大小设置，示例：更改事件，文本属性，文本框的边框样式属性，私有子命令1 _ Click()文本1。FontName=中国航空 :文本1。FontSize=20Text 1。首都上空挂着一轮明月，一万只木槌在敲打。秋风吹起了易道的声音，每个家庭都记得守卫边境的人。边境战争何时才能平息，我丈夫何时才能结束探险。明天早上，骑着马的快递员就要离开了，而那些妇女们则火速赶来为探险队的丈夫做棉衣衣服。她的手指感到针凉了，哪把剪刀？我老婆会把衣服送到远方，我们能到达临洮边境多少次？endsubPrivateSubText 1 _ change()Text 2 . font name= Chinese script : Text 2 . font size=20 Text 2 . border style=0 Text 2 . Text=Text 1 . TextendsubPrivateSubCommand 2 _ click()EndSub，PB09，Text1Text2，PB09，私有子命令1 _ click()ended subprivate subtext 1 _ change()multiline=true 接受多行文本滚动条=3 设置滚动条Text 1 . font size=24 Text 1 . password char=。短信。PassWordChar=*，PB02，Private subcore _ lost focus()x=val(score . text)font size=2033 360 text 1 . font size=20 text 2 . font size=2033 360 text 3 . font size=20 ifx 100 then score . text= score . setfoctext 1 . fore color=RGB(255，0，0) text1.text=请重新输入！elsetext 1 . text=xs=sx : text 2 . text=sn=n 1: text 3 . text=format(s/n， # # #。# 0)-score.text= endif endsub，score，6.1 text control，PD07，示例：text的SetFocus属性，事件，text和label的函数，iv。标签和文本的功能和用法比较，PD07，图中白线圈出的部分为标签，红线圈出的部分为文本，1。功能为：且在程序运行期间保持不变的字符应放在标签中。更改的内容应放在文本中。2.使用标签中的字符实现带有标题属性的：文本中的内容。使用文本属性来实现，例如，标签1。标题=“请输入成绩：”文本1。文本=得分，6.2图形控制。6.2图形控件-图像和图片框，6.2.1图片框和图像框，1。图片框架和图像框架1的比较。图片框架是一个容器，但图像框架不是。2.图片框架可以通过“打印”变成文本，但图像框架不能。3.图像框具有“拉伸”属性，但图像框没有此属性。图像框具有“自动调整大小”属性，而图像框没有此属性。4.图像帧占用的内存较少，运行速度比图像帧快。5.图像框的默认名称是PictureX，图像框是ImageX。PictureBox图像框图标，图像框图标，6.2图形控件，2。图像帧和图像帧的共同属性。namehighttwidthlefttopfontboldfontnamefontsizefandline，enabledvisibleoutoredraw，6.1图形控件，3。图像帧的拉伸属性和图像帧的自动调整属性。1.拉伸属性图像1。拉伸=真实图形自动调整大小以匹配图像帧图像1。拉伸=Falsr图形无法调整2号图像框的大小。自动调整属性图片1。自动调整大小=真实图像帧自动调整大小。图片1。Autosize=Falsr图像帧无法调整大小以匹配图形。图像框没有此属性。privateSubPicture1 _ Click()Picture1 . font size=16 Picture1 . font name= bold Picture1 . autosize=true Picture1 . print 图片框通过打印图片2接收文本 EndSubPrivateSubPicture2_Click()。Autosize=true picture 2 . picture=load picture( l : pic p9 . gif )end sub，pf09picture的Print和autosize属性，运行前(左)和运行后(右)的表单。4.拉伸属性(图像帧的属性)True自动调整图片的大小以匹配图像帧的大小(左)Flase无法调整图片的大小(右)，6.1图形控件，PB04，PB04，IV，加载图形文件，1。格式化位图位图可加载图形控件的图形文件的图标。扩展名为ico或curMetafile图元文件。扩展名为WMF，EMFJPEG压缩位图格式，扩展名为JPGGIF压缩位图格式，扩展名为GIF，(1)通过属性窗口的图片设置，将选中的图形文件加载到图像框、图片框和窗体中。(2)将剪切板中的图片粘贴到图片框或图片上。(3)运行时加载图形文件。格式是：对象。Picture=LoadPicture(“文件名”)“文件名”包括路径、文件名和扩展名。默认路径是当前路径。例如：FM= l : pic B2 . BMP picture 1 . picture=load picture(FM)或：picture 1 . pi