《医学信息技术基础：第8讲常用控件-2》由会员分享，可在线阅读，更多相关《医学信息技术基础：第8讲常用控件-2（31页珍藏版）》请在金锄头文库上搜索。
1、医学信息技术医学信息技术计算机科学教研室计算机科学教研室计算机科学教研室计算机科学教研室. . . .信息工程学院信息工程学院信息工程学院信息工程学院2016201620162016年年年年4 4 4 4月月月月医学信息技术WangL.要点回顾要点回顾应用程序设计基本步骤应用程序设计基本步骤窗体操作窗体操作常用控件常用控件适用场合适用场合常用属性、事件、方法常用属性、事件、方法参考例参考例4.7 4.82医学信息技术WangL.3第第8讲讲 常用控件常用控件-2医学信息技术WangL.引例引例使用分组框和面板控件实现控件布局使用分组框和面板控件实现控件布局使用计时器实现定时动作和重复动作使用计
2、时器实现定时动作和重复动作使用图片框、使用图片框、Treeview、DatetimePicker等控件实现特别效果等控件实现特别效果4医学信息技术WangL.1 窗体界面的布局分隔窗体界面的布局分隔分组框分组框面板面板直线直线控件对象布局相关属性控件对象布局相关属性5医学信息技术WangL.1.1 分组框分组框GroupBox容器型的控件，用于对窗体上的控件进行分类整理容器型的控件，用于对窗体上的控件进行分类整理主要属性：主要属性：Padding：指定控件内部的间距：指定控件内部的间距Text：与控件关联的文本，：与控件关联的文本，Text的内容为空时，的内容为空时， 框架是封闭的框架是封闭的
3、Visible：True/False，设置对象是否可见，设置对象是否可见6医学信息技术WangL.1.2 面板面板Panel面板控件的属性与分组框控件相似，但提供了面板控件的属性与分组框控件相似，但提供了滚动功能，当需要在固定大小的视区内浏览诸如滚动功能，当需要在固定大小的视区内浏览诸如大图片的文档内容时，可以使用面板作为容器。大图片的文档内容时，可以使用面板作为容器。AutoScroll：True/False，指示当控件内容大于，指示当控件内容大于它的可见区域时是否自动显示滚动条它的可见区域时是否自动显示滚动条BorderStyle：True/False，指示是否具有边框，指示是否具有边框7
4、医学信息技术WangL.添加到同一容器内的所有单选按钮处于同添加到同一容器内的所有单选按钮处于同一组，此时只有一个单选按钮可以被选中一组，此时只有一个单选按钮可以被选中为了将多个单选按钮分在不同组，应使用为了将多个单选按钮分在不同组，应使用分组框或面板容器分组框或面板容器8医学信息技术WangL.1.3 直线直线LIneShape主要属性主要属性BoderStyle：获取或设置形状或线条控件的边框：获取或设置形状或线条控件的边框样式样式 X1,Y1,X2,Y2 设置起点坐标和终点位置坐标设置起点坐标和终点位置坐标BorderWidth：设置或设置线条或形状控件的边：设置或设置线条或形状控件的边
5、框宽度框宽度9医学信息技术WangL.1.4 控件对象布局相关属性控件对象布局相关属性AnchorDockPaddingLocationSizeMinimumSizeMaximumSize10医学信息技术WangL.例：界面布局例：界面布局书书P114 技巧：获得单选的结果技巧：获得单选的结果Radiobutton1.Checked属性属性Radiobutton1.text属性属性11医学信息技术WangL.2 图片框图片框PictureBox图片框控件用于显示图形（图像）图片框控件用于显示图形（图像）文件格式有：文件格式有：位图（位图（.bmp、.dib、.cur）图标（图标（.ico）图元
6、文件（图元文件（.wmf）增强图元文件（增强图元文件（.emf）JPEG或或GIF文件文件12医学信息技术WangL.2.1 显示图片显示图片1. .imgfromfile (“路径路径图像文件名图像文件名”)2.Load(“路径路径图像文件名图像文件名”)例如例如绝对路径绝对路径:PictureBox1.image=image.fromfile(D:VBImageCheck R1.jpg)相对路径相对路径PictureBox1.image=image.fromfile(“. R1.jpg) 使用前提：必须把相应文件放在使用前提：必须把相应文件放在BINDEBUG下下13医学信息技术WangL
7、.2.2 常用属性常用属性SizeMode ：控制：控制PictureBox将如何处理图将如何处理图像位置和控件的大小像位置和控件的大小BorderStyle：控制：控制PictureBox应具有的边应具有的边框类型框类型Image：在：在PictureBox中显示的图像中显示的图像14医学信息技术WangL.SizeMode属性的取值属性的取值NormalAutosize：以图像原始大小显示Stretchimage：将图像的大小适应图像框Centerimage：Zoom：按比例适应图像框15医学信息技术WangL.例：图片阅览例：图片阅览在医院信息系统中，海量的图像信息经常在医院信息系统中，
8、海量的图像信息经常需要进行诊阅和处理。利用图片框和按钮，需要进行诊阅和处理。利用图片框和按钮，创建一个简单的诊阅影像片的应用程序，创建一个简单的诊阅影像片的应用程序，要求可以提供看原片的功能，可以对片子要求可以提供看原片的功能，可以对片子旋转和缩小阅读。旋转和缩小阅读。16医学信息技术WangL.17对象属性设 置PictureBox2SizeModeAutoSizeVisibleFalsePictureBox3SizeModeStretchImage医学信息技术WangL.装入图片装入图片18Private Sub Button1_Click( ) . PictureBox1.Load(d:
9、R1.jpg)End Sub医学信息技术WangL.图片旋转显示图片旋转显示19Private Sub Button3_Click(.) PictureBox3.Image = PictureBox1.Image PictureBox3.Image.RotateFlip(RotateFlipType.Rotate90FlipNone)End Sub医学信息技术WangL.图片缩放显示图片缩放显示20Private Sub Button4_Click( ) Dim x As single x = Val(InputBox(“设置缩放比例系数设置缩放比例系数x=) PictureBox3.Heig
10、ht = int(PictureBox1.Image.Height * x) PictureBox3.Width = int(PictureBox1.Image.Width * x) PictureBox3.Image = PictureBox1.ImageEnd Sub医学信息技术WangL.21显示原图显示原图Private Sub Button2_Click( ) original.PictureBox1.Image = Image.FromFile(d:R1.jpg) original.Show()End Sub医学信息技术WangL.3 计时器计时器TimerEnabled：True
11、/False，是否对象产生回应，是否对象产生回应，设为设为False时停止计时时停止计时Interval：设置计时器触发：设置计时器触发Timer事件的时事件的时间间隔，计时单位为毫秒（间间隔，计时单位为毫秒（1/1000秒）秒）Tick事件。每当事件。每当Timer控件计数到达控件计数到达Interval设定的时间间隔时，自动触发设定的时间间隔时，自动触发Tick事件。事件。22医学信息技术WangL.例：计时器应用例：计时器应用利用计数器控件、标签增加一个当天日期时利用计数器控件、标签增加一个当天日期时间的显示间的显示属性设置：属性设置：Timer1：Interval 10Tick事件：事
12、件：Label.Text= TimeOfDay23医学信息技术WangL.例子：动态图片例子：动态图片技巧：技巧：控件在屏幕显示时的坐标控制控件在屏幕显示时的坐标控制24医学信息技术WangL.25Interval ： 100 enabled: TRUE|FALSEPrivate Sub Timer1_Tick( ) Handles Timer1.Tick If PictureBox1.Left + PictureBox1.Width 0 Then PictureBox1.Left = PictureBox1.Left - 5 Else PictureBox1.Left = Me.Width
13、End If End Sub医学信息技术WangL.4 树视图树视图TreeView常用属性：常用属性：Nodes、SelectedNode、ShowPlusMinus常用事件常用事件AfterSelect常用方法常用方法CollapseAllExpandAllEndUpdate代码示例：代码示例： 4.626医学信息技术WangL.5 日期时间日期时间DateTimePicker获取用户选择的日期和时间信息，获取用户选择的日期和时间信息，常用事件：常用事件：ValueChanged示例：示例：P124 例例4.927医学信息技术WangL.6 滚动条滚动条HScrollBarLargeCha
14、nge：设定单击滚动条或按：设定单击滚动条或按Page Up或或Page Down，滚动框位置变动的幅度，滚动框位置变动的幅度SmallChange：设定鼠标单击滚动或按箭头时，：设定鼠标单击滚动或按箭头时，滚动框位置变动的幅度滚动框位置变动的幅度Value：滚动框位置表示的值：滚动框位置表示的值Maximum：可滚动范围的上限值：可滚动范围的上限值Minimum：可滚动范围的下限值：可滚动范围的下限值28医学信息技术WangL.本讲要点本讲要点控件布局控件布局图片框图片框计时器计时器树视图树视图时间控件时间控件滚动条滚动条29医学信息技术WangL.课后预习课后预习通用对话框通用对话框鼠标键盘事件及其应用鼠标键盘事件及其应用菜单控件菜单控件状态栏控件状态栏控件30医学信息技术WangL.课程资料下载课程资料下载31https:/ （提取码：（提取码：dec9）
