在名称为Form1的窗体上画三个文本框,名称分别为T1、T2、T3,初始情况下都没有内容。请编写适当的事件过程,使得在运行时,在T1中输入病情描述,立即显示在T3中(如图2.1所示)。程序中不得使用任何变量。
图2.1 程序运行界面
实验步骤
(1)窗体设计
单击工具箱中的文本框控件,在窗体上画三个文本框和两个标签。
(2)属性设置
各控件的主要属性设置如表2.1所示。
表2.1主要对象的属性设置值
(3)添加程序代码
(4)运行程序并保存
设置两个文本框,当单击窗体时,Text1文本框隐藏,Text2文本框显示;双击窗体时,Text2文本框隐藏,Text1文本框显示。如图2.2所示。
图2.2文本框显示隐藏界面
实验步骤
(1)窗体设计
单击工具箱中的文本框控件,在窗体上画两个文本框。
(2)属性设置
无需设置,默认属性即可。
(3)添加程序代码
(4)运行程序并保存
编写功能如图2.3所示的程序,程序界面由一个标签框,一个文本框,三个命令按钮组成,程序的功能如下:
图2.3(a) 程序运行后的初始界面
图2.3(b) 单击“显示界面”按钮后的界面
图2.3(c) 单击“清除文字”按钮后的界面
① 当运行窗体时,标签框中的内容是“欢迎使用医院信息管理系统”;文本框中的内容是“本系统是由VB语言开发”。
② 当单击“显示界面”按钮时,标签框和文本框中的内容分别为“本医院信息管理系统的开发模型:”和“瀑布模型”。
③ 当单击“清除文字”按钮时,标签框内容还原为“欢迎使用医院信息管理系统”,而文本框内容以及文本框本身将自动消失。
④ 当单击“结束运行”按钮时,将结束运行,回到设计状态。
实验步骤
(1)窗体设计
在窗体上添加一个标签框,一个文本框,三个命令按钮。
(2)属性设置
各控件的主要属性设置如表2.2所示。
表2.2主要对象的属性设置值
(3)添加程序代码
(4)运行程序并保存
在名称为Text1的文本框中输入如图所示的字符,当单击“扩大”按钮时,字体扩大1.2倍;当单击“缩小”按钮时,字体缩小相同的比例。
图2.4 文本框字体大小改变界面
实验步骤
(1)窗体设计
在窗体上添加一个文本框,两个命令按钮。
(2)属性设置
按钮及窗口的Caption属性和文本框的Text属性设置如图2.4所示。
(3)添加程序代码
(4)运行程序并保存
在名称为Form1的窗体上布局如图2.5所示的控件,完成对文本框内容格式的调整。
图2.5 文本框格式调整界面
实验步骤
(1)窗体设计
在窗体上添加一个文本框,和三个框架,以及若干单选框和复选框,如图2.5所示。
(2)属性设置
各个控件的外观属性设置如图2.5所示。
(3)添加程序代码
(4)运行程序并保存
在名称为Form的窗体上布局五个标签,Caption属性分别为:“请输入病人体温:”、“℃”、“30℃”、“50℃”和“每半小时测量值:”;布局一个文本框可以输入和显示体温值;布局一个水平滚动条,名称为HS1,刻度范围为30—50;再布局一个列表框,把每次在文本框输入的体温值添加在列表框中。如图2.6所示界面。功能如下:当在文本框中输入病人体温时,水平滚动条上的滑块就调整到相应的位置。当单击窗体时,就在列表框中添加文本框上的体温值。也可以通过调整滚动条上的滑块调整体温,其Value值在Text1文本框上显示。
图2.6 体温记录界面
实验步骤
(1)窗体设计
在窗体上添加一个文本框,一个列表框以及一个水平滚动条,如图2.6所示。
(2)属性设置
表2.3主要对象的属性设置值
各控件的主要属性设置如表2.3所示,其他对象的属性都用其默认属性值即可。
(3)添加程序代码
(4)运行程序并保存
在名称为Form1的窗体上画一个空白文本框和一个图片框。通过文本框的Change事件在图片框中同步文本变化。如图2.7所示界面。
图2.7 图片框同步文本框内容变化
实验步骤
(1)窗体设计
在窗体上添加一个文本框和一个图片框,如图2.7所示。
(2)属性设置
两个控件都用默认属性即可。
(3)添加程序代码
(4)运行程序并保存
在名称为Form1的窗体上画一个图像框,并插入一副医学影像图片。再布局两个按钮,其功能是对图片大小进行调整。当单击“放大”按钮时,图片的高度、宽度各增加100。当单击“缩小”按钮时,图片的高度、宽度各减少100。如图2.8所示界面。
图2.8 图像框大小调整
(1)窗体设计
在窗体上添加一个图像框和两个按钮,如图2.8所示。
(2)属性设置
各控件的主要属性设置如表2.4所示。
表2.4主要对象的属性设置值
(3)添加程序代码
(4)运行程序并保存
在名称为Form1的窗体上画一个空白文本框,名称为Txt1,其高度为1500;再画一个垂直滚动条,名称为Vsb1,其刻度范围为1500—2000。如图2.9所示界面。功能如下:
请编写滚动条的Change事件过程,程序运行后,如果移动滚动框,则可按照滚动条的刻度值改变文本框的高度。
图2.9 程序界面
实验步骤
(1)窗体设计
在窗体上画一个文本框,再画一个垂直滚动条。
(2)属性设置
各控件的主要属性值设置如表2.5所示。
表2.5对象的属性设置值
(3)添加程序代码
(4)运行程序并保存
在名称为Form1的窗体上画一个图片框,名称为PicMessage;再画两个图像框,名称分别为Img1和Img2,其他控件布局如图2.10所示界面。功能如下:
当单击“读取信息”按钮时,在图片框上打印如图所示的个人信息。当单击“加载图像”时,同时加载两幅医学图像(B超图像和CT图像)。当单击“交换”按钮时,B超图像和CT图像进行交换,同时进行注释的标签也交换位置。当单击“清空”按钮时,两个图像框和一个图片框内容清空。当单击“退出”按钮时,退出程序。
图2.10 图片框图像框练习程序
实验步骤
(1)窗体设计
在名称为Form1的窗体上画一个图片框,两个图像框,其他控件布局如图2.10所示。
(2)界面属性设置
各控件的主要属性值设置如表2.6所示。
表2.6对象的属性设置值
(3)添加程序代码
(4)运行程序并保存
在窗口上布局一个图像框、一个水平滚动条和一个垂直滚动条,用滚动条的滑块移动来控制一个医学图像的大小。如图2.11所示。
图2.11 滚动条控制图像框大小
实验步骤
(1)窗体设计
在名称为Form1的窗体上画一个图像框Image1,一个水平滚动条HScroll1和一个垂直滚动条VScroll1。
(2)界面属性设置
各控件的属性值设置为默认即可,在Image1中加载一幅医学图像。
(3)添加程序代码
(4)运行程序并保存
在一个窗口上布局一个椭圆形状和两个按钮。当单击左移时,形状向左位移100;当单击右移时,形状向右移100。如图2.12所示。
实验步骤
(1)窗体设计
在名称为Form1的窗体上画一个椭圆形状,两个按钮。
图2.12 形状移动
(2)界面属性设置
表2.7 对象的属性设置值
各控件的主要属性值设置如表2.7所示,其余的控件属性设置为默认即可。
(3)添加程序代码
(4)运行程序并保存
在一个窗口上布局三条直线,完成三角形的构建。如图2.13所示。
图2.13 直线构建三角形
实验步骤
(1)窗体设计
在名称为Form1的窗体上画三条直线。
(2)界面属性设置
各控件的主要属性值设置如表2.8所示。
表2.8对象的属性设置值
(3)添加程序代码
无
(4)运行程序并保存
在一个窗口上布局一个列表框和一个文本框,以及四个按钮,如图2.14所示。当单击“添加”按钮时,把在文本框中的内容添加到列表框中;当选中列表框的某一行再点击“删除”按钮时,删除这一行的内容;当单击“统计个数”按钮时,把列表框里列表项的个数显示在文本框中;当单击“退出”按钮时,结束程序运行。当单击某一个列表项时,会在文本框中显示此列表项的内容;当双击某一个列表项时,列表框和文本框内容清空。
图2.14列表框科室显示
实验步骤
(1)窗体设计
在名称为Form1的窗体布局一个列表框和一个文本框,以及四个按钮。
(2)界面属性设置
各个控件的显示设置如图2.14所示,其他属性设置默认即可。
(3)添加程序代码
(4)运行程序并保存
在窗体上布局两个组合框和两个标签来完成医院科室的分级显示。功能如下:当在“医院科室”下的组合框中选择了一项列表项,则在“二级科室”下的组合框中显示与之匹配的科室信息。如图2.15所示。
图2.15 组合框查询医院科室
实验步骤
(1)窗体设计
在名称为Form1的窗体布局两个组合框和两个标签。
(2)界面属性设置
表2.9对象的属性设置值
各个控件的属性值设置如表2.9所示,其他属性设置默认即可。
(3)添加程序代码
(4)运行程序并保存
在一个窗口上画上一个计时器,一个标签和一个按钮。当单击“开始手术”按钮时,标签里的文字变为红色,每秒钟闪烁一次,文字内容为“手术正在进行中……”,按钮的提示内容变为“手术结束”;当单击“手术结束”按钮时,标签文本变为绿色,不再闪烁,文本内容为“手术结束”,按钮的提示内容变为“开始手术”。如图2.16所示。
图2.16 计时器控制文字闪烁
实验步骤
(1)窗体设计
在名称为Form1的窗体上画上一个计时器,一个标签和一个按钮。
(2)界面属性设置
各个控件的显示设置如图2.16所示,其他属性设置默认即可。
(3)添加程序代码
(4)运行程序并保存
在窗体上布局一个下拉式菜单和三个文本框。完成以下功能:当点击“字体设置”下拉菜单的子菜单时,Text1中的文本格式设置为相应的匹配格式。当在Text1中单击右键出现弹出菜单,当单击“剪切”或“复制”菜单时,把文本框的内容复制到一个临时文本框Text3中,当在Text2中右键点击“粘贴”菜单时,粘贴Text3中的文本。如图2.17所示。
图2.17 菜单练习
实验步骤
(1)窗体设计
在名称为Form1的窗体布局一个下拉式菜单和三个文本框。
(2)界面属性设置
表2.10对象的属性设置值
(续表)
各个控件的属性值设置如表2.10所示,其他属性设置默认即可。
(3)添加程序代码
(4)运行程序并保存
(1)第一个窗体如图2.18(a)所示,等三秒钟后程序自动转到第二个窗体。
图2.18(a) 第一个窗体界面
图2.18(b) 第二个窗体界面
(2)第二个窗体如图2.18(b)所示。当单击第二个窗体的“查看医学影像”按钮时,程序跳转到第三个窗体。当单击 “调整影像大小”的按钮时,程序跳转到第四个窗体。
(3)加载本书的第10题作为第三个窗体如图2.18(c)所示。
图2.18(c) 第三个窗体界面
(4)加载本书的第11题作为第四个窗体如图2.18(d)所示。
图2.18(d) 第四个窗体界面
实验步骤
(1)窗体设计
① 添加四个窗体分别为Form1和Form2,并设置启动对象为Form1。
② 在Form1上添加一个Timer控件和一个Label控件。
③ 在Form2上添加三个按钮。
④ 把本书的第10题添加到本题所建的工程中,作为Form3。并把第10题中用过的两张图片“B.jpg”和“CT.jpg”复制到本题的文件夹中。
⑤ 把本书的第11题添加到本题所建的工程中,并把第11题中用过的图片“timg.jpg”复制到本题的文件夹中。
(2)属性设置
Form1的主要属性值设置如表2.11(1)所示。
表2.11(1) Form1的主要属性值
Form2的主要属性值设置如表2.11(2)所示。
表2.11(2) Form2的主要属性值
(3)添加程序代码
Form1的程序代码:
(4)运行程序并保存四个窗体和一个工程