Question

有文件上传控制..当我们通过点击浏览选择文件然后点击上传然后文件名扩展名即abc.doc显示在列表框中...然后当我们再次使用相同的文件上传并点击时浏览并选择另一个文件，然后显示文件，即列表框中的xyz.pdf ..所以在列表框中有两个文件abc.doc和xyz.doc .. 所以我希望这些名字在字符串中用这个abc分隔的逗号。 doc，xyz.pdf ..因为我想在表

中插入这些名称

 For i As Integer = 0 To ListBox1.Items.Count - 1

        Dim DocumentName As String = ListBox1.Items.Item(i).Text

        'Dim Docextension As String = ""
        'Docextension = Path.GetExtension(fileUpEx.PostedFile.FileName)

        Dim Docextension As String = System.IO.Path.GetExtension(DocumentName)
        ' Label4.Text = Convert.ToString("Uploaded File Extension: ") & Docextension


        'Dim Document As Byte() = New Byte(fileUpEx.PostedFile.ContentLength - 1) {}
        'Document = fileUpEx.FileBytes

        Dim Document As Byte() = New Byte(DocumentName.Length - 1) {}
        fileUpEx.PostedFile.InputStream.Read(Document, 0, DocumentName.Length)



        Dim strKeyName_e() As String = {"DocumentName", "DocType", "Document", "DocExtension"}
        Dim objKeyVal_l() As Object = {DocumentName, 7, Document, Docextension}
        structDb = objDataSet.ExecSP("tbl", "spupload_file", strKeyName_e, objKeyVal_l)

        Dim DocName = DocumentName.ToString().Split(",")


    Next

我希望docname在docname

中包含逗号分隔符号

Answer 1

Dim commaSeparatedFileNames =  String.Join(",",ListBox1.Items.Select(function(x)=>x.Text))

列表中的名称以字符串分隔的逗号保存vb.net

1 个答案: