استرجاع قيمة اللون من الريجستري

السلام عليكم ورحمة الله :

في برنامج خاص استخدم الكود التالي لحفظ بعض القيم في الرجستري :

 Sub SetRegistryValue()
		Dim Key As RegistryKey
		Dim subKey As RegistryKey

		Try
			Key = Registry.CurrentUser
			subKey = Key.CreateSubKey(keyVal)

			subKey.SetValue("scr", txtSrc.Text)
			subKey.SetValue("trgt", txtTrgt.Text)
			subKey.SetValue("chksize", chkSize.Checked)
			subKey.SetValue("_bcolor", BackColor)
			subKey.SetValue("_font", Font)
		Catch ex As Exception

		Finally
			subKey.Close()
			Key.Close()
		End Try
	End Sub

التخزين للقيم أوكي ..

بس المشكلة لما أحاول استرجع القيم للون والخط ما تعمل معي أما الباقي أوكي شغال .. وهذي طريقة الاسترجاع :

	Sub GetRegistryValue()
		Dim key As RegistryKey
		Dim subkey As RegistryKey
		Try
			key = Registry.CurrentUser

			subkey = key.CreateSubKey(keyVal)

			txtSrc.Text = subkey.GetValue("scr")
			txtTrgt.Text = subkey.GetValue("trgt")
			chkSize.Checked = subkey.GetValue("chksize")
			Me.BackColor = subkey.GetValue("_bcolor")
			Me.Font = subkey.GetValue("_font")
		Catch ex As Exception

		Finally
			key.Close()
			subkey.Close()

		End Try

	End Sub

مع العلم أن keyVal تعبر عن المكان الذي سوف تخزن فيه القسم في الرجستري ..

أرجو المساعدة .. وجزاكم الله خيرا