VB方法大全.docVIP

AddItem 方法 示例?/a 应用于 用于将项目添加到 ListBox 或 ComboBox 控件，或者将行添加到 MS Flex Grid 控件。不支持命名参数。 语法 object.AddItem item, index AddItem 方法的语法包含下列部分：: 部分 描述 object 必需的。一个对象表达式，其值为“应用于”列表中的一个对象。 Item 必需的。字符串表达式，它用来指定添加到该对象的项目。这仅仅对于 MS Flex Grid 控件，才能使用 tab字符（字符代码 09）分隔将要插入到新添加行中每列的多重字符串。 Index 可选的。是整数，它用来指定新项目或行在该对象中的位置。对于 ListBox 或 ComboBox 控件的首项，或者对于 MS Flex Grid 控件的首行，index 为 0。 说明 如果所给出的 index 值有效，则 item 将放置在 object 中相应的位置。如果省略 index，当 Sorted 属性设置为 True 时，item 将添加到恰当的排序位置，当 Sorted 属性设置为 False 时， item 将添加到列表的结尾。 绑定到 Data 控件的 ListBox 或 ComboBox 控件不支持 AddItem 方法。 AddItem 方法示例 本示例使用 Addltem 方法增加 100 项给一个列表框。要检验此示例，可将本例代码粘贴到一个带有被命名为 List1 的 ListBox 控件的窗体的声明部分，然后按 F5 键并单击该窗体。 Private Sub Form_Click () Dim Entry, I, Msg 声明变量。 Msg = Choose OK to add 100 items to your list box. MsgBox Msg 显示信息。 For I = 1 To 100 计数值从 1 到 100。 Entry = Entry I 创建输入项。 List1.AddItem Entry 添加该输入项。 Next I Msg = Choose OK to remove every other entry. MsgBox Msg 显示信息。 For I = 1 To 50 确定如何 List1.RemoveItem I 每隔一项 Next I 删除。 Msg = Choose OK to remove all items from the list box. MsgBox Msg 显示信息。 List1.Clear 清除列表框。 End Sub 应用于：　 ComboBox 控件 ListBox 控件 相关基础知识：　 命名参数 一参数，在对象库中预先定义了其名称。对每个参数，不必拘泥于语法所规定的特定顺序来提供值，而是只需按任何顺序用命名参数分配值。例如，假设一方法接受了三个参数： DoSomeThing namedarg1, namedarg2, namedarg3 在对命名参数赋值时，可使用以下语句： DoSomeThing namedarg3 := 4, namedarg2 := 5, namedarg1 := 20 注意，命名的参数不必按语法中安排的正规顺序出现。 对象表达式 说明具体对象的表达式，可以包含对象的容器。例如，应用程序可以拥有 Application 对象，其中包含 Document 对象，而 Document 对象又包含 Text 对象。 字符串表达式 任何其值为一连串字符的表达式。字符串表达式的元素可包含返回字符串的函数、字符串文字、字符串常数、字符串变量、字符串 Variant 或返回字符串 Variant (VarType 8) 的函数。 Circle 方法示例?应用于 在对象上画圆、椭圆或弧。 语法 object.Circle [Step] (x, y), radius, [color, start, end, aspect] Circle 方法的语法有如下的对象限定符和部分： 部分 描述 object 可选的。 对象表达式，其值为“应用于”列表中的对象。如果object 省略，具有焦点的窗体作为object。 Step 可选的。关键字 ，指定圆、椭圆或弧的中心，它们相对于当前 object 的 CurrentX 和 CurrentY 属性提供的坐标。 (x, y) 必需的。 Single （单精度浮点数），圆、椭圆或弧的中心坐标。object 的 ScaleMode 属性决定了使用的度量单位。 ra