友情提示:如果本网页打开太慢或显示不完整,请尝试鼠标右键“刷新”本网页!阅读过程发现任何错误请告诉我们,谢谢!! 报告错误
八万小说网 返回本书目录 我的书架 我的书签 TXT全本下载 进入书吧 加入书签

excel_vba_编程教程(完整版)-第43部分

按键盘上方向键 ← 或 → 可快速上下翻页,按键盘上的 Enter 键可回到本书目录页,按键盘上方向键 ↑ 可回到本页顶部!
————未阅读完?加入书签已便下次继续阅读!



属性让你设置它的最大值,而Min属性则决定了它的最小值。LargeChange属性决定了当用户点击滚 
动条内部时Value属性的改变值。同样,当使用滚动条编程时,不要忘记设置SmallChange属性,它 
决定当你点击滚动条的箭头时Value属性如何改变。  

14。旋转按钮  

旋转按钮作用类似于滚动条。你可以点击旋转按钮来增加或者减小某个数值。旋转按钮经常和文字 
框一起使用,因为这样用户就可以使用旋转按钮在文字框里敲入精确的值或者选择数值。和文字框 
一起使用旋转按钮的技术将会在本章后面讨论到。  

15。图像  

图像控件让你可以在窗体上显示图像,该控件支持下列文件格式:*。bmp,*。cur,*gif,*。ico, 
*。jpg和*。wmf。就像工具箱里的其它控件一样,图像控件也有许多属性可以设定。例如,你可以使 
用PictureSizeMode属性控制图片的外观,该属性有三种设置:0(fmPictureSizeModeClip将不在 
图片框里面的部分截除),1(fmPictureSizeModeStretch水平或竖直拉伸图片,使之正好适合图片 
框)和3(fmPictureSizeModeZoom按比例放大图片)。  

16。多页控件  

多页控件可以在窗体顶部显示一系列的页面(参见图10…17)。每小页作为单独的页面使用。使用多 
页控件,你可以设置包含两页或多页的窗体,你可以在每页上放置不同的控件。当一个窗体包含很 
多的数据时,它的可读性便降低了。点击窗体页要比在一个使用滚动条的长窗体上移动要轻松的多。 
默认上,每个多页控件在窗体上显示两页,通过快捷菜单可以添加新页,也可以在VBA过程里使用 

                                                192 

… 页面 209…

Add方法添加新页。本章中的第二个实践练习时犯了如何使用该控件来追踪学生的考试分数。  

17。TabStrip 控件  

虽然TabStrip和多页控件看上去非常相似,但是它们有各自不同的作用。TabStrip控件(参见图 
10…17)允许你使用相同的控件来显示多套相同的数据。假设窗体显示学生的考试,每个学生必须 
通过相同科目的考试。每个科目可以放在一个单独的页上(tab),每页包含相同的控件来收集得分 
和考试日期。当你激活任何页的时候,你将看到相同的控件,只有这些控件里的数据变化。参见本 
章的第二个实践练习,看看如何使用TablStrip控件。  

18。RefEdit 控件  

RefEdit控件是专门在Excel里面创建的窗体控件,它允许你在工作表里选择一个单元格或者单元格 
区域并且传递到你的VBA过程。看一下一些Excel内置对话框,你就可以看到这个控件是如何工作的, 
例如,“数据”菜单里的“合并计算”对话框就有一个标为“引用位置”的RefEdit控件,让你选定 
想要进行合并计算的数据区域。点击RefEdit右边的按钮,可以在选择单元格区域的时候暂时隐藏 
对话框。本章的第二个实践练习使用RefEdit控件给列表框添加学生姓名。  

19。在窗体上放置控件  

当你创建自定义窗体的时候,你将工具箱里可用的很多控件(参见图10…9)放置在一个空窗体上。 
选择什么样的控件取决于控件需要储存的数据类型,以及你窗体的功能。当你使用窗体时,工具箱 
总是可见的,你可以在屏幕上移动它,改变它的大小,或者当你将所有需要的控件放在窗体上了并 
且你要做的只是设置它们的属性,你也可以关闭它。临时被移除的工具箱也可以通过选择“视图” 
|“工具箱”重新显示。  
工具箱的使用是很容易的,要在窗体上添加新控件的话,可以先点击工具箱上面的控件图标,然后 
在窗体上点击一下或者画一个框。在窗体上点击一下(不画框)将会在窗体上放置一个缺省大小的 
控件。每个控件的标准设置可以在它的属性窗口里查找到。例如,标准的文字框大小为18X72磅(参 
见文字框的Height和Width属性)。在窗体上放置控件后,“选定对象”按钮(用箭头代表)成为工 
具箱上的活动控件。如果你双击工具箱上的控件时,你可以随你需要画上很多这个控件。例如,要 
快速在窗体上放置三个文字框,可以双击文字框控件,然后在窗体上点击三次。点击工具箱上的选 
定对象按钮,可以失活所选的控件。  
技巧10…2 设置网格选项  
当你在窗体上拖曳控件时,VB将调节控件以使得它和窗体的网格对齐。通过使用“选项”对话框你 
可以按你的喜好设置窗体的网格。要访问网格选项的话,可以选择“工具”|“选项”,然后点击选 
项对话框的“通用”页,窗体网格设置区域允许你关闭网格、调整网格大小,以及决定是否需要控 
件和网格对齐。  

20。应用程序示例 1:信息调查  

既然你已经通读了创建用户窗体的理论知识,并且了解了工具箱上不同控件之间的区别,你已经可 
以来做一些实践练习了。你可能也知道,理解一个复杂特征的最好方式就是将它应用到一个实际生 
活的项目中。在这部分,你将给合作者创建一个自定义窗体,他要求你将给工作表输入调查数据的 
单调过程简单化。使用该窗体时(参见图10…11),你将有机会体验许多控件和它们的属性,另外, 
你也将学习如何将数据从你的窗体转移到工作表(参见图10…12)  
在本章结束的时候,你将拥有创建自定义窗体的必要技能,适应你VBA应用程序独特的要求。  
1。 在工程浏览窗口,选中工程VBAProject(Chap10。xls)并且在属性窗口将工程名称改为 
    CustomForms  
2。 选择“插入”|“用户窗口”,添加一个空白窗体  
3。 在属性窗口,双击Name属性并输入InfoSurvey,将窗体的缺省名称(UserForm1)更改掉。你将 
    在VBA过程里使用给名称引用到该用户窗体  
4。 双击Caption属性,并输入窗体新标题:Info Survey。该名称将出现在窗体的标题栏上  
5。 双击BackColor属性,点击“调色板”并且给窗体底色选上一种颜色  

                                          193 

… 页面 210…

                                                                                
图10…11Info Survey窗体允许用户通过作一些适当的选择就可以快速地数据数据  

                                                                            
图10…12 每次使用窗体Survey后,用户的选择就会写入到工作表里面  

21。在窗体上添加按钮、选项框和其它控件  

给自定义窗体设置完初始属性(Name和Caption)后,我们继续来给窗体放置需要的控件吧。这里 
是一步一步的指导如何准备如图10…11显示的窗体。  
1。 更改窗体大小  
     当你在工程里插入的缺省窗体太小,不够放置你VBA程序要求的控件时,你可以按照下述方法 
     之一来更改它的大小:  
     a。   使用鼠标调整大小  
       * 点击窗体的空白部分,窗体周围便会出现好几个选用符  
       * 将鼠标放在窗体右边中间的选用符上,并且将其向右拖曳至你想要的位置,释放鼠标  

                                         194 

… 页面 211…

       * 将鼠标放在窗体下边中间的选用符上,并且将其向下拖曳至你想要的位置,释放鼠标  
     b。   通过属性窗口调整窗体大小:  
      每个新建的窗体缺省大小为180 X 240。窗体尺寸单位是磅。一磅等于1/72英寸。输入窗体两 
      个属性:Height和Width的新数值,可以改变窗体的大小。  
       * 点击窗体的标题栏(显示“Info Survey”的地方)  
       * 在属性窗口,双击属性Height并且输入值252。75,更改Width属性为405。75  
      为了避免重复工作,总是在添加需要的控件之前调整窗体的大小。  
2。 添加框架  
      *    点击工具箱上的框架控件,这时鼠标光标变成了一个十字架并且跟随着被选择控件的标 
           志  
      *  指向窗体的左上角,然后点击并拖曳鼠标画出一个小矩形。当你释放鼠标后,你将看到 
          一个标题为“Frame1”的小矩形。当该框架被选择上后,它旁边就会出现一些选用符, 
           并且属性窗口的标题栏便会显示“属性…Frame1”  
      *  在属性窗口,双击Caption属性并将默认的标题Frame1改为“Main Interest”  
3。 添加选项按钮  
      *    点击工具箱上的选项按钮,将鼠标移动到你刚才在窗体上添加的框架“Main Interest” 
           内部,点击并且向右拖曳鼠标,直到看到一个带有标签“OptionButton1”的矩形  
      *  在属性窗口将该选项按钮的Caption属性改为“Hardware”  
      *  使用相同的技术,在“Main Interest”框架里添加另外一个选项按钮并且将Caption 
          属性改为Software  
      无论何时当用户必须从一组相互排斥的选项中选择一个时就要使用选项按钮,如果用户必须 
      选择多余一个的选项的话,就要使用复选框。  
4。 添加列表框  
      *    点击工具箱上的列表框控件,这时鼠标光标变成了一个十字架并且跟随着被选择控件的 
          标志。在Main Interest框架下面点击并且向下向右拖曳鼠标画出一个列表框,当你释 
          放鼠标后,将看到一个白的矩形。  
      图10…11显示了添加了各种硬件的列表框。在本实践工程的后面,你将学习如何在该列表框里 
      面显示合适的项目。  
5。 添加带选项按钮的框架  
      *  按照第二步在列表框下面插入一个框架并且按照第四步将框架的Caption属性改为 
          Gender。在该框架里面添加两个选项按钮,并且将第一个按钮的Caption属性改为Male, 
          第二个为Female。参见图10…11  
技巧10…3 操作和移动控件  
如果你想要复制控件的话,那么就选择该控件(被选择的控件将会有选用符在其周围),按住Ctrl 
键,将光标置于控件中央然后按下鼠标左键,拖曳光标到你需要的位置,然后释放鼠标,更改按钮 
的Caption属性。  
在选择和移动一组控件的话,点击工具箱上面的“选定对象”工具,并且在你需要移动的一组控件 
周围画一个矩形框,当你释放鼠标后,所有控件都将被选择上。(你也可以通过按住Shift键,并点 
击每个要选择的控件来选择一个以上的控件——不要只看,动手试试)要移动被选择的控件组到窗 
体上的另外位置的话,可以点击选择区域并拖曳鼠标到预期位置。  
6。 添加带复选框的框架  
      *    点击工具箱上的框架控件,并且在Main Interest框架右边画一个矩形  
      *  将其Caption属性改为puter Type  
      *    点击工具箱上的复选框按钮,并且在刚添加的框架内部点击一下,框架里应该出现 
          CheckBox1控件  
      *  更改CheckBox1的Caption属性为IBM/patible  
      *  在puter Type框架里面再放置两个复选框,使用Caption属性将这两个复选框标题设 
          置为:Notebook/Laptop和Macintosh。最后的结果应该和图10…11一致。  
      不像选项按钮那样相互排斥,复选框允许用户同时激活一个或者多个选项。复选框在特定时 
      候可以是选定的,未选定的或者不可用的。不可用的复选框会变灰并且不能被选定。选定的 

                                          195 

… 页面 212…

      复选框的标题前面有一个x号,具有焦点的复选框的标题周围有虚线包围。  
技巧10…4 复选框还是选项按钮  
同时只能选择一个选项的时候使用选项按钮,而复选框让用户选择任意多个适合的选项。  
7。 添加标签和复合框  
      *    点击工具箱上的标签控件  
      *    点击puter Type框架下面的空白地方,Label1控件应该就会出现在那里  
      *  将Label1的Caption属性改为Where Used  
      *    点击工具箱上的复合框控件  
      *    点击标签Where Used下面的空白地方并且拖曳鼠标画出一个长方形,释放鼠标。  
      只有当你点击控件右边的向下箭头时,复合框才会显示可用的选项清单。复合框有时也被称 
      为下来列表并且用来屏幕上的宝贵空间。尽管用户一时只能看见清单中的一项,但是通常点 
     击向下箭头可以很快地改变当前选择。  
8。 添加标签、文字框和旋转按钮  
      *    点击工具箱上的标签控件  
      *  在Where Used复合框下面的空白地方点击一下,将会出现一个标签控件,更改其Caption 
          属性为Percent (%) Used  
      *    点击工具箱上的文字框控件  
      *  在Percent (%) Used标签右边点击一下放置一个默认大小的文字框  
      *    点击工具箱上的旋转控件,然后点击文字框控件的右侧,出现一个默认大小的旋转按钮。 
          最后的样子如图10…11所示  
      旋转按钮有两个箭头,用来在一个给定范围内增加或者减少数值。最大值由Max属性的设置决 
      定,而最小值则由Min属性设定。旋转按钮和滚动条有相同的属性,但是也有两个不同之处: 
      旋转按钮没有滚动条,而且它少一个LargeChange属性。文字框通常放置在旋转按钮的旁边, 
     这样允许用户直接在文字框里面输入数据,或者使用旋转按钮控制数值。如果旋转按钮必须 
     和文字框一起使用的话,那么你定VBA过程必须确保文字框里输入的数据和旋转按钮保持同 
      步。在本练习里,你将使用旋转按钮来显示所选硬件或者软件的兴趣百分比。  
9。 添加命令按钮  
      *  双击工具箱上的命令按钮控件。回想一下双击工具箱上的控件时,表明你想要添加一个 
           以上的所选控件  
      *    点击窗体的右上角,这将导致出现mandButton1  
      *    点击mandButton1的下面,出现mandButton2  
      *  将mandButton1的Caption属性为OK,mandButton2为Cancel。  
      多数自定义窗体都有两个命令按钮,确定和取消,使用户能够接受窗体上输入的数据,或者 
      离开窗体。在本练习里,OK按钮将输入在窗体上的数据转移到工作表里。无论何时当他完成 
      数据输入的时候,用户也可以点击取消按钮。你将在本章后面编写合适的VBA过程,使按钮对 
     用户的操作有反应。  
10。添加图像控件  
      *    点击工具箱上的图像按钮  
      *  在Cancel按钮下面用鼠标点击,并且拖曳鼠标,画一个长方形,释放鼠标,最后的样子 
          如图10…11所示。窗体将根据选择的是Hardware或者Software选项按钮,显示不同的图 
          片。图像将用VBA程序上载。  
11。检查窗体外观  
      *    点击窗体标题栏,或者点击窗体上的任意空白区域,选定窗体  
      *  按下F5键或者选择“运行”|“运行子过程/用户窗体”来显示用户将看到的窗体  
      *  VB将切换到Excel窗口的当前活动工作表,并且显示你设计的自定义窗体。如果你忘了 
          选择窗体,就会出现宏对话框(译者:按下F5的时候),关闭宏对话框,然后重复前面 
          两步  
      *    点击窗体右上角的关闭按钮(x)来关闭该窗体,返回到VB编辑器窗口。回想一下,我 
          们放置在窗体上的OK和Cancel按钮都还没有任何功能,它们需要VBA过程让它们工作。  
     在窗体上添加完控件后,你可以使用鼠标或者格式菜单命令来调节控件的对齐和空间。  

                                          196 

… 页面 213…

技巧10…5 使用用户窗体工具栏  
用户窗体工具栏包含很多有用的使用窗体的快捷键,例如使控件大小一样,水平或者数值居中,控 
件边缘对齐,以及组合或取消组合控件。选择“视图”|“工具栏”|“用户窗体”。  

22。更改控件名称  

在开始编写程序控制窗体之前,你应该给每个放置在窗体上的控件分配自己的名称。尽管VB自动给 
每个控件分配一个缺省名称,但是
返回目录 上一页 下一页 回到顶部 1 2
未阅读完?加入书签已便下次继续阅读!
温馨提示: 温看小说的同时发表评论,说出自己的看法和其它小伙伴们分享也不错哦!发表书评还可以获得积分和经验奖励,认真写原创书评 被采纳为精评可以获得大量金币、积分和经验奖励哦!