ExcelVBA用户窗体编程基础 概述 当使用MsgBox函数和InputBox函数不能满足与用户交互的需求时，您能使用用户窗体来自定义对话框。您能使用用户窗体来显示所输入的数据，您甚至能使用用户窗体创建一个完整的用户界面，而不会让用户接触到电子表格本身。 您在Windows对话框中所看到的大多数控件都能在用户窗体中实现——命令按钮，选项按钮，复选框，文本框，组合框——加上一些其它不常用的控件像图像，日历，等等。 本文介绍了用户窗体的基本概念，并介绍了使用用户窗体的常用技术。其中，也讲解了一些最通用的思路。在文章中列举了一个包含所有过程的完整的示例文件，以及实现这些过程的代码，让您能在实践中看到所有工作的基本原理和方法。 本文包含以下内容： ● 基本的用户窗体操作 ● 用户窗体和控件的属性 ● 一个用户窗体的生命周期 ● 用户窗体和控件的事件 ● 问题1：如何在用户窗体间传递数据？ ● 问题2：如何找到我的窗体中的某类控件？ ● 问题3：如何获取数据到列表框中？ ● 问题4：如何为循环创建进度条？ ● 一个完整的用户窗体综合示例 基本的用户窗体操作 ?创建一个窗体。打开VBE编辑器(选择菜单“工具——宏——Visual Basic编辑器”或按Alt+F11组合键)，选择菜单“插入——用户窗体”，或者在工程窗口中单击右键，从弹出的快捷菜单中选择“插入——用户窗体”，即可创建一个窗体。 ?添加控件。当你创建了一个窗体后，将会显示一个名为“控件工具箱”的浮动工具箱(如果没有该工具箱的话，您可以从视图菜单中找到它)，其中显示了最普遍的控件类型。单击您想要的控件，拖动它到您的用户窗体中。 ?更多的控件。有一些更多的可用的控件，您可以在控件工具箱中单击右键，从中选择“附加控件”，您能添加日历、电子表
第6章控件与用户窗体 范例67 文本框只能输入数值 Private Sub TextBox1_KeyPress(ByVal KeyANSI As MSForms.ReturnInteger) With TextBox1 Select Case KeyANSI Case Asc("0") To Asc("9") Case Asc("-") If InStr(1, .Text, "-") > 0 Or .SelStart > 0 Then KeyANSI = 0 End If Case Asc(".") If InStr(1, .Text, ".") > 0 Then KeyANSI = 0 Case Else KeyANSI = 0 End Select End With End Sub Private Sub TextBox1_Change() Dim i As Integer Dim Str As String With TextBox1 For i = 1 To Len(.Text) Str = Mid(.Text, i, 1) Select Case Str Case ".", "-", "0" To "9" Case Else .Text = Replace(.Text, Str, "") End Select Next End With End Sub
范例68 限制文本框的输入长度 Private Sub TextBox1_Change() TextBox1.MaxLength = 6 End Sub 范例69 验证文本框输入的数据 Private Sub CommandButton1_Click() With TextBox1 If (Len(Trim(.Text))) = 15 Or (Len(Trim(.Text))) = 18 Then Cells(Rows.Count, 1).End(xlUp).Offset(1, 0) = .Text Else MsgBox "身份证号码错误，请重新输入!" End If .Text = "" .SetFocus End With End Sub 范例70 文本框回车自动输入 Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Dim r As Integer r = Cells(Rows.Count, 1).End(xlUp).Row With TextBox1 If Len(Trim(.Text)) > 0 And KeyCode = vbKeyReturn Then Cells(r + 1, 1) = .Text .Text = "" End If End With End Sub 范例71 文本框的自动换行 Private Sub UserForm_Initialize() With TextBox1 .WordWrap = True
第2章使用窗体控件 课堂练习：为控件创建事件处理程序 5）传递给这个事件处理程序的第二个参数(e)的目的是什么？ 答：参数e包含事件数据。它是一个EventArgs 对象（实际不包含事件数据的基类），或者是一个派生类（像MouseEventArgs）的实例。要查看派生类的完整列表，请在Visual Studio .NET帮助文档中使用短语“EventArgs 类”进行查找，然后点击链接转到“派生类”。 ●为Click 事件创建一个事件处理程序。 3）上面的双击动作为什么创建了一个Click 事件处理程序？ 答：当在设计视图中双击一个控件时，IDE会自动为默认事件创建一个事件处理程序。课堂练习：创建和使用ToolBar控件 8）为什么不能向ToolBar 按钮添加图像呢？ 答：ToolBar 控件将ImageList 控件作为图像源。使用ToolBar 控件的ImageList 属性指定Toolbar 将从哪个ImageList 控件获取图像。 13）运行应用程序。单击工具栏按钮时有事情发生吗？必须处理什么事件以响应单击ToolBar按钮？ 答：ToolBar 的ButtonClick事件用来处理ToolBar按钮的单击。ToolBarButtonClickEventArgs 用来确定单击了哪个按钮。 课堂练习：在运行时添加和移除控件 ●添加新控件 6）为什么decimalCheckBox 出现在GroupBox1控件的左上角？ 答：控件位置属性的默认坐标X和Y的值均为零。 课堂练习：在运行时更新菜单 ●使用另一个MainMenu 9）什么时候能在一个应用程序中使用多个MainMenu 控件? 答：在应用程序的上下文改变或者应用程序有多种状态时，使用（显示）多个MainMenu 对象会很有帮助。 ●将一个ContextMenu 分配给一个控件。 5）如何找出哪个控件与ContextMenu 有关联？ 答：ContextMenu.SourceControl 属性获取显示快捷方式菜单的控件。 ●找出与ContextMenu关联的控件
窗体中的常用控件单选3分 1.在计算机控件中，每个表达式前都要加上（"="） 2.用于显示更新数据库中的字段的控件类型是（绑定型） 3.关于控件的叙述，（选项组不能设置为表达式）的说法正确 4.（表）不是窗体控件 5.纵栏式窗体同一时刻能显示（一条记录） 6.无论是自动创建窗体还是报表，都必须选定要创建该窗体或报表基于的（报表） 7.没有数据来源的控件类型是（非绑定型） 8.关于控件的叙述，（在窗体设计视图窗口中的工具箱中只能看到部分控件）说法错误 9.能够接受数字型数据输入的窗体控件是（文本框） 10.在教师信息输入窗口中，为职称字段提供"教授""副教授""讲师"等选项供用户直接选择，应使用控件是（组合框） 11.要用文本框来显示当前日期，应设置文本框的控件来源属性是（=Data（）） 12.窗口事件是指操作窗口时所引发的事件，（取消）不属于窗口事件 13.如果想再加入控件时，控件自动与网格对其，则应在加入控件前，执行"格式（对其网格）"命令 14.当窗体的内容比较多无法在一页中全部显示时，可以使用（选项卡）进行分页，若要进行页面切换，用户只需单击选项卡上的标签即可 15.（选项组）是用来显示一组有限选项集合的控件 16.在学生表中使用"照片"字段存放相片，当使用向导为该表创建窗体时，照片字段使用的默认控件是（绑定对象框） 17.为窗体上的控件设置Tab键的顺序，应选择属性对话框中的（数据选项卡） 18.使用窗体设计视图，不能创建（报表） 19.如果在窗体上输入的数据总是取自某一个表或查询中记录的数据，或者取自某固定内容的数据，可以使用（组合框或列表框）控件 20.（只要单击选项组中所需的值，就可以为字段选定数据值）的说法正确 21.（命令按钮）代表一个或一组操作 22.（可以向组合框中输入新值，而列表框不行） 23.创建窗体的数据源不能是（报表） 24.若要求在文本框中输入文本时达到密码"*"号的显示效果，则应设置的属性是（"输入掩码"属性） 25.（窗体设计器）不是窗体的组成部分 26.关于控件的叙述，（在选项组中每次只能选择一个选项）的说法是正确的 27.
C#中用户控件与窗体间的消息传递 如果在c#中实现用户定义控件内的事件挂勾到调用的窗体事件中 我们都知道在https://www.doczj.com/doc/c29655675.html,开发中，如果使用用户定义控件可以有效的进行程序的模块化。其实在.net 的winform中也是可以使用的。 细节如下： 1、新建应用程序windowsapplication1。 2、添加新的用户控件userlogin。（如图user） 3、定义用户属性 //定义属性 public string username { get{return username;} set{username=value;} } public string password { get{return password;} set{password=value;} } 4、定义委托 //定义委托 public delegate void btnokclickeventhander(object sender,eventargs e); public delegate void btncancelclickeventhander(object sender,eventargs e); 5、定义事件 //定义事件 public event btnokclickeventhander btnokclick; public event btncancelclickeventhander btncancelclick 6、事件实现 private void textboxuid_textchanged(object sender, system.eventargs e) { username=this.textboxuid.text; } private void textboxpwd_textchanged(object sender, system.eventargs e) { password=this.textboxpwd.text; } private void buttonok_click(object sender, system.eventargs e) { if (btnokclick!=null)
常用窗体控件： String str=””; Foreach(Control item in this.Controls) { If(https://www.doczj.com/doc/c29655675.html,.IndexOf(“checkBox”)>0) { CheckBox ck=(CheckBox)Item; If(ck.Checked) { Str=ck.Text+”,”; } } }
高级窗体控件： 1.菜单控件MenuStrip 使用步骤： ①在Windows窗体中添加一个MenuStrip控件 ②单击该控件的Items属性，弹出“项集合编辑器”对话框 ③可以添加MenuItem子项。子项的子菜单 选择其“MenuItem”选项，单击其 DropDownItems属性，弹出相接对话框 ①选中要添加右键功能的Form或者控件，打开控件的设计页面 ②从工具箱中找到ContextMenuStrip控件，将这个控件拖曳到Form或者控件的设计页 面上。这时系统就会在这个页面下面自动创建一个contextMenuStrip1控件，如果你想在这个页面添加多个菜单，那么你也可以拖曳多个这种控件到设计页面上。 ③按照你的要求将这些ContextMenuStrip控件改成你需要的名称。然后, 选择需要右 键弹出菜单的页面，比如你当前编辑的页面中有一个DataGrid,一个T reeList，而你想分别为这两个控件添加不同的右键菜单。那么你就可以先选择DataGrid控件，然后在这个控件的属性中找到ContextMenuStrip属性，点击该属性，系统会自动查找你拖曳到当前页面的所有ContextMenuStrip控件并将这些控件罗列在这个属性的下拉菜单中。你可以选择一个你预先定义好的ContextMenuStrip控件。这样就为这个DataGrid控件设置了右键菜单。其他控件也使用同样的方法添加。 ④定义你的菜单，在为控件分配完菜单之后，你就可以定义单个的菜单。这时你可以 选中一个ContextMenu控件。系统会自动在编辑页面的上面现一个可编辑的动态菜
第二章窗体与基本控件 教学内容： 一、窗体 窗体的属性、事件、方法及应用举例 二、基本控件以及对控件的格式化 命令按钮、标签、文本框等基本控件属性、事件与方法，基本控件的添加/删除、调整控件的大小与位置、窗体与控件的布局调整 三、简单语句 Print方法、人机对话函数（InputBox,MsgBox,Cls,End,Stop,Rem语句）、基本格式、功能、举例说明。教学要求： 了解：控件的格式化 掌握：常用控件（窗体、文本框、标签、命令按钮）的常用属性、事件和方法、Print方法、Inputbox、Msgbox、Cls、End语句的使用方法 §2.1 窗体 1．窗体的基本属性 Name 对象的名称 指定窗体的名称，在程序代码中用这个名称引用该窗体。 第一个窗体的名称缺省值为form1，通常要给name属性设置一个有实际意义的名称，便于识别。 Caption 对象的标题 设置窗体标题栏显示的文本。 Height 对象的高度 Width 对象的宽度 设置窗体的高度和宽度。单位为Twip。 1Twip=1/20点＝1/1440英寸＝1/567cm Enabled 对象的激活或禁止 用来设置窗体是否响应鼠标或键盘事件。缺省时为True，窗体能够对用户产生的事件作出反映。 Visible 对象的可见性 设置窗体是否显示。True（窗体可见），False（运行时，窗体及其上面的对象都将被隐藏） Top 对象的顶边距离 Left 对象的左边距离 Backcolor 设置窗体的背景颜色； Forecolor 设置窗体的前景颜色。 Font 设置窗体上字体的样式，大小，字形等。 Picture 设置在窗体中显示的图片。 注意：要在程序中设置该属性的值，需要使用LoadPicture函数。 WindowStare属性设置窗体运行时的大小状态。有三个可选值： 0－Normal 窗体大小由Height和Width属性决定，此值为缺省值； 1－Minimized 窗体最小化成图标； 2－Maximized 窗体最大化，充满整个屏幕。 2．窗体的事件和方法 事件： Click（单击）事件：单击鼠标左键时触发 DblClick（双击）事件：双击窗体时触发 Load（装入）事件：窗体被装入工作区时触发 方法： Print 格式：[对象名.] Print [表达式列表][;|,] 功能：在对象上输出信息 例如：Form1.Print “VB”;”程序设计” Cls 格式：[对象名.] Cls
若要向用户窗体中添加控件，请在“工具箱”中查找要添加的控件，将该控件拖到窗体上，然后拖动控件上的调整柄，直至控件的外边框成为所需的大小和形状。 注意如果将控件（或若干“成组”的控件）从窗体拖回到“工具箱”，将创建该控件的一个模板，该模板可被重新使用。对于实现应用程序的标准界面，这是非常有用的功能。 向窗体添加了控件之后，可用 Visual Basic 编辑器中“格式”菜单上的命令调整控件的对齐方式和间距。 上页：Excel VBA教程：向文档中添加控件下页：Excel VBA教程：应用程序对象事件 Excel VBA Excel VBA教程：应用程序对象事件Excel VBA教程：图表对象事件 Excel VBA教程：控件和对话框事件Excel VBA教程：在某一 Microsoft Office 应用程序中控制其他 Microsoft Office 应 用程序 Excel VBA教程：创建自定义对话框Excel VBA教程：新建工作簿 Excel VBA教程：创建“用户窗体”Excel VBA教程：显示自定义对话框 Excel VBA教程：获取有关 Macintosh 关键 字的帮助 Excel VBA教程：在单元格区域中循环Excel VBA教程：如何引用单元格和区域Excel VBA教程：初始化控件属性Excel VBA教程：打开工作簿Excel VBA教程：QueryTable对象事件 Excel VBA教程：引用工作表上的所有单元格Excel VBA教程：用 A1 样式记号引用单元格 和单元格区域 Excel VBA教程：用编号引用单元格Excel VBA教程：相对于其他单元格来引用单 元格 Excel VBA教程：用 Range对象引用单元格Excel VBA教程：用快捷记号引用单元格
Excel VBA用户窗体常用的方法 2009-06-20 23:40 1、显示用户窗体 用于以编程方式显示用户窗体的语法是： 若要显示用户窗体名为 UserForm1，使用以下代码： 时可以加载到内存用户窗体而不实际显示它。可能需要复杂的用户窗体几秒钟才显示。可以预用户窗体加载到内存中，因为您可以决定何时引发此开销。但不显示加载到内存的 UserForm1，使用以下代码： Load UserForm1 您必须使用 Show 方法时以前显示的。 2、如何临时隐藏用户窗体 如果想要临时隐藏用户窗体，请使用隐藏方法。可以隐藏用户窗体，如果您的应用程序涉及用户窗体之间移动。若要隐藏用户窗体，使用以下代码： 3、如何从内存中删除用户窗体 要从内存中删除用户窗体使用在卸载语句。若要卸载一个名为 UserForm1 用户窗体，使用以下代码：Unload UserForm1 如果卸载与用户窗体或与用户窗体上的控件相关联的事件过程中用户窗体（例如，您单击CommandButton 控件)，您可以使用"Me"关键字而不是用户窗体的名称。要使用"Me"关键字卸载用户窗体，使用以下代码： Unload Me 4、如何使用用户窗体事件 用户窗体支持许多预定义的事件，您可以将附加 VBA 过程。在事件发生时, 该过程附加到该事件就会运行。由用户执行的单个操作可以启动多个事件。最频繁用户窗体使用的事件包括 Initialize 事件、 Click 事件和终止事件。
请注意 Visual Basic 模块包含事件的过程可能被称为"隐藏"用户窗体的模块。看 Microsoft Project Explorer 窗口的 Visual Basic 编辑器的 Modules 集合中不包含事件过程的模块。您必须双击用户窗体可以查看用户窗体的主体代码模块。 5、如何捕获用户窗体事件 要捕获用户窗体事件，请按下列步骤操作： 在 Excel 中创建一个新工作簿。 在工具菜单上指向宏，然后单击 Visual Basic 编辑器。 在插入菜单中上, 单击用户窗体插入您的工作簿的用户窗体。 双击用户窗体的用户窗体中显示代码窗口。 在模块中键入以下代码： Private Sub UserForm_Click() = Int(Rnd * 500) = Int(Rnd * 750) End Sub Private Sub UserForm_Initialize() = "Events Events Events!" = RGB(10, 25, 100) End Sub Private Sub UserForm_Resize() msg = "Width: " & & Chr(10) & "Height: " & copyright vbacn MsgBox prompt:=msg, Title:="Resize Event" End Sub Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) msg = "Now Unloading " &
第4章 1.回顾 桌面应用程序中的单选按钮的使用 可以使用分组框对控件进行分组 用PictureBox可显示图片 Timer控件是用于计时的计时器控件，可以重复执行Tick事件 滚动条可滚动取值，用进度条可记录某一过程的进度情况 用选项卡控件可对窗体上的控件进行分类 2.本章内容 了解SDI、MDI窗体 掌握TreeView控件 3.本章重点 了解SDI、MDI窗体 掌握TreeView控件 4.本章讲课思路 什么单文档、什么是多文档 多文档窗体的作用 如何创建多文档窗体 treeview控件 节点集和节点对象 5.知识点讲解 01.知识点一：MDI窗体 a)讲解思路： 1)什么是窗体，应用程序的用户界面，多文档窗体有是什么样的窗体？ 2)SDI、MDI窗体的区别 3)如何创建多文档窗体 4)MDI主窗体的属性、方法和事件 5)操作MDI子窗体 6) b)讲解要点：
如何创建多文档窗体 MDI主窗体的属性、方法和事件 操作MDI子窗体 c)课堂练习： 创建一个winform登录程序主窗体编译并运行 d)小结： MDI多文档窗体，就是可以在一个界面中同时对多个文档进行操作 02.知识点一：TreeView控件 a)讲解思路： 什么数树形菜单 Windows 资源管理器中左窗格所包含的目录和文件是以树型视图样式排列的 Treeview 控件的作用。 用于以节点形式显示文本或数据，这些节点按层次结构顺序排列 节点集和节点对象 节点的常用属性和方法和事件 b)讲解要点： 节点集和节点对象 节点的常用属性和方法和事件 c)课堂练习： 在主窗体中添加treeview控件 d)小结： Treeview 控件的作用。 用于以节点形式显示文本或数据，这些节点按层次结构顺序排列 节点集和节点对象 03.课堂总结 a)思路： 04.掌握多文档窗体的创建及使用 05.使用树视图显示有层次结构的数据 06.作业： 课堂作业：编写登陆主窗体。 课后作业：书上日记本练习
用户窗体的基础知识用户窗体的显示方式用于以编程方式显示用户窗体的语法是下列： UserFormName.Show 若要显示名为 UserForm1 用户窗体，使用以下代码： UserForm1.Show ，您可以加载到内存用户窗体而不实际显示它。可能需要复杂的用户窗体多个要显示的秒数。因为您可以预先用户窗体加载到内存中，您可以决定何时会导致这种开销。而不显示它加载 到内存的 UserForm1，使用下面的代码： Load UserForm1 显示用户窗体，您必须使用了以前显示的显示方法。 如何暂时隐藏用户窗体如果要暂时隐藏用户窗体，使用隐藏方法。您可能希望隐藏用户窗体，如果您的应用程序涉及到用户窗体之间移动。若要隐藏用户窗体，使用下面的代码： UserForm1.Hide 如何从内存中删除用户窗体若要从内存中删除用户窗体使用卸载语句。若要卸载 UserForm1 命名的用户窗体，使用下面的代码： Unload UserForm1 如果您卸载了用户窗体与用户窗体相关联，则与在用户窗体上某个控件关联的事件过程中(渚嬪的方式 单击命令按钮），可以使用"Me"关键字而不是用户窗体的名称。若要使 用"Me"关键字卸载用户窗体，使用下面的代码： Unload Me 如何使用用户窗体事件用户窗体支持许多预定义的事件，您可以将附加 VBA 过程。该事件时则该过程，您附加到该事件的运行。由用户执行的单个操作可以启动多个事件。最经常使用的用户窗体的事件包括初始化事件、， Click 事件和终止事件。 请注意VBA 模块包含事件过程可能被称为"隐藏"用户窗体模块。在模块包含事件过程中不可见 Visual Basic 编辑器的 Microsoft 项目资源管理器窗口的模块集合。您必须双击 用户窗体可以查看用户窗体代码模块的正文。 如何捕获用户窗体事件要捕获用户窗体事件，请按照这些步骤操作： 1.在 Excel 中创建一个新的工作簿。 2.在工具菜单上指向宏，然后单击Visual Basic 编辑器。
C#窗体基本控件常用方法总结说明 一．文本类控件； https://www.doczj.com/doc/c29655675.html,bel标签控件：显示用户不能编辑的文本，；label.Text=””显示文本；label.； 2.Button控件：允许用户通过单击来执行某种；1）button.Text=””在按钮上显示文本；事件，privatevoidbutton_Cli；2）窗体的AcceptButton属性设置了用户；触发的按钮控件，this.AcceptBut 一．文本类控件 1. Label标签控件：显示用户不能编辑的文本，用户无法编辑。基本用法： label.Text=””显示文本；label.Visible=true/false是否隐藏控件。 2. Button控件：允许用户通过单击来执行某种操作。基本用法： 1） button.Text=””在按钮上显示文本；单击Button控件引发Click 事件，private void button_Click(object sender,EventArags e)。 2）窗体的AcceptButton属性设置了用户每次按下Enter键都会 触发的按钮控件，this.AcceptButton=button。 3）窗体的CancelButton属性设置了用户每次按下Esc键都会触 发的按钮控件，this.CancelButton=button。 4） OnMouseEnter和OnMouseLeave事件实现鼠标指针移入移 出按钮控件时触发的事件。 3. TextBox文本框控件：获取用户输入的数据或者显示文本，用户可以进行编辑，也可以设置成只读控件。基本用法： 1） textBox.ReadOnly=true/false设置控件是否为只读。
第1章 使用窗体和控件 为了便于程序与用户间的交互，可以在Excel中创建独立的窗体，在其中添加一些控件，这样就可以让用户像使用Excel内置对话框一样，来使用窗体。不但减少了数据输入的麻烦，而且也使操作界面更加友好。本章将介绍窗体和控件的知识。 1.1Excel中的两类窗体 为了简化输入，可以在Excel工作表中通过添加控件的方式，制作一个交互性极强的表单系统。如图1-1所示的工作表也许您以前曾经看到过，它就是一个工作表窗体，其中放置了一些控件，使得输入与选择数据变得非常简单。这非常适合于开发人员给客户提供的最终Excel应用程序。 在Excel中进行各种操作时，经常会遇到在一个弹出的对话框中选择某个选项或输入某些内容而得到设置结果。如果希望自己定制对话框的外观及可用选项，那么就需要创建用户窗体。如图1-2所示为一个根据用户选择的选项来查询图书的一个查询窗体。 图1-1 一个工作表窗体的例子图1-2 一个用户窗体的例子本章剩下的部分将先介绍创建用户窗体的步骤和方法，然后介绍在工作表中使用控件的方法和技巧。 1.2使用InputBox和MsgBox函数代替窗体 在前几章中，我们已经多次用到了InputBox和MsgBox函数。使用这两个函数可以显
示简单的对话框。因此，如果不需要特别定制复杂的窗体，而只是获取用户的输入或返回一条信息，那么就可以使用InputBox和MsgBox函数来完成。 1.2.1InputBox InputBox函数分为两种，一种是VB程序中的InputBox函数，另一种是Excel中Appl ication对象的InputBox方法。它们都可以显示一个输入框，用于获取用户的输入信息，然后将返回结果赋值给一个变量以进行其他操作。Excel中的Application对象的InputBox方法比VB程序中的InputBox函数有更强大的功能。 VB程序中的InputBox函数的语法如下： InputBox(prompt, title, default, xpos, ypos, helpfile, contex t) InputBox函数中各参数的作用如下： prompt：显示在输入对话框中的文本（必选）。 title：显示在输入对话框标题栏中的文本（可选）。 default：显示在输入对话框的文本框中的默认值（可选）。 xpos和ypos：窗口左上角的屏幕坐标值（可选）。 helpfile：输入对话框中的帮助文件（可选）。 context：输入对话框中的帮助主题（可选）。 在使用InputBox函数时，通常只会使用前3个参数或者只使用前两个参数，得到如下的简化版本： InputBox(prompt, title, default) 例如，下面的代码将根据用户输入的内容返回一条信息： Sub GetInfo() Dim Ans As String Ans = InputBox("请输入", "输入信息") MsgBox "您输入的信息是：" & Ans End Sub 运行上面的代码，将显示如图1-3所示的对话框。当用户输入一个内容并单击【确定】按钮，将在一个对话框中显示所输入的内容。 图1-3 使用VB的InputBox函数打开的输入对话框 如果在上个例子中用户未输入任何内容或单击【取消】按钮，那么InputBox函数都将返回一个空字符串。为了强制要求用户输入内容，可以设置一个Do While循环，只要输
一、窗体的常用属性 1、Name属性 Name属性设置在程序代码中用于标识窗体的名字，即在编写代码时用于称呼某个窗体。 说明： 该属性只能在设计时属性窗口中（名称）更改，运行时只读。注： ME是VB中的一个关键字，代表当前窗体。 2、Caption属性 语法：object．Caption=string Caption属性设置在窗体的标题栏中的文本，当窗体被最小化时，该文本将显示在Windows的任务栏中相应窗体的图标 上。 3、ControlBox、MaxButton和MinButton属性ControlBox、MaxButton和MinButton属性用于控件窗体是否有控制菜单和最大化、最小化按钮。默认值均为True ●若将ControlBox属性设为False，则将取消窗体的控件 菜单和所有的控制按钮 ●若将MaxButton属性设为False，则最大化按钮将失效 ●若将MinButton属性设为False，则最小化按钮将失效 说明： ①、控件菜单 ●为了显示控制菜单，还必须将窗体的BorderStyle属性值 设置为1(固定单边框)、2(可调整的边框)或3(固定对话框)。 ●相关属性的取值将决定窗体控制菜单中可以使用的命令。 如：MaxButton和MinButton属性设置为False，控件菜
单中的最大化和最小化命令交变为无效。 ●当ControlBox属性设为False时不显示控制菜单，此时 窗体右上角将不显示“最大化”按钮、“最小化”按钮和“关闭”按钮。 ●要在窗体中显示“最大化”按钮，应将BorderStyle属性 值设置为1(固定单边框)、2(可调整的边框)，且ControlBox属性设为True。 ●要在窗体中显示“最小化”按钮，应将BorderStyle属性 值设置为1(固定单边框)、2(可调整的边框)，且ControlBox属性设为True。 4、BorderStyle属性 语法：object．BorderStyle=value 功能：设置对象的边框样式。 说明： ①、value是一个值或常数，用于决定边框样式。取值含义如下： ②、0(None)：无边框、无标题栏、无控制菜单、无最大化、最小化和关闭按钮 ③、1(Fixed Single)：固定单边框，大小不可调，有标题栏、控件菜单及关闭按钮。 ●若将MaxButton属性设置为TRUE时，添加最大化按钮 ●若将MinButton属性设置为TRUE时，添加最小化按钮 ●只能用最大化和最小化按钮改变窗体大小 ④、2(Sizable(默认值))：可调整边框；有标题栏及所有控制按钮和控制菜单 ●可以使用控件菜单、最大化按钮、最小化按钮或拖拽窗体 的边框来改变窗体的大小 ⑤、3(Fixed Dialog)固定对话框，大小不可调；有标题栏、关闭按钮和控制菜单 ●不能将MaxButton和MinButton属性设置为TRUE，即不 能添加最大化按钮和最小化按钮，不能改变窗体的大小。
目录 VBA常用技巧.................................................... 第8章控件与用户窗体...................................... 技巧1.................................................................... 限制文本框的输入 技巧2........................................................ 文本框添加右键快捷菜单 技巧3................................................................ 文本框回车自动输入 技巧4................................................................ 自动选择文本框内容 技巧5................................................................ 设置文本框数据格式 技巧6............................................................ 限制文本框的输入长度 技巧7................................................................ 将光标返回文本框中 技巧8.................................................................... 文本框的自动换行 技巧9................................................................ 多个文本框数据相加 技巧10.............................................................. 控件跟随活动单元格 技巧11.......................................................................... 高亮显示按钮 技巧12...................................... 组合框和列表框添加列表项的方法12-1....................................... 使用RowSource属性添加列表项 12-2................................................. 使用List属性添加列表项 12-3........................................... 使用AddItem方法添加列表项技巧13...................................... 去除列表框数据源的重复值和空格 技巧14...................................................................... 移动列表框条目 技巧15.......................................................... 允许多项选择的列表框
实验5、窗体与控件 实验课时： 课内：2课时，课外：2课时 实验目的： 掌握用户界面设计的原则与方法，熟练使用窗体及常用控件的属性、事件和方法来处理业务。 实验内容： 项目A ：界面设计之4S 店服务公告 Christopher 汽车中心开展与车辆有关的一切业务，包括新车、二手车的租售、汽车的保养和修理、零件的销售及洗车等等。本项目要做的，就是为该中心设计一个程序来显示各部门的最新通知。该项目仅包含一个窗体，最终的窗体运行时截图类似： 实验内容、具体要求及步骤为： 1. 在计算机D 或E 分区创建“你的文件夹”（类似“198009010101文立斌”） 2. 启动Visual Studio 2010，在“你的文件夹”内创建一个解决方案（项目），解决方案 （项目）名称类似“文立斌A ”，窗体名称类似“frm 文立斌A ” 3. 如以上运行时截图及下图所示，窗体顶部设计两个Label （标签）控件，其中左边的Label 图片、数据库资源请垂询894867898@https://www.doczj.com/doc/c29655675.html,
显示静态文字“Special Notices：”，右边的Label将用于动态显示4S店的各种通知： 4.之后，如以上运行时截图及下图所示，请在窗体上设计一个文字内容为“Hours”的 CheckBox（复选框）控件，其右边设计一个Label控件。CheckBox控件最常用的事件是CheckedChanged（选择已发生变化），最常用的属性自然是Checked（是否已选中）。 现在，请为该控件的CheckedChanged事件编写必要的代码，使得该控件已被选中时，其右边的Label控件中显示文字“Open 24 Hours – 7 days a week”，反之则不显示任何文字： 提示：检查CheckBox的Checked属性值是true还是false，并根据该属性的值设置右边Label控件的Text属性即可——不要告诉我Text属性是干什么的哦！ 5.往下则设计四个PictureBox（图片框）控件，每个图片框上方各设计一个Label来指 出图像所代表的部门：Auto Sales，Service，Detail，Employeement Opportuniti： 图片来源： 图片控件图像文件名称 Auto Sales Cars.ico Service Center Wrench.ico Detail Shop Water.ico Employeement Opportuniti Mail12.ico 注意：先将这些图片文件复制到你的文件夹内，再按如下步骤设置每个PictureBox的Image（图像）属性： ①右键单击Image属性旁边的按钮 ②在系统显示的“选择资源“对话框中，选中“本地资源”复选框、单击【导入】按 钮，最后单击【确定】按钮 6.如下图所示，友好的程序设计要求为这里的四个控件都添加浮动提示文字： 如何设置哩？ ①从工具箱往窗体上拖一个名为ToolTip（工具提示）的不可视组件，这个组件在后 台服务，为窗体或其控件提供浮动提示，添加该控件后，您将发现，窗体底部多了 一个不可视的组件对象： 而窗体及控件的属性中都多了一个有点另类的属性：
目录 VBA常用技巧 ................................................................................................. 错误！未定义书签。 第8章控件与用户窗体 (4) 技巧1限制文本框的输入 (4) 技巧2文本框添加右键快捷菜单 (6) 技巧3文本框回车自动输入 (10) 技巧4自动选择文本框内容 (11) 技巧5设置文本框数据格式 (12) 技巧6限制文本框的输入长度 (14) 技巧7将光标返回文本框中 (15) 技巧8文本框的自动换行 (17) 技巧9多个文本框数据相加 (19) 技巧10控件跟随活动单元格 (20) 技巧11高亮显示按钮 (21) 技巧12组合框和列表框添加列表项的方法 (23) 12-1使用RowSource属性添加列表项 (23) 12-2使用List属性添加列表项 (24) 12-3使用AddItem方法添加列表项 (25) 技巧13去除列表框数据源的重复值和空格 (27) 技巧14移动列表框条目 (29) 技巧15允许多项选择的列表框 (32) 技巧16多列组合框和列表框的设置 (35) 16-1多列组合框和列表框添加列表项 (35) 16-2多列列表框写入工作表 (37) 技巧17输入时逐步提示信息 (39) 技巧18二级组合框 (46) 技巧19使用DTP控件输入日期 (48) 技巧20使用RefEdit控件选择区域 (51) 技巧21如何注册控件 (52) 技巧22遍历控件的方法 (55) 22-1使用名称中的变量遍历控件 (55) 22-2使用对象类型遍历控件 (57) 22-3使用程序标识符遍历控件 (58) 22-4使用名称中的变量遍历图形 (59) 22-5使用FormControlType属性遍历图形 (60) 技巧23使微调框最小变动量小于1 (61) 技巧24不打印工作表中的控件 (63) 24-1设置控件格式 (63) 24-2设置控件的printobjcet属性 (65) 技巧25在框架中使用滚动条 (65) 技巧26使用多页控件 (67) 技巧27标签文字垂直居中对齐 (69)