'设置合并。
Fg1 . MergeCol( 0) = True
'排序
Fg1 . Col = 0
Fg1 . ColSel = Fg1 . Cols – 1
Fg1 . Sort = 1 '一般为升序。
Fg1 . MergeCol( 0) = True
'排序
Fg1 . Col = 0
Fg1 . ColSel = Fg1 . Cols – 1
Fg1 . Sort = 1 '一般为升序。
重拾VB6（9）：标准控件的使用详述（下）
发布时间：2020-12-16 23:29:38 所属栏目：大数据 来源：网络整理
导读：来自MSDN-2001-OCT: Visual Tools and Languages/Visual Studio 6.0 Documentation/Visual Basic Documentation/Using Visual Basic/Programmer’s Guide/Part 2: What Can You Do With Visual Basic/ Using Visual Basic's Standard Controls 一、使用 Micr
|
来自MSDN-2001-OCT: Visual Tools and Languages/Visual Studio 6.0 Documentation/Visual Basic Documentation/Using Visual Basic/Programmer’s Guide/Part 2: What Can You Do With Visual Basic/Using Visual Basic's Standard Controls
一、使用 Microsoft Hierarchical FlexGrid 控件 （1）Hierarchical FlexGrid 控件不允许用户对它绑定或包含的数据进行编辑。不过，通过将它与文本框结合起来使用，Hierarchical FlexGrid 控件的单元格编辑能力也是可以实现的。 （2）Hierarchical FlexGrid 控件是 Visual Basic 5.0 中使用的 FlexGrid 控件的升级版，但是FlexGrid 控件不能够自动升级到 Hierarchical FlexGrid 控件。 （3）Microsoft Hierarchical FlexGrid Control 6.0 1.1 将数据绑定到 Hierarchical FlexGrid （1）在开始使用它的功能之前，必须先将数据绑定到 Hierarchical FlexGrid。要将数据绑定到控件，可以使用 Visual Basic 新的 Data Binding Manager，或者通过编程实现。 （2）使用 Visual Basic Data Binding Manager 设置 DataSource：将MSHFlexGrid 控件DataSource 属性设置为包含了希望被绑定到 Hierarchical FlexGrid 的 Command 对象的 DataEnvironment 对象。 将 DataMember 属性设置为 Data Environment 中的一个 Command 对象。如果希望在 Hierarchical FlexGrid 中查看分层结构的数据，那么必须指定 Command 分层结构中最顶部的父 Command 对象作为 DataMember。 （3）以编程方式将数据绑定到 Hierarchical FlexGrid：
（1）允许进行格式设置的带区元素包括：列标头、网格线、颜色和缩进。 （2）如果绑定到非分层结构的 Recordset，那么控件中将只有一个带区，而且该带区被称为 Band 0。没有其他带区，因为带区以 Command 分层结构中的 Recordsets 为基础。ADO 分层结构 Recordset 中的每一个 Recordset 都将被创建一个带区。 （3）改变带区的布局：通过改变带区的布局，带区内的字段显示方式将得以改变。在缺省情况下，带区的诸字段将沿水平方向排列，同标准的网格一样。 （4）显示列标头：如果带区以水平方式显示，那么可以为 Hierarchical FlexGrid 设置标头。标头直接显示在带区之上，并且为 Hierarchical FlexGrid 中的每一个带区分别显示一次。如果在 Hierarchical FlexGrid 的顶部和左边只需要为每个带区显示一组标头，请使用固定单元格取代标头。 （5）
（1）要取得与带区和字段信息有关的信息，右击 Hierarchical FlexGrid，然后从快捷菜单中选择“检索结构”。在取得了数据的结构之后，信息与 Hierarchical FlexGrid 保存在一起。在取得了结构信息之后，设计时 Hierarchical FlexGrid 中将显示出每个带区和字段更新之后的信息。 注意 如果 DataSource 的结构发生了变化，那么只有重新提取结构才能使这些变化在 Hierarchical FlexGrid 中反映出来。 （2）要清除带区与字段信息，右击 Hierarchical FlexGrid，然后选择从快捷菜单中选择“清除结构”。
（1）Hierarchical FlexGrid 中包含多个可以定制的区域，包括：标准、带区、固定的、标头、缩进、未填充的。 （2）定制标准区域的显示方式：标准区域中包含被绑定到数据的单元格。可设置的属性分别在通用、style、font选项卡上。 （3）定制固定区域的显示方式：可以创建固定显示在 Hierarchical FlexGrid 中的行或者列。为了便于用户阅读，应该使用一个固定的区域来显示一个标头集合，而不是在每个带区中使用重复的列标头。该区域将是静态的，它标识了下面的行或者右边的列。在“通用”选项卡上，指定“固定行”和“固定列”文本框中各自的行数和列数，然后单击“应用”。在“样式”选项卡上，从“固定文本样式”框中为固定文本选择显示风格，然后单击“应用”。 （4）定制标头的显示方式：在“带区”选项卡中，从“文本样式标头”框中选择一种标头样式，然后选择”ColumnHeaders”。注意 为了防止 Hierarchical FlexGrid 显示重复的标头，必须在“通用”选项卡中将 Fixed Row 文本框设置为 0。此外，如果希望在 Hierarchical FlexGrid 的顶部只显示带区的一组标头，那么必须使用固定行，而不是列标头。
fg3
.
AddItem
"*"
+
t
+
"Meals"
…… s = "" + t + "Flint's BBQ" + t + "25-Apr-95" + t + "35.00" For i = 0 To 5 fg3 . AddItem s Next '在第一列显示折叠/扩充符号图。 If fg3 . TextArray( r * fg3 . Cols) = "*" Then fg3 . TextArray( r * fg3 . Cols) = "+" Else fg3 . TextArray( r * fg3 . Cols) = "*" End If '在当前标头下扩充项目。 r = r + 1 If fg3 . RowHeight( r) = 0 Then Do While fg3 . TextArray( r * fg3 . Cols) = "" fg3 . RowHeight( r) = - 1 ' Default row height. r = r + 1 If r >= fg3 . Rows Then Exit Do Loop '在当前标头下折叠项目。 Else Do While fg3 . TextArray( r * fg3 . Cols) = "" fg3 . RowHeight( r) = 0 '隐藏行。 r = r + 1 If r >= fg3 . Rows Then Exit Do Loop End If 二、使用 HScrollBar 和 VScrollBar 控件 2.1 滚动条的使用场合 水平、垂直滚动条控件不同于 Windows 中内部的滚动条或 Visual Basic 中那些附加在文本框、列表框、组合框或 MDI 窗体上的滚动条。无论何时，只要应用程序或控件所包含的信息超过当前窗口（或者在 ScrollBars 属性被设置成 True 时的文本框和 MDI 窗体）所能显示的信息，那些滚动条就会自动出现。 目前的 Windows 界面指南则建议用滑块取代滚动条作为输入设备。 滚动条在 Visual Basic 中仍然有价值，因为它为那些不能自动支持滚动的应用程序和控件提供了滚动功能。比如单独一个 PictureBox 控件无法实现滚动功能─ 因为 PictureBox 控件不能自动添加滚动条。 2.2 事件和属性 可用 Scroll 事件访问滚动条被拖动后的数值。在释放滚动框或单击滚动条或滚动箭头时，Change 事件就会发生。 Value 属性（缺省值为 0）是一个整数，它对应于滚动框在滚动条中的位置。 对于单击滚动条的情况可用 LargeChange 属性，对于单击滚动条两端箭头的情况可用 SmallChange 属性。
三、使用 Image 控件 Image 控件用来显示图形。它可显示下面几种格式的图形：位图、图标、图元文件、增强型图元文件、JPEG 或 GIF 文件。除此之外， Image 控件还响应 Click 事件，并可用 Image 控件代替命令按钮或作为工具条的项目，还可用来制作简单动画。 Image 控件使用的系统资源比 PictureBox 控件少而且重新绘图速度快，但它仅支持 PictureBox 控件的一部分属性、事件和方法。两种控件都支持相同的图片格式，但是，在 Image 控件中可以伸展图片的大小使之适合控件的大小。在 PictureBox 控件中不能这样做。 LoadPicture 函数的设置允许您从.ico 或 .cur 文件中选择特定颜色深度和大小的图象。 为了清除 Image 控件中的图形，可使用不指定文件名的 LoadPicture 函数。例如：
用标签创建访问键：如果要将 Caption 属性中的字符定义成访问键，应将 UseMnemonic 属性设置为 True。为在 Label 控件中显示连字符，应将 UseMnemonic 属性设置为 False。 标签不接受焦点，因此焦点会按照 tab 键次序自动移动到下一控件处。可用这种技术为文本框、图片框、组合框、列表框、驱动器列表框、目录列表框、网格和图象指定访问键。 五、使用 Line 控件 在运行时，可更改直线控件的 X1、X2、Y1 和 Y2 属性来移动控件或调整直线控件的大小。不能用 Move 方法移动直线。 六、使用 ListBox 控件 （1）为了向列表框中添加项目，应使用 AddItem 方法，其语法如下：box.AddItem item[,index] （2）为了在指定位置添加项目，应对新项目指定索引值。 （3）通过设置 ListBox 控件“属性”窗口的 List 属性还可在设计时向列表添加项目。在选定了 List 属性选项并单击向下箭头时，可输入列表项目并按 CTRL+ENTER 组合键换行。只能在列表末端添加项目。所以，如果要将列表按字母顺序排序，则应将 Sorted 属性设置成 True。 （4）可用 RemoveItem 方法从列表框中删除项目。 （5）获取当前选定项目值的最简单方法是使用 Text 属性。 （6）可用 List 属性访问列表的全部项目。 （7）如果要了解列表中已选定项目的位置，则用 ListIndex 属性。 （8）为了返回列表框中项目的数目，应使用 ListCount 属性。 （9）可用 Columns 属性指定列表框中的列数目。该属性如果取值为1，则显示水平滚动的单列列表框；若大于1，则水平滚动的多列列表框。 （10）用户可从列表中选择多个项目。设置 MultiSelect 属性来处理标准列表框中的多项选择。 七、使用 PictureBox控件 （1）要使 PictureBox 控件自动调整大小以显示完整图形，应将其 AutoSize 属性设置为 True。这样控件将自动调整大小以适应加载的图形。 与 Image 控件不同， PictureBox 控件不能伸展图象以适应控件尺寸。 （2）图片框象窗体一样，可用来显示图象方法（例如 Circle、Line 和 Point）的输出。
（3）将 AutoRedraw 属性设置为 True 并使用 Print 方法就可在 PictureBox 控件上输出文本。例如： 使用 Print 方法时可修改字体样式和大小，也可使用 CurrentX、CurrentY、Height 和 Width 属性对齐图片框中的文本 八、使用 TextBox 控件 缺省时，文本框中输入的字符最多为 2048 个。若将控件的 MultiLine 属性设置为 True，则可输入多达 32K 的文本。 Visual Basic 提供 PasswordChar 和 MaxLength 这两个文本框属性，大大简化了密码文本框的创建。 取消文本框中的击键值：在KeyPress 事件中KeyAscii = 0 对于字符串中要显示的一对引号，必须再插入一对附加的引号。Visual Basic 将并列的两对引号解释为嵌入的引号。
每个 Timer 控件都有 Interval 属性，指定定时器事件之间的毫秒数。除非禁止此属性，否则定时器在大致相等的时间间隔不断接受事件（称作定时器事件会更贴切）。 间隔的取值可在 0 到 64,767 之间（包括这两个数值），这意味着即使是最长的间隔也不比一分钟长多少（大约 64.8 秒）。系统每秒生成 18 个时钟信号─ 所以即使用毫秒衡量 Interval 属性，间隔实际的精确度不会超过 18 分之一秒。因为存在某些内部的错误可能性，所以应将间隔设置为精确度的一半。 运行时，定时器不可见，所以其位置和大小无关紧要。 （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |