, ,
VB6.
Class1.
VB6, , .CLS, VB.NET,
.VB,
.
(
assembly).
Class...End Class. Uchenik:
Public Class Class1
:
Public Class Uchenik
Solution Explorer, ,
Class1.
vb.
Solution Explorer Rename Uchenik.vb. ,
.
-
"Souped-Up"
Uchenik, (
constructor)(Public Sub New)
VB.NET.
, .
,
. Solution Explorer,
Add,
Add Component. , ,
Component class Open. , . ,
64.
. ,
,
class library.
,
:
Inherits
System.ComponentModel.Component
Component
System.ComponentModel.
Uchenik,
.
64
(designer) (constructor)
Uchenik
, .
-
(Properties)
,
.
FirstName :
Dim msFirstName as String
-,
IDE.
Return .
Public Property FirstName()
As String
Get
Return msFirstName
End Get
Set(ByVal Value As String)
msFirstName = Value
End Set
End Property
Let ,
-.
; ,
, ,
Value.
-
(Test Client)
.
,
.
File,
New Project. ,
WindowsApplication.
ShkolaClient , OK,
,
Add Solution
. (solution)
VB6 (
group). OK,
Solution Explorer, 65. (
bold)
Solution Explorer .
ShkolaClient Set as StartUp Project .
65 Solution Explorer .