テキストファイルから読み込んだデータを構造体に代入するには？ (ID:121552)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

>COBOLでいう集団項目に基本項目文字列を転記するみたいなことをVB.NETで..
う！  COBOLが全くわからないのですが(^^;
構造体の各メンバーにアクセスするのではなく、一発で文字列をセットしたいと言うことであれば、
便利なことに、.NETの構造体はクラスの機能を殆ど備えていますので、文字列を各メンバーに
セットするファンクションを実装すればいいのです。
極めて稚拙なサンプルでエラーの処理等は有りませんが、考え方だけ参考にして下さい。

Const LenStrAA = 14
    Const LenStrAB = 12
    Const LenStrAC = 8
    Private Structure Foo
        <VBFixedStringAttribute(LenStrAA)> Dim strAA As String
        <VBFixedStringAttribute(LenStrAB)> Dim strAB As String
        <VBFixedStringAttribute(LenStrAC)> Dim strAC As String
        Public Sub SetString(ByVal SString As String)
            If SString.Length = LenStrAA + LenStrAB + LenStrAC Then
                strAA = SString.Substring(0, LenStrAA)
                strAB = SString.Substring(LenStrAA, LenStrAB)
                strAC = SString.Substring(LenStrAA + LenStrAB, LenStrAC)
            End If
        End Sub
    End Structure
 
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
        Handles Button1.Click
        Dim SString As String
        Dim fo As Foo
        SString = "aaaaaaaaaaaaaabbbbbbbbbbbbcccccccc"
        fo.SetString(SString)
    End Sub

←解決時は質問者本人がここをチェックしてください。

戻る