###前提・実現したいこと
3枚の画面が存在するアプリケーションを作成しています。
そこで、アプリケーションの終了時に、前回の状態を復元できるように、各コントロールの名前とその値を格納しようと考えました。
画面には、コンボボックス、ラジオボタン、ピクチャーボックス、テキストボックス、データグリッドビューなど様々存在しています。
###発生している問題・エラーメッセージ
コントロール名の列挙は下記コードで実現できたのですが、コントロール毎の値は、.textであったり.valueであったり.imageであったりするので悩んでいます。
###該当のソースコード
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Dim all As Control() = GetAllControls(Me) For Each c As Control In all MsgBox(c.Name) Next End Sub Public Function GetAllControlsa(ByVal top As Control) As Control() Dim buf As ArrayList = New ArrayList For Each c As Control In top.Controls buf.Add(c) buf.AddRange(GetAllControls(c)) Next Return CType(buf.ToArray(GetType(Control)), Control()) End Function
###その他
もし前回の状態を復元するのにもっと良い方法があれば教えていただければと思います。
ご教授願います。
回答3件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2017/04/17 08:55