Question

VB的List1控件所有的使用方法

就是这个控件的所有使用方法如 怎么样分割 怎么样写入 怎么样读取 怎么样判断输入了几行 怎么样判断选中了哪行 怎么样判断哪行里有什么东西等等谁给的全 我给谁分 可加精 可追分

Answer 1

AddItem 方法
用于将项目添加到 ListBox 或 ComboBox 控件，或者将行添加到 MS Flex Grid 控件。不支持命名参数。语法object.AddItem item, indexAddItem 方法的语法包含下列部分：:部分 描述
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 方法。
Clear 方法（Clipboard、ComboBox、ListBox）
用于清除 ListBox，ComboBox 或系统剪贴板的内容。语法object.Clearobject 所在处代表一个对象表达式，其值为“应用于”列表中的一个对象。说明绑定到 Data 控件的 ListBox 或 ComboBox 控件不支持 Clear 方法。
Drag 方法
用于除了 Line、Menu、Shape、Timer 或 CommonDialog 控件之外的任何控件的开始、结束或取消拖动操作。不支持命名参数。语法object.Drag actionDrag 方法的语法包含下列部分：部分 描述
object 必需的。是一个对象表达式，其值为“应用于”列表中的一个对象。 如果省略 object，则认为该对象事件过程包含有 Drag 方法。
action 可选的。是一个常数或数值，如“设置值”中所描述的，它指定要执行的动作。如果省略 action，则缺省值为开始拖动对象。
设置值action 的设置值有：常数 值 描述
vbCancel 0 取消拖动操作
vbBeginDrag 1 开始拖动 object
vbEndDrag 2 结束拖放 object
说明上述常数在 Visual Basic (VB) 对象浏览器的对象库里列出。只有当对象的 DragMode 属性设置为手工（0）时，才需要使用 Drag 方法控制拖放操作。但是，也可以对 DragMode 属性设置为自动（1 或 vbAutomatic）的对象使用 Drag。如果在拖动对象过程中想改变鼠标指针形状，使用 DragIcon 或 MousePointer 属性。如果没有指定 DragIcon 属性，则只能使用 MousePointer 属性。Drag 方法一般是同步的，这意味着其后的语句直到拖动操作完成之后才执行。然而，如果该控件的 DragMode 属性设置为 Manual (0 or vbManual)，则它可以异步执行。
Move 方法
用以移动 MDIForm、Form 或控件。不支持命名参数。语法object.Move left, top, width, heightMove 方法的语法包含下列部分：部分 描述
object 可选的。一个对象表达式，其值为“应用于”列表中的一个对象。如果省略 object，带有焦点的窗体缺省为 object。
left 必需的。单精度值，指示 object 左边的水平坐标 (x-轴)。
top 可选的。单精度值，指示 object 顶边的垂直坐标 (y-轴)。
width 可选的。单精度值，指示 object 新的宽度。
height 可选的。单精度值，指示 object 新的高度。
说明只有 left 参数是必须的。但是，要指定任何其它的参数，必须先指定出现在语法中该参数前面的全部参数。例如，如果不先指定 left 和 top 参数，则无法指定 width 参数。任何没有指定的尾部的参数则保持不变。对于 Frame 控件中的窗体和控件，坐标系统总是用缇 。移动屏幕上的窗体或移动 Frame 中的控件总是相对于左上角的原点 (0,0)。移动 Form 对象或 PictureBox 中的控件（或 MDIForm 对象中的 MDI 子窗体）时，则使用该容器对象的坐标系统。坐标系统或度量单位是在设计时 用 ScaleMode 属性设置。在运行时 使用 Scale 方法可以更改该坐标系统。
OLEDrag 方法
引起部件初始化 OLE 拖放操作。语法object.OLEDragobject 所在处代表对象表达式，其值是“应用于”列表中的一个对象。说明当调用 OLEDrag 方法时，部件的 OLEStartDrag 事件发生，允许向目标部件提供数据。
Refresh 方法
强制全部重绘一个窗体或控件。语法object.Refresh object 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。说明在下列情况下使用 Refresh 方法： 在另一个窗体被加载时显示一个窗体的全部。
更新诸如 FileListBox 控件之类的文件系统列表框的内容。
更新 Data 控件的数据结构。
Refresh 方法不能用于 MDI 窗体，但能用于 MDI 子窗体。不能在 Menu 或 Timer 控件上使用 Refresh 方法。通常，如果没有事件发生，窗体或控件的绘制是自动处理的。但是，有些情况下希望窗体或控件立即更新。例如，如果使用文件列表框、目录列表框或者驱动器列表框显示当前的目录结构状态，当目录结构发生变化时可以使用 Refresh 更新列表。可以在 Data 控件上使用 Refresh 方法来打开或重新打开数据库（如果 DatabaseName, ReadOnly, Exclusive 或 Connect 属性的设置值发生改变），并能重建控件的 Recordset 属性内的 dynaset。
RemoveItem 方法
用以从 ListBox 或 ComboBox 控件中删除一项，或从 MS Flex Grid 控件中删除一行。不支持命名参数。语法object.RemoveItem indexRemoveItem 方法的语法包含下列部分：部分 描述
object 必需的。一个对象表达式，其值为“应用于”列表中的一个对象。
index 必需的。一个整数，它表示要删除的项或行在对象中的位置。对于 ListBox 或 ComboBox 中的首项或 MS Flex Grid 控件中的首行，index = 0。
说明被绑定到 Data 控件的 ListBox 或 ComboBox 不支持 RemoveItem 方法。
SetFocus 方法
将焦点移至指定的控件或窗体。语法object.SetFocusobject 所在处代表对象表达式，其值是“应用于”列表中的一个对象。说明对象必须是 Form 对象、MDIForm 对象或者能够接收焦点的控件。调用 SetFocus 方法以后，任何的用户输入将指向指定的窗体或控件。焦点只能移到可视的窗体或控件。因为在窗体的 Load 事件完成前窗体或窗体上的控件是不可视的，所以如果不是在 Form_Load 事件过程完成之前首先使用 Show 方法显示窗体的话，是不能使用 SetFocus 方法将焦点移至正在自己的 Load 事件中加载的窗体的。也不能把焦点移到 Enabled 属性被设置为 False 的窗体或控件。如果已在设计时将 Enabled 属性设置为 False，必须在使用 SetFocus 方法使其接收焦点前将 Enabled 属性设置为 True。
ShowWhatsThis 方法
显示 Windows 95 Help 所提供的“这是什么”弹出式窗口使用的 Help 文件中选定的一个主题。语法object.ShowWhatsThisobject 所在处代表一个对象表达式，其值是“应用于”列表中的一个对象。说明ShowWhatsThis 方法对于从应用程序上下文菜单中提供上下文敏感 Help非常有用。该方法显示语法中指定对象的 WhatsThisHelpID 属性所标识的主题。
ZOrder 方法
将指定的 MDIForm，Form 或控件放置在其图层的z-顺序的前端或后端。不支持命名参数。语法object.ZOrder positionZOrder 方法的语法包含下列部分：部分 描述
object 可选的。一个对象表达式，其值为“应用于”列表中的一个对象。如果省略 object，则具有焦点的 Form 对象缺省为 object。
Position 可选的。一个整数，它用以指示 object 相对于同一 object 其它实例的位置。如果 position 为 0 或被省略，则 object 定位在Z-顺序前面。如果 position 为 1，则 object 定位在Z-顺序后面。
说明在设计时选择“编辑”菜单中的“置前”或“置后”菜单命令，可以设置对象的Z-顺序。在 MDIForm 对象内，Zorder 根据 position 的数值决定将 MDI子窗体放置到 MDI 客户区的前面或后面。对于 MDIForm 或 Form 对象，Zorder 根据 position 的数值决定将窗体放置到屏幕的前面或后面。因此，窗体可以显示在其它运行中的应用程序的前面或后面。有三个图层与窗体和容器相关联。后层是显示图形方法结果的绘图空间。下一个是中层，用来显示图形对象和 Label 控件。前层显示所有非图形控件，如 CommandButton、CheckBox 或 ListBox。靠近前层的层中包含的东西将覆盖该层后面的各层包含的东西。Zorder 只对该对象在其中显示的那一层内的各个对象进行重排。

Answer 2

1）List Box控件常用的方法 参数：
AddItem
向列表框添加新项目，其格式为：
ListBox控件名．AddItem＜项目＞[，＜索引值＞]
其中：
<项目>为字符串表达式，表示添加到列表框中的新项目。
<索引值>为数值表达式，指定在列表框中插入新项目的位置。若为0，则插入到第一个项目位置；若缺省且Sorted属性为False，则插入到最后一个项目位置；
若缺省且Sorted属性为True，则插入到合适的排序位置。

RemoveItem
从列表框中删除项目，其格式为：
ListBox控件名．RemoveItem＜索引值＞

Clear
清除列表框中所有项目，其格式为：
ListBox控件名.Clear
例如添加代码到List1列表框中，运行后的结果如下：Private Sub Form_Load()List1.AddItem "Germany"List1.AddItem "India"List1.AddItem "France"List1.AddItem "USA"List1.AddItem "Japan", 0List1.AddItem "China", 1End Sub
要从列表中删除项目，可使用RemoveItem方法，如要删除列表中的第一个项目，可添加如下代码：Private Sub Command1_Click()List1.RemoveItem 0End Sub要删除连结版或标准版的列表框、组合框中的所有项目。可使用Clear方法：List1.Clear注意：1）可以在设计时添加项目。做法：选列表框“属性”窗口中[List]属性，在下拉的空白框中输入项目，并按[CTRL]+[回车]键进行换行。2）只能在列表末端添加项目。3）如果要将列表按字母顺序排序，则应将“Sorted”属性设置为“True”，且省略索引（否则，使用带有index参数的AddItem方法可能会导致不可预料的非排序结果），排序时不区分大小写。（2）常用属性属性 描述 代码及界面显示
List （1）在设计时可向列表框中添加新项目，输人时用Ctrl+Enter组合键换行（2）在代码中可用来访问列表框中的所有项目，它包含了一个字符串数组，列表框中的每个项目都是这个数组的元素。其引用格式为：
s$=ListBox控件名．List(索引值)
其中：<索引值>为数值表达式，指定项目在列表中的位置，它是从0开始的。
例：s$=list1.list(6)将列出list1的第七项内容。
Private Sub Command1_Click()
Text1.Text = List1.List(2)
End Sub
也可改变数组中已有的值，格式：
ListBox控件名．List(索引值)=s$
例list1.list(3)="AAAA"将把list1的第四项的内容设为AAAA。 Option Explicit
Private Sub Command1_Click()
Text1.Text = "You have" & List1.ListCount & "_entrifs lister"
End SubPrivate Sub Command2_Click()
Text1.Text = List1.List(3)
End Sub Private Sub Command3_Click()
Text1.Text = List1.ListIndex
End SubPrivate Sub Form_Load()
List1.AddItem "Germany"
List1.AddItem "India"
List1.AddItem "France"
List1.AddItem "Canada"
List1.AddItem "USA"
List1.AddItem "Japan", 0 R>List1.AddItem "China", 1
End Sub Private Sub List1_Click()
If List1.Text = "Canada" Then
Text1.Text = "Canada have 24 million people."
End If
End Sub

ListCount 返回列表框中项目的总数，只在运行时可用。例：
Private Sub Command2_Click()
Text1.Text = "You have" & List1.ListCount & "_entrifs lister"
End Sub
ListIndex 返回在列表框中当前选定项目的位置，只在运行时可用。未选定任何项目时，其值为-l。例：
Private Sub Command3_Click()
Text1.Text = List1.ListIndex
End Sub
Text 存放当前在列表框中选定的项目，即List(ListIndex)的值。例：
Private Sub List1_Click()
If List1.Text = "Canada" Then
Text1.Text = "Canada have 24 million people."
End If
End Sub
Columns 指定列表框中的列数。其值为0时，列表框以垂直滚动的单列方式显示；为l时，列表框以水平滚动的单列方式显示；大于l时，列表框以水平滚动的多列方式显示。 Option ExplicitPrivate Sub Form_Load()
Dim i As Integer
For i = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(i)'“Columns”属性0
List2.AddItem Screen.Fonts(i)'“Columns”属性1
Next i
End Sub

MultiSelect 表明是否允许用户从列表框中选定多个项目以及选定的方式。其值为0时，只允许选择一个项目，不允许复选；为1时，允许用户通过单击或按下空格键选定或撤消多个项目；为2时，允许用户使用Shift和Ctrl组合操作来选定或撤消多个项目。
语法结构： object.MultiSelect = [ Number ]
Sorted 为True时，自动将列表按字母顺序重新排列，排序时不区分大小写。
Style 表示列表框中项目的显示形式，运行时只读。其值为0时，为标准方式显示；为1时，在每个项目前加上一个复选框。
Selected 该属性实际上是一个数组，各个元素的值为True或False，表明是否选择了该项。
用下面的语句可以检查指定的表项是否被选择（其中“索引值从0开始）：
ListBox控件名．Selected(索引值)
用下面的语句可以选择或取消指定的表项：
ListBox控件名．Selected(索引值)=Ture│False
</FONT>

Answer 3

有的使用方法

Answer 4

FGBFSA

Answer 5

你下载个vb控件手册什么的，全有