0

HasUnsavedChangesフォームを閉じるときに基本的に呼び出される関数を作成しようとしています。つまり、アイテムを保存した後、コントロールの値をTag、同じ関数にあるプロパティ の値と比較してチェックする必要がtxtFirstName.Tag = .ContactFirstnameありtxtFirstName.Text = .ContactFirstnameます。両者に違いがある場合は、 を返しTrueます。フォームを閉じるときに、この関数が true を返す場合は、変更を保存するかどうかを尋ねます。

コントロールをループするループを書くのが正しい方法だと思いますがFor、その後行き詰まります。

4

1 に答える 1

1

.Text プロパティと .Tag プロパティが同じコントロールに格納されていると仮定して、次のようにしてみてください。

For Each objControl As Control In frmMain.Controls
   If TypeOf objControl is TextBox Then
       If objControl.Tag <> objControl.Text Then
           '---Changes have been made!---
       End if
   End if
Next

明らかに、"frmMain" をフォームの名前に置き換える必要があります。

于 2012-07-24T17:46:02.963 に答える