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
/
AccessibilityC8.vb
1
REM LineNo: 16
2
REM ExpectedError: BC30390
3
REM ErrorMessage: 'C1.Private Sub S()' is not accessible in this context because it is 'Private'.
4
5
Imports System 'Should generate five compilation errors
6
Class C1
7
Private a As Integer=10
8
Protected b As Integer=30
9
Private Sub S()
10
End Sub
11
End Class
12
13
Class C3
14
Public Sub S()
15
Dim myC As New C1()
16
myC.S()
17
End Sub
18
End Class
19
Module Accessibility
20
Sub Main()
21
End Sub
22
End Module