An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.
One of a set of tools we're offering as a way of saying thank you for being a part of the community.
class definitions
Can someone tell me what is wrong with this and how it is defined. I need to identify those areas that are incorrect and indicate what I need to do to fix it. It has to do something with basic class definitions, please help...
Public Class _MyClass
Private MyName As String
Private MyAddress As String
Public MyCity As String
Private Property GetName()
Get
Return MyName
End Get
Set(ByVal Value)
Value = MyName
End Set
End Property
Public Property MyAddress()
Get
Return MyAddress
End Get
Set(ByVal Value)
MyAddress = Value
End Set
End Property
Public ReadOnly Property GetCity()
Get
Return GetCity
End Get
End Property
Public Function CheckZipCode() As Boolean
If IsNumeric(MyZipCode) = False Then
Return False
Else
Return True
End If
End Function
Private Sub CapitalizeNames()
MyName = MyName.ToUpper
End Sub
End Class
Public Class _MyClass
Private MyName As String
Private MyAddress As String
Public MyCity As String
Private Property GetName()
Get
Return MyName
End Get
Set(ByVal Value)
Value = MyName
End Set
End Property
Public Property MyAddress()
Get
Return MyAddress
End Get
Set(ByVal Value)
MyAddress = Value
End Set
End Property
Public ReadOnly Property GetCity()
Get
Return GetCity
End Get
End Property
Public Function CheckZipCode() As Boolean
If IsNumeric(MyZipCode) = False Then
Return False
Else
Return True
End If
End Function
Private Sub CapitalizeNames()
MyName = MyName.ToUpper
End Sub
End Class
Who is Participating?
MyName and MyAddress are already defined, so you can't create a property get or set for them with the same name.
MyZipCode is not declared.
Public Class _MyClass
Private _MyName As String
Private _MyAddress As String
Private _MyZipCode As String
Public MyCity As String
Private Property GetName()
Get
Return _MyName
End Get
Set(ByVal Value)
Value = _MyName
End Set
End Property
Public Property MyAddress()
Get
Return _MyAddress
End Get
Set(ByVal Value)
_MyAddress = Value
End Set
End Property
Public ReadOnly Property GetCity()
Get
Return GetCity
End Get
End Property
Public Function CheckZipCode() As Boolean
If IsNumeric(_MyZipCode) = False Then
Return False
Else
Return True
End If
End Function
Private Sub CapitalizeNames()
_MyName = _MyName.ToUpper
End Sub
End Class
MyZipCode is not declared.
Public Class _MyClass
Private _MyName As String
Private _MyAddress As String
Private _MyZipCode As String
Public MyCity As String
Private Property GetName()
Get
Return _MyName
End Get
Set(ByVal Value)
Value = _MyName
End Set
End Property
Public Property MyAddress()
Get
Return _MyAddress
End Get
Set(ByVal Value)
_MyAddress = Value
End Set
End Property
Public ReadOnly Property GetCity()
Get
Return GetCity
End Get
End Property
Public Function CheckZipCode() As Boolean
If IsNumeric(_MyZipCode) = False Then
Return False
Else
Return True
End If
End Function
Private Sub CapitalizeNames()
_MyName = _MyName.ToUpper
End Sub
End Class
3) you should have Imports Microsoft.VisualBasic if you are going to use the IsNumeric function (on the CheckZipCode function)
4)
on
Public ReadOnly Property GetCity()
Get
Return GetCity
End Get
End Property
it should read
Public ReadOnly Property GetCity()
Get
Return MyCity
End Get
End Property
because you cant return a property.
on
Public ReadOnly Property GetCity()
Get
Return GetCity
End Get
End Property
it should read
Public ReadOnly Property GetCity()
Get
Return MyCity
End Get
End Property
because you cant return a property.
wow too many suggestions. It is an exam question though. How do I allocate points now? So many guru's....
10% to Kinger247
10% to Nightman
80% to newyuppie
IMHO - Kinger and I both shot from the hip - newyuppie gave some really good feedback.
10% to Nightman
80% to newyuppie
IMHO - Kinger and I both shot from the hip - newyuppie gave some really good feedback.
Question has a verified solution.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
All Courses
From novice to tech pro — start learning today.
-
Course of the Month9 days, 22 hours left to enrollMonitoring and Operating a Private Cloud with System Center 2012 R2 273 lessons
besides kinger's suggestions:
1) Public Class _MyClass is not a CLS compliant name for a Class. you should remove the underscore (_)
2) in the SET part of the properties, you should identify the data type for the value passed to it.
for example in your code says:
Public Property MyAddress()
Get
Return MyAddress
End Get
Set(ByVal Value)
MyAddress = Value
End Set
End Property
on the Set part, it should be
Set(ByVal Value as String)
MyAddress = Value
End Set
same for every other property.