OriginalValueプロパティ

SetOriginalValueメソッドで記憶されている変更前の値を取得します。
SetOriginalValueメソッドが呼び出されていない場合はNothingを返します。

構文

Public ReadOnly Propery OriginalValue() As String

使用目的

画面の入力内容が、ある時点から変化していた場合、確認メッセージなどを表示する際に使用します。

サンプルコード

'CustomButton1クリックイベント
Private Sub CustomButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles CustomButton1.Click
  'カスタムコントロールの現在値を記憶します。
  Me.CustomNumericTextBox1.SetOriginalValue()
End Sub

'CustomButton2クリックイベント
Private Sub CustomButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles CustomButton2.Click
  'カスタムコントロールの値が変化したかどうかをチェックし
  '変化していた場合は変更前の値を表示します。
  If Me.CustomNumericTextBox1.IsOriginalValueChanged = True Then
    MessageBox.Show("元の値は" & Me.CustomNumericTextBox1.OriginalValue)
  End If
End Sub