bo

给我点时间，一定给你个满意的答案！

1.ListBox1.ListIndex=ListBox1.Items.Count-1 直接将当前ListBox1的挑选Index设置为当前ListBox1的items的最后一个索引号。 2.ListBox1.Items.Count-1表示当前Listitem的最后行号，假如listbox有20条记录，那么index值是0-19，所以最后的listbox的item的index号是Items.Count-1由于我没有安装visualstudio的开发环境，具体的属性我记的不太准了，你实验下：ListBox1.ListIndex=ListBox1.Items.Count-1(应该是这个）或者ListBox1.SelectIndex=ListBox1.Items.Count-1。

if (listBox1.Items[i].selected)this.listBox1.Items.RemoveAt(i);} 这样明显有问题 你item里面有10个元素 你删了3个 还有几个? remove 1之后 原来的2就变成了1 原来的1被移除了 你在移除2 就是移除的是3ListBox a1 = new ListBox();object[] selected_objs = new object[a1.SelectedItems.Count];a1.SelectedItems.CopyTo(selected_objs, 0);foreach (object oval in selected_objs){a1.Items.Remove(oval);}

end if

你要怎么添加？textbox里换行的话 listbox也要换行吗？，还是将textbox里的所有文本直接添加到listbox的第一行呢?

ListBoxThis is a regular listbox control. It enables the user to select a value of a property from a pre-authored list of choices. This control supports only single select listboxes. The possible values are read from the Listbox Table. Note that the string displayed is not necessarily the same as the value that the user is choosing. If the control is created with the Sorted, the items are listed according to the Ordering column of the table. If the style bit is not set, the column is ignored.ListBox 控件显示项目列表，从其中可以选择一项或多项。如果项目总数超过了可显示的项目数，就自动在 ListBox 控件上添加滚动条。ListViewThe ListView control displays items using one of four different views. You can arrange items into columns with or without column headings as well as display accompanying icons and text.ListView 控件可使用四种不同视图显示项目。通过此控件，可将项目组成带有或不带有列标头的列，并显示伴随的图标和文本。 ListView 控件是 Mscomctl.ocx 文件中一组 ActiveX 控件的一部分。若要在应用程序中使用 ListView 控件，则必须将 Mscomctl.ocx 文件添加到工程中。当发行应用程序时，请将 Mscomctl.ocx 文件安装到用户的 Microsoft Windows System 或 System32 目录下。

　　在一个点对点文件传输的项目中 我需要显示文件传输的实时信息 传输的文件列表和当前传输的文件 当时我想到了用ListBox 但是但我用了ListBox后 我发现它不能改变控件中文本想的颜色 于是我就想扩展一下ListBox控件 ListBoxEx 　　我的目标是给空间加上图标 还要能时时改变控件文本颜色 于是从ListBox派生类 　　public class ListBoxEx : ListBox {…} 　　为了操作方便我为ListBoxEx的每一项设计专门的类ListBoxExItem 　　public class ListBoxExItem {…} 　　为了保持我这个控件与WinForm的标准控件的操作借口一致 我又重新设计了两个集合类: 　　public class ListBoxExItemCollection : IList ICollection IEnumerator {}//这个类相对于标准ListBox中的ObjectCollection 这个类作为ListBoxEx中的Items属性的类型 　　public class SelectedListBoxExItemCollection : : IList ICollection IEnumerator{}//这个类相对于标准ListBox中的SelectedObjectCollection 这个类作为ListBoxEx中的SelectedItems属性的类型 　　下面看两个集合类的实现 　　ListBoxExItemCollection的实现 为了做到对集合(Items)的操作能够及时反映到ListBoxEx的控件中所以 此类只是对ListBox中Items(ObjectCollection类型)作了一层包装 就是把ListBox中Items属性的所有方法的只要是object类型的参数都转换成ListBoxExItem 比如: 　　public void Remove(ListBoxExItem item){　this _Items Remove(item); //_Items为ObjectCollection类型} 　　public void Insert(int index ListBoxExItem item){　this _Items Insert(index item);} 　　public int Add(ListBoxExItem item){　return this _Items Add(item);} 　　由上可知 ListBoxExItemCollection中有一个构造函数来传递ListBox中的Items对象 　　private ObjectCollection _Items; 　　public ListBoxExItemCollection(ObjectCollection baseItems){　this _Items = baseItems;} 　　而SelectedListBoxExItemCollection类的实现也用同样的方法 只不过是对SelectedObjectCollection包装罢了 　　集合实现后 再来看ListBoxExItem的实现 　　为了使它支持图标和多种颜色添加如下成员　 　　private int _ImageIndex; 　　public int ImageIndex{　get { return this _ImageIndex; }　set { this _ImageIndex = value;}} 　　private Color _ForeColor; 　　public Color ForeColor{　get{ return this _ForeColor;}　set　{　　this _ForeColor = value;　　this Parent Invalidate();　}} 　　当然还有 　　private string _Text; 　　public string Text{　get { return this _Text; }　set { this _Text = value; }} 　　为了控件能正确显示此项的文本 还必须重写ToString()方法 　　public override string ToString(){　return this _Text;} 　　再看ListBoxEx的实现: 　　为了使控件能够自我绘制 所以 DrawMode = DrawMode OwnerDrawFixed; 　　为了覆盖基类的Items等相关属性添加 　　 　　private ListBoxExItemCollection _Items; //在构造函数中创建 　　同时还需要重写属性Items 　　new public ListBoxExItemCollection Items{　get　{　　return this _Items;　}} 　　new public ListBoxExItem SelectedItem //强制转换为ListBoxExItem{　get{ return base SelectedItem as ListBoxExItem;}　set{ base SelectedItem = value;}} 　　new public SelectedListBoxExItemCollection SelectedItems //重新包装SelectedItems{　get　{　　return new SelectedListBoxExItemCollection(base SelectedItems);　}} 　　为了支持图标 添加一个图像列表imagelist 　　private ImageList imageList; 　　public ImageList ImageList{　get { return this imageList; }　set　{　　this imageList = value;　　this Invalidate();//图像列表改变后马上更新控件　}} 　　而此控件的核心却在一个方法OnDrawItem 这个方法每当控件的项需要重绘时就被调用 　　 　　protected override void OnDrawItem(System Windows Forms DrawItemEventArgs pe){　pe DrawBackground(); //画背景　pe DrawFocusRectangle(); //画边框　Rectangle bounds = pe Bounds; 　　// Check whether the index is valid 　　if(pe Index >= && pe Index < base Items Count){　ListBoxExItem item = this Items[pe Index]; //取得需要绘制项的引用　int iOffset = ; 　　// If the image list is present and the image index is set draw the image 　　if(this imageList != null)　{　　if (item ImageIndex > && item ImageIndex < this imageList Images Count)　　{　　　 this imageList Draw(pe Graphics bounds Left bounds Top bounds Height bounds Height item ImageIndex); //绘制图标　　}　　iOffset += bounds Height;//this imageList ImageSize Width;　} 　　// Draw item text 　　pe Graphics DrawString(item Text pe Font new SolidBrush(item ForeColor) bounds Left + iOffset bounds Top); //根据项的颜色绘制文本 　　}　base OnDrawItem(pe);　}} lishixinzhi/Article/program/net/201311/11713

列表框 你说的不详细

亲，在VB6或VBA中，listbox控件的行间距是无法调节的。不过，你可以通过调节字体、字号，间接达到调整行高的目的。

分类: 电脑/网络 >> 程序设计 >> 其他编程语言 问题描述: 我有一问题：如何用VB的ListBox（或其它）控件，显示指定的.doc或.xls等文档的链接，双击后就可以用相应的office程序打开这些文件，谢谢！ 解析: 可以用 ShellExecute API 来实现当前文件的关联调用，如： " 定义API Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long" 双击打开指定的文件 Private Sub File1_DblClick() Dim strFileName As String strFileName = File1.Path If Right$(strFileName, 1) = "" Then strFileName = strFileName & File1.List(File1.ListIndex) Else strFileName = strFileName & "" & File1.List(File1.ListIndex) End If " 打开 Call ShellExecute(Me.hwnd, "open", strFileName, vbNullString, strFileName, 1) End Sub

.NET Framework 类库 ListBox.MultiColumn 属性 获取或设置一个值，该值指示 ListBox 是否支持多列。 属性值 如果 ListBox 支持多个列，则为 true；否则为 false。默认为 false。

你是说选中的项变换字体吗？ 那个貌似只有自己画

通过循环取： for(int i=0;i<listBox1.Items.Count;i++) { string item = listBox1.Items[i].ToString(); // }

你想问的是vblistbox中如何添加一条记录吧？点击右键选择添加。鼠标挪到所要添加的位置点击右键选择添加就可以插入新的一行代码。列表框控件(ListBox)和组合框控件(ComboBox)则有Clear方法，意思是清除项目。这个则是符合现代编程理念的。

vblistbox赋值方法如下：1、在打开的软件中，新建一个WPF，添加一个listBox。2、点击编辑项，在打开的编辑窗口中，输入内容，点击确定。3、这时就可以看到listBox中就有内容了，赋值完成。

Private Sub List1_DblClick()Text1.Text = List1.TextEnd Sub

Dim AdoRecordset2 As ADODB.RecordsetPrivate Sub Form_Load()call Refreshdata2()End SubPrivate Sub Refreshdata2()Dim Rs_str As StringSet AdoRecordset2 = New ADODB.RecordsetRs_str = "select id,name form sysobjects where type="u""connstrIf AdoRecordset2.State = adStateOpen Then AdoRecordset2.CloseEnd IfWith AdoRecordset2Set .ActiveConnection = adoConnection .CursorType = adOpenDynamic .LockType = adLockOptimistic .Open Rs_strEnd WithSet DataCombo1.RowSource = AdoRecordset2DataCombo1.BoundColumn = AdoRecordset2.Fields(0).NameDataCombo1.ListField = AdoRecordset2.Fields(1).NameIf Not AdoRecordset2.BOF And Not AdoRecordset2.EOF Then DataCombo1.Text = AdoRecordset2.Fields(1)End IfEnd SubPublic Sub connstr()‘连接数据库语句，此处略……End Sub

具体说来 。。。。

listBox是用来显示列表数据的控件他的主要属性如下:设已知控件为list1list1.list为列表中显示的相关数据list1.Backcolor为列表的背景颜色list1.Forecolor为他的字体颜色list1.front为他的字体list1.style为控件的选中格式(0为默认，1为可以在其上打对号)当要向其中加入字符窜时可以用这个命令List1.AddItem "xxx", indexxxx为欲加入的字符,index为加入字符的位置(第几行）删除其中的字符窜命令为：list1.RemoveItem indexindex为已知欲删除行数。基本的就这些了。。。。。。。。

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.ListIndexEnd SubPrivate Sub Form_Load()List1.AddItem "Germany"List1.AddItem "India"List1.AddItem "France"List1.AddItem "Canada"List1.AddItem "USA"List1.AddItem "Japan", 0R>List1.AddItem "China", 1End Sub Private Sub List1_Click()If List1.Text = "Canada" ThenText1.Text = "Canada have 24 million people."End IfEnd SubListCount 返回列表框中项目的总数，只在运行时可用。例：Private Sub Command2_Click()Text1.Text = "You have" & List1.ListCount & "_entrifs lister"End Sub ListIndex 返回在列表框中当前选定项目的位置，只在运行时可用。未选定任何项目时，其值为-l。例：Private Sub Command3_Click()Text1.Text = List1.ListIndexEnd Sub Text 存放当前在列表框中选定的项目，即List(ListIndex)的值。例：Private Sub List1_Click()If List1.Text = "Canada" ThenText1.Text = "Canada have 24 million people."End IfEnd Sub Columns 指定列表框中的列数。其值为0时，列表框以垂直滚动的单列方式显示；为l时，列表框以水平滚动的单列方式显示；大于l时，列表框以水平滚动的多列方式显示。 Option ExplicitPrivate Sub Form_Load()Dim i As IntegerFor i = 0 To Screen.FontCount - 1List1.AddItem Screen.Fonts(i)"“Columns”属性0List2.AddItem Screen.Fonts(i)"“Columns”属性1Next iEnd 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

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

区别倒是不大，操作j基本相符区别大部分在外观上commbox占地小 比较实惠listbox比较直观 但是占地很大Combobox是ListBox和Edit两者的结合

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.ListIndexEnd SubPrivate Sub Form_Load()List1.AddItem "Germany"List1.AddItem "India"List1.AddItem "France"List1.AddItem "Canada"List1.AddItem "USA"List1.AddItem "Japan", 0R>List1.AddItem "China", 1End Sub Private Sub List1_Click()If List1.Text = "Canada" ThenText1.Text = "Canada have 24 million people."End IfEnd SubListCount 返回列表框中项目的总数，只在运行时可用。例：Private Sub Command2_Click()Text1.Text = "You have" & List1.ListCount & "_entrifs lister"End Sub ListIndex 返回在列表框中当前选定项目的位置，只在运行时可用。未选定任何项目时，其值为-l。例：Private Sub Command3_Click()Text1.Text = List1.ListIndexEnd Sub Text 存放当前在列表框中选定的项目，即List(ListIndex)的值。例：Private Sub List1_Click()If List1.Text = "Canada" ThenText1.Text = "Canada have 24 million people."End IfEnd Sub Columns 指定列表框中的列数。其值为0时，列表框以垂直滚动的单列方式显示；为l时，列表框以水平滚动的单列方式显示；大于l时，列表框以水平滚动的多列方式显示。 Option ExplicitPrivate Sub Form_Load()Dim i As IntegerFor i = 0 To Screen.FontCount - 1List1.AddItem Screen.Fonts(i)"“Columns”属性0List2.AddItem Screen.Fonts(i)"“Columns”属性1Next iEnd 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

假定文本框在Form1，列表框在Form2，则以下代码放在Form2：Private Sub List1_Click()Dim s As String, i As IntegerFor i = 0 To List1.ListCount - 1 If List1.Selected(i) Then If s <> "" Then s = s & "，" s = s & List1.List(i) End IfNextobj.Text = sEnd Sub以下代码放在Form1：Private Sub Command1_Click() "第一个文本框后面的+按钮Set Obj = Text1Form2.ShowEnd SubPrivate Sub Command2_Click() "第二个文本框后面的+按钮Set Obj = Text2Form2.ShowEnd Sub以下代码放在公共模块（Module）文件：Public obj As Object

string s;//强制将listbox中的所有项转化为String并遍历foreach (var str in listBox1.Items.Cast<string>()) {s = s + str ; }

ListBox.SelectedItems

listbox.add("内容");

由于list是但列数据表格，所以你的要求其实用grid之类的是最容易实现的。用list也可以实现，但需要用代码软实现。在窗体上添加1个ListBox，1个TextBOX,3个CommandButton控件。把ListBox的Sorted属性改为True。该属性为让ListBox控件可以自动按字母排序。由于Sorted属性，所以要把序号用00占位，否则排序结果将为1、10、100、11、12……然后粘贴如下代码：Private Sub Command1_Click()On Error Resume Next "添加一个新信息 Me.List1.AddItem Right("00" & Me.List1.ListCount + 1, 3) & " " & Me.Text1.Text "如果要插入在数据中则使用以下代码，但需要再建立一个text来写插入的序号，即将Tmp替换成新text的值 "Dim Tmp As Integer "Tmp = 10 "Tmp-1是将序号10变成列表里的第9行，因为list是从0开始的. "Me.List1.AddItem Right("00" & Tmp, 3) & " " & Me.Text1.Text, Tmp - 1 "For i = Tmp To Me.List1.ListCount - 1 " DoEvents " Me.List1.List(i) = Right("00" & i + 1, 3) & " " & Right(Me.List1.List(i), Len(Me.List1.List(i)) - InStr(Me.List1.List(i), " ") - 2) "Next "将最后一列数据变更为最大的数字 "Me.List1.List(Me.List1.ListCount - 1) = Right("00" & Me.List1.ListCount, 3) & " " & Right(Me.List1.List(Me.List1.ListCount - 1), Len(Me.List1.List(Me.List1.ListCount - 1)) - InStr(Me.List1.List(Me.List1.ListCount - 1), " ") - 2)End SubPrivate Sub Command2_Click()On Error Resume Next "修改信息 Me.List1.List(Me.Text1.Tag) = Right("00" & Me.Text1.Tag + 1, 3) & " " & Me.Text1.TextEnd SubPrivate Sub Command3_Click()On Error Resume Next "删除信息 For i = CInt(Me.Text1.Tag) To Me.List1.ListCount - 1 DoEvents Me.List1.List(i) = Right("00" & i + 1, 3) & " " & Right(Me.List1.List(i + 1), Len(Me.List1.List(i + 1)) - InStr(Me.List1.List(i + 1), " ") - 2) Next "删除最后一条数据 Me.List1.RemoveItem (Me.List1.ListCount - 1) "由于是用list做序号，所以无法再使用RemoveItem方法 "Me.List1.RemoveItem (Me.Text1.Tag)End SubPrivate Sub Form_Load()"这个地方如果是1000，就要将 Right("00" & i, 3) 修改成 Right("000" & i, 4)"最大数是多少就要修改下 For i = 1 To 100 Me.List1.AddItem Right("00" & i, 3) & " XXX" & i Next Me.Command1.Caption = "添加" Me.Command2.Caption = "修改" Me.Command3.Caption = "删除"End SubPrivate Sub List1_Click() "将列表里的信息去掉序号后显示在文本中 Me.Text1.Text = Right(Me.List1.Text, Len(Me.List1.Text) - InStr(Me.List1.Text, " ") - 2) "将序列号保存在Text的Tag属性中 Me.Text1.Tag = Me.List1.ListIndexEnd Sub

listbox 不就是左边对齐的吗？

只要设置ListIndex的中的序号就行了 ，序号代表选项。

1 从listbox第一个项目中拷贝字符串，从第what开始，第一个项目长度减掉（what+1）结束2 从listbox选中的项目目中拷贝字符串，从第what+2开始，选中的项目长度减掉（what+1）结束

dodragdrop（拼些的可能不对）事件，你上网搜用法，我就不多说了

用 集合 或者数组实现啊。。

或者使用API函数来实现。

其实很简单的楼主，首先引入System. io你在一个按钮的点击事件中写如下代码哈 StreamWriter writer = new StreamWriter(@"F:123.txt", true);// 前面的@是告诉编译器后面的字符串是表示地址 for (int i = 0; i < listBox1.Items.Count;i++ )//循环遍历listbox的所有items哈 writer.Write(listBox1.Items[0].ToString());//将每一个item写进文件 writer.Close();//记得最后要关闭哦！释放资源 祝你成功哈

用listview!!!

我们昨天ASP.NET上机课，就是讲的这个，这样吧，推荐一个视频教程给你，北大青鸟的ASP.NET视频教程，你去用电炉下载，里面有这个的讲解，

上面的代码够多了，不多说了。

Private Sub Command1_Click()Open App.Path & " est.txt" For Input As #1Do While Not EOF(1)Line Input #1, tempList1.AddItem tempLoopClose #1End SubPrivate Sub File1_DblClick()On Error GoTo err Picture1.Picture = LoadPicture(File1.Path & "" & File1.List(File1.ListIndex)) List1.AddItem File1.List(File1.ListIndex)err:End SubPrivate Sub Form_Load() File1.Path = App.Path "本程序所在目录End SubPrivate Sub List1_DblClick() List1.RemoveItem List1.ListIndexEnd Sub

参考：VC ListBox列表框实现自动水平滚动功能

private void listBox1_SelectedIndexChanged(object sender, EventArgs e) { if(this.listBox1.SelectedIndex!=-1) //必要 this.textBox1.Text = this.listBox1.SelectedItem.ToString(); } private void button4_Click(object sender, EventArgs e) { this.listBox1.Items[this.listBox1.SelectedIndex] = this.textBox1.Text; }另外,站长团上有产品团购,便宜有保证

用ListView请采纳。。。。

1、定义一个变量，根据TextBox数据的数值来定变量类型。2、在把变量复制到ListBox的ADD里面就可以了。比如：stringstr=this.textBox1.Text.ToString();this.listBox1.Items.Add(str);输入的是字符型的数据格式，所以定义的是字符行，复制到Items.Add里面就可以显示了。

listbox.Clear();

Private Sub Form_Load()For i = 0 To 4List1.AddItem iNext iEnd SubPrivate Sub List1_Click()Select Case List1.ListIndexCase List1.ListIndex Text1(List1.ListIndex).Text = List1.List(List1.ListIndex)End SelectEnd Sub

如果是第三行，那么索引就是2，第一行从零开始计算。stringstr=ListBox1.Items[2].Text;//这样就可以获取到第三行的数据。

用Ctrl+Enter输入多项 在程序中的话用List1.Additem "内容" 方法

在工具 选择附加控件 选中Microsoft forms 2.0 listbox

首先使用listBox1.Items.Clear();清空控件原有数据。然后使用 listBox1.Items.Add方法逐项添加数据。代码放入窗体Load事件中。外面开始的时候加上DataTable dt=null;然后//这里myDataReader.Fill(dt);if(dt!=null&&dt.rows.count>0){for(int i=;i<dt.rows.count;i++){listBox1.items.add(dt.rows[0].ToString());}}ListBox控件显示较长的选项列表，用户可从中选择一项或多项。如果项总数超出可以显示的项数，则自动向ListBox控件添加滚动条。ListBox控件列表中的每个元素称为项。

string content = txtName.Text + " " + txtStyle.Text;lstContent.Items.Add(content);txtName 是 物品名称文本框（textbox）txtStyle 是 物品样式文本框（textbox）lstContent 是 ListBox

listBox是用来显示列表数据的控件他的主要属性如下:设已知控件为list1list1.list为列表中显示的相关数据list1.Backcolor为列表的背景颜色list1.Forecolor为他的字体颜色list1.front为他的字体list1.style为控件的选中格式(0为默认，1为可以在其上打对号)当要向其中加入字符窜时可以用这个命令List1.AddItem"xxx",indexxxx为欲加入的字符,index为加入字符的位置(第几行）删除其中的字符窜命令为：list1.RemoveItemindexindex为已知欲删除行数。基本的就这些了。。。。。。。。

用listbox控件的ColumnCount 属性设置有多少列 列号从0开始x0dx0a可以直接在控件属性页面设置,x0dx0a也可以用代码设置例如:listbox1.ColumnCount = 3x0dx0a列宽用ColumnWidths 属性来控制 每列列宽的数值用分号 (;) 分隔x0dx0a例如:90;72;90x0dx0a默认的列宽设置单位是磅x0dx0a若要指定其他度量单位，则需将此单位作为值的一部分x0dx0a例如:2 cm;1cm;3 cm x0dx0a第一列为 2 厘米，第二列为 1 厘米，第三列为 3 厘米

vba窗体中如何获取列表框listbox1选中行的值提取出来，这决于您的列表框是多列还是单列。如果单列列表框的数据实际上是一维数组，则可以使用工作表函数transform导入文本框。经过三次转换后，可以将其转换为一维数组，然后使用join函数将其合并并写入文本框。多列列表框是二维数组。编写一个循环来读取列表框中的数据，然后将其写入文本框这是一个单列数据示例和一个多列数据示例。如果listbox是多列的情况下，将listbox.column属性看作一个二维数组使用，比如获取第一行第一列的值 listbox.column(0,0)，单列就是一维数组。或者定义一个variant型变量，然后将listbox.list赋值给它，也会得到一个数组。

显示在最前端。ListBox是WinForm中的 列表 控件，它提供了一个项目列表(一组数据项)，用户可以选择一个或者多个条目，当列表项目过多时，ListBox会自动添加滚动条，使用户可以滚动查阅所有选项。ListBox可以预先设定列表内容，也可以绑定其他控件或数据库，自动更新条目，把数据逐一显示出来。

首先需要打开Excel的表格，如图所示，点击下面的文件1，鼠标右键单击选择查看代码。2、然后就是进入代码页面，可以看到页面上现在的代码。3、然后接下来就是需要用listbox用法，如图所示，输入Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)，回车。4、最后，再返回到页面上，双击一下表格就可以看到数字了，listbox用法成功。

1、首先需要打开Excel的表格，如图所示，点击下面的文件1，鼠标右键单击选择查看代码。2、然后就是进入代码页面，可以看到页面上现在的代码。3、然后接下来就是需要用listbox用法，如图所示，输入Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)，回车。4、最后，再返回到页面上，如图所示，双击一下表格就可以看到数字了，listbox用法成功。

区别倒是不大，操作j基本相符。区别大部分在外观上，commbox占地小 比较实惠；listbox比较直观 但是占地很大。Combobox是ListBox和Edit两者的结合。1、listBox列表框（ListBox）用于提供一组条目（数据项），用户可以用鼠标选择其中一个或者多个条目，但是不能直接编辑列表框的数据。当列表框不能同时显示所有项目时候，他将自动添加滚动条，使用户可以滚动查阅所有选项。2、ComboBoxhwndCtl为此组合框的句柄,lpsz为需要添加的字符串,组合框不能直接通过id添加内容,所以需要得到这个控件的句柄,还得使用GetDlgItem()函数。

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.ListIndexEnd SubPrivate Sub Form_Load()List1.AddItem "Germany"List1.AddItem "India"List1.AddItem "France"List1.AddItem "Canada"List1.AddItem "USA"List1.AddItem "Japan", 0R>List1.AddItem "China", 1End Sub Private Sub List1_Click()If List1.Text = "Canada" ThenText1.Text = "Canada have 24 million people."End IfEnd SubListCount 返回列表框中项目的总数，只在运行时可用。例：Private Sub Command2_Click()Text1.Text = "You have" & List1.ListCount & "_entrifs lister"End Sub ListIndex 返回在列表框中当前选定项目的位置，只在运行时可用。未选定任何项目时，其值为-l。例：Private Sub Command3_Click()Text1.Text = List1.ListIndexEnd Sub Text 存放当前在列表框中选定的项目，即List(ListIndex)的值。例：Private Sub List1_Click()If List1.Text = "Canada" ThenText1.Text = "Canada have 24 million people."End IfEnd Sub Columns 指定列表框中的列数。其值为0时，列表框以垂直滚动的单列方式显示；为l时，列表框以水平滚动的单列方式显示；大于l时，列表框以水平滚动的多列方式显示。 Option ExplicitPrivate Sub Form_Load()Dim i As IntegerFor i = 0 To Screen.FontCount - 1List1.AddItem Screen.Fonts(i)"“Columns”属性0List2.AddItem Screen.Fonts(i)"“Columns”属性1Next iEnd 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

body ply 英文定义:The body ply consists of steel or layers of fabrics, such as polyester cord. In radial tires, the polyester cords run perpendicular to the tread ...中文：体层

PlyBot是一款开源桌面数控机床CNC机器人项目，由Darcy KO负责开发和推_

signal[5si^nl]n.信号adj.信号的v.发信号, 用信号通知sign[sain]n.标记, 符号, 记号, 征兆, 迹象, 征候v.签名(于), 署名(于)～, 签署symbol[5simbEl]n.符号, 记号, 象征sigh[sai]n.叹息, 叹息声vi.叹息, 叹气sight[sait]n.视力, 视觉, 见, 瞥见, 视域, 眼界cause[kC:z]n.原因, 导致某事发生的人或事, 动机, 理由, 根据, 目标, 理想, 事业vt.引起, 惹起, 使(发生), 促成result[ri5zQlt]n.结果, 成效, 计算结果vi.起因, 由于, 以...为结果, 导致discover[dis5kQvE]vt.发现, 发觉v.发现find[faind]vt.找到, 发现, 感到, 查明, 得到, 认为, 见到...的存在vi.裁决n.发现[计] 在文件中查找指定的字符串for breakfast: 当作早点AT breakfast: 早餐时,正吃早饭start sth of trenD开个头it is still better than doing sth什么都不做都比做什么 好

最简单的：朝天竖一根中指！

IQKeyBoardManager按钮"Done"能改为"确定"，可以用RichWin软件来改。当使用的操作系统或工具软件是英文界面时，你可能会对界面中的英文菜单很不习惯，RichWin软件的自动汉化功能可以立即把英文界面改成中文界面。而且，还可以通过按F12键对当前窗口进行即时汉化，汉化的范围包括菜单、提示信息和对话框。实现界面自动汉化的方法十分简单，启动RichWin后单击【切换控制板样式】中的【自动汉化】按钮，就可以完成界面的汉化了。

当然可以，在参数中人把toolbar中的对应按钮的显示全改为false就可以了。或者直接把toolbar:"#toolbar",//指定工具栏这句参数删除也可以！

2016、2017、2018都有。ToolBar的出现是为了替换之前的ActionBar的各种不灵活使用方式。相反，ToolBar的使用变得非常灵活，因为它可以让我们自由往里面添加子控件。

QToolBar类有个addWidget成员函数，可以添加其他控件

对……疯狂

“末日节”快乐 呵呵

LZ你好请死心吧，hugo boss非常少的折扣，不过可以推荐你去德国的boss工业园去购买，好像叫斯图什么的一个小镇，那里衣服基本是不要钱的，2-3折

EPC项目，A为总承包单位，那么设计单位，施工方，还有设备供应商的甲方是A总承包单位，他们均属于乙方，监理单位是丙方；BOT项目，对中标人B来说，某政府是B的业主；对设计单位，施工方，还有设备供应商来说，中标人B是他们的业主。

英文原文：bowl 和owl英式音标：[bəʊl] [aʊl] 美式音标：[bol] [aʊl]

试验示范`````````````

DragonBones当前主要包含三大功能工具：为设计师们服务的独立骨骼动画编辑器（DragonBonesPro），基于FlashPro的骨骼动画制作插件DragonBonesDesignPanel，以及多语言版本的骨骼动画程序库（DragonBonesLibrary）三大功能一方面形成了独立于Flash运行环境开发的工作流，一方面有提升了效率和动画表现的性能

给你提个建议，去多玩看看吧

我不想装懂，但是我不知道

a series of meetings在这里代指的是一系列的会议，是整体名词，故谓语动词用单数，再根据时态判断一下是过去时。

$(function () { $("[data-toggle="tooltip"]").tooltip(); }); 如果是动态生成在生成后加上$("[data-toggle="tooltip"]").tooltip();官方文档写了：提示工具（Tooltip）插件不像之前所讨论的下拉菜单及其他插件那样，它不是纯 CSS 插件。如需使用该插件，您必须使用 jquery 激活它（读取 javascript）。使用下面的脚本来启用页面中的所有的提示工具（tooltip）：$(function () { $("[data-toggle="tooltip"]").tooltip(); });

它是使用bootstrap的popover来实现的，从bootstrap的源码能看到popover是继承至tooltip的组件之一。这里是通过将popover的触发方式设为手动触发，由我们自己来控制显示和隐藏它的时机。并且在依赖节点离开的时候，给定300ms的延迟等待用户进入tooltip panel，如果300ms还没有进入tooltip则隐藏它。否则就阻止隐藏tooltip的逻辑。这代码虽然功能可用，但具有代码洁癖的博主并不太满意这样的代码。它难以阅读维护，同时重用性也将极差。所以笔者决定要以bootstrap插件方式来一bs way写这款插件。当笔者查阅bootstrap tooltip源码时，发现它是一个扩展性很不错的插件。tooltip的显示和隐藏依赖于它内部的hoverState

foreach (ListItem li in listbox1.Items) { li.Attributes.Add("title", li.values); }

JOEY Joey Keys was from my neighborhood Joey Keys是我的邻居 Some would say that he was bad and Joe thought that was good 有的人说他很坏，可是Joey觉得还好 Joey got the name "Keys" picking locks Joey在撬锁时得到“Keys”的外号 He never really robbed no one; it surely amused the cops 不过他从没有真的偷过谁，这不过为了是寻警察的开心 Joey"s parents owned a restaurant Joey的父母有一家小餐馆 After closing time they"d give us almost anything we"d want 在关门后他们会给我们想要的一切食物 I never cared that Joey Keys was slow 我从不在意Joey Keys有些鲁钝 Though he couldn"t read or write too well but we"d talk all night long. 尽管他不能流利地读写，但这并不妨碍我们彻夜长谈 Come on, come on, come on 来吧，来吧，来吧 What you gonna do with your life? 你将在生命中做些什么？ Come on, come on, come on 来吧，来吧，来吧 Chasing sparks in the nights 追寻火花，在这黑夜 His old man said tomorrow is a ride that goes nowhere 他的父亲说，明天是不知去向何方的旅程 But I"ll pull some strings, get blackbird wings 但是我将牵着这线，借助黑鸟的翅膀 And break us out of there 带我们冲出这里 Hey Joey 嘿！Joey！ C"mon tell me "bout your dreams 来告诉我你的梦想 Tell me all the sights you"re gonna see 告诉我你想看到的风景 Tell me who you"re gonna be 告诉我你想成为谁 Hey Joey 嘿！Joey！ You"re gonna kiss the girls goodnight 你会在良宵亲吻那女孩 Sometimes you got to stand and fight 有时你需要忍受和搏斗 It"ll be alright 都会好起来的 We"re gonna find a better life 我们将找到更好的生活 See Joe was 3 years younger to the day 看，Joey比我小3岁 Acting like a little brother but became my ball and chain 像是我的小兄弟，但也成为我的负担 I met this girl named Rhonda, she fell for me 我遇到一个女孩名叫“Rhonda”,她爱上了我 She said, "I might learn to like him but love ain"t built for three." 她说“我会尝试去喜欢他，但是爱不是三个人的” Hey Joey 嘿！Joey！ C"mon tell me "bout your dreams 来告诉我你的梦想 Tell me all the sights you"re gonna see 告诉我你想看到的风景 Tell me who you"re gonna be 告诉我你想成为谁 Hey Joey 嘿！Joey！ You"re gonna kiss the girls goodnight 你会在良宵亲吻那女孩 Sometimes you got to stand and fight 有时你需要忍受和搏斗 It"ll be alright 都会好起来的 We"re gonna find a better life 我们将找到更好的生活 News gets around in this fading neighborhood 新闻逐渐在这没落的街道传开 The old man lost the restaurant JOEY的父亲失去了餐馆 He drinks more than he should 他喝得过了量 It"s time for Joey keys to do some good 是时候该Joey keys来做些什么了 Pick the lock off our lives, let"s get out of here like we always said we would 打开我们生命中的困锁，离开这儿，就像我们总是说的那样 Hey Joey 嘿！Joey！ C"mon tell me "bout your dreams 来告诉我你的梦想 Tell me all the sights you"re gonna see 告诉我你想看到的风景 Tell me who you"re gonna be 告诉我你想成为谁 Hey Joey 嘿！Joey！ You"re gonna kiss the girls goodnight 你会在良宵亲吻那女孩 Sometimes you got to stand and fight 有时你需要忍受和搏斗 It"ll be alright 都会好起来的 We"re gonna find a better life 我们将找到更好的生活 Find a better life 找到更好的生活 Find a better life 找到更好的生活