projects
/
mono.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
2004-11-08 Atsushi Enomoto <atsushi@ximian.com>
[mono.git]
/
mcs
/
btests
/
PropertyC6.vb
1
REM LineNo: 15
2
REM ExpectedError: BC30022
3
REM ErrorMessage: Properties declared 'ReadOnly' cannot have a 'Set'.
4
5
Imports system
6
7
Module M
8
private i as integer
9
10
public ReadOnly Property p() as Integer
11
GET
12
return i
13
END GET
14
15
SET (ByVal val as Integer)
16
i = val
17
End SET
18
End Property
19
20
Sub Main()
21
End Sub
22
23
End Module