今天,随着应用软件的复杂化,开发者经常需要处理一些很长的类。一种更易于管理这些类的方法就是,将这些类分成多个文件。Partial是VB.NET新引进的一个关键字,它允许您将类分成多个物理源文件。您也可以使用Partial关键字用多个文件来定义一个类。 一般大型项目都有很多开发者,这些开发者可能会在同一时间对同一个类进行操作,这时候将一个类分解成多个源文件就更利于开发者同时对同一个类进行操作,或者当这些类定义得太长的时候,将它分解成多个文件就会更易于处理。 您需要使用Partial关键字,这个关键字的作用就是告诉VB编译器在创建类之前去收集类的所有分块。如果您使用了多个文件,您并不需要在类的每一个地方都使用这个关键字——只要在一个地方用到就可以了。然而,同一个类的所有块都必须定义在同一个命名空间中。 编译器将类看作是所有部分声明的集合。每个部分定义的每个修改者都可以应用完整的类。 注意:如果您使用的类是从其它类继承而来的,或者是实现了某个接口,那么只要在类的某一部分使用Inherits或者Implements关键字就可以了。
创新互联专业为企业提供桑日网站建设、桑日做网站、桑日网站设计、桑日网站制作等企业网站建设、网页设计与制作、桑日企业网站模板建站服务,十余年桑日做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
您可以选择使用CheckListBox控件。CheckListBox支持多选。
由于不清楚您用什么语言,所以我写了VB.net 、C#.net
vb.net Code
' Determine if there are any items checked.
If CheckedListBox1.CheckedItems.Count 0 Then
' If so, loop through all checked items and print results.
Dim x As Integer
Dim s As String = ""
For x = 0 To CheckedListBox1.CheckedItems.Count - 1
s = s "Checked Item " (x + 1).ToString " = " CheckedListBox1.CheckedItems(x).ToString ControlChars.CrLf
Next x
MessageBox.Show(s)
End If
C#.net Code
// Determine if there are any items checked.
if(checkedListBox1.CheckedItems.Count != 0)
{
// If so, loop through all checked items and print results.
string s = "";
for(int x = 0; x = checkedListBox1.CheckedItems.Count - 1 ; x++)
{
s = s + "Checked Item " + (x+1).ToString() + " = " + checkedListBox1.CheckedItems[x].ToString() + "\n";
}
MessageBox.Show (s);
}
vb.net Code
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim selectstr As String = ""
For i As Integer = 0 To Me.CheckedListBox1.Items.Count - 1
If Me.CheckedListBox1.GetItemChecked(i) Then
selectstr = Me.CheckedListBox1.Items(i).ToString
End If
Next
MsgBox(selectstr)
End Sub
希望能帮到您。
把ListBox的SelectionMode 属性设置为MultiExtended就可以了
如果是代码控制就是
ListBox1.SelectionMode=SelectionMode.MultiExtended
本文名称:vb.net多选文件,vb选中多个控件
网站地址:https://www.cdcxhl.com/article48/hsijhp.html
成都网站建设公司_创新互联,为您提供网站排名、建站公司、网站制作、用户体验、软件开发、小程序开发
声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联