why show this error for me
my class
Imports Microsoft.VisualBasic
Imports System.Data
Imports System.Data.SqlClient
Imports EncDecCls
Imports Microsoft.Win32
Public Class Company
Private id As Integer = 0
Private name As String = ""
Public Property idpr() As Integer
Get
Return id
End Get
Set(ByVal value As Integer)
id = value
End Set
End Property
Public Property namepr() As String
Get
Return name
End Get
Set(ByVal value As String)
name = value
End Set
End Property
Public Function Readconnectionstring() As String
Dim Key As RegistryKey = Registry.LocalMachine.OpenSubKey("Software\Wow6432Node\CATS\Conn")
Dim DataSource As Object = Key.GetValue("DataSource")
Dim DB As Object = Key.GetValue("DataBase" ...
Go to the complete details ...