- 762 名前：761です mailto:sage [2007/02/24(土) 01:38:47 ]
- Public Function ABCList(ByVal ABC As String) As List(Of String)
ABCList = New List(Of String)
Const Comma As Char = CChar(",")
Const WQuotation As Char = CChar("""")
Dim ArrayOfABC() As String = ABC.Split(Comma)
Dim CountABC As Integer = ArrayOfABC.Length
Dim ”あり As Boolean = False
Dim Temp As String = ""
Dim i As Integer
