Public Class ListString Private str As String = "" Sub New(ByVal Name As String) Me.str = Name End Sub Public Property Name() As String Get Return str End Get Set(ByVal value As String) str = value End Set End Property Public Function Head…

VB は分からないので今度はRubyで。 class String def head; self[0].chr end def tail; self[1...(self.length)] end end class Array def head; self[0] end def tail; self[1...(self.length)] end end str=%([["3014","Null","0-16-087"],["1999","10","…