.


:




:

































 

 

 

 





ActiveX ( OCX)

VB 5.0 ActiveX, . VB , , IDispatch, GUID, (CLSID), (IID) (LIBID). .

GUID . :

Visual Basic . , , , , , , .

, , .

Visual Basic . . . . , . , VB .[5]

COM. 2 : IUnknown IDispatch. (TLB) . , EXP LIB.

Windows API ( )

Visual Basic (DLL). , , . Microsoft Windows.

:

[Public|Private] Declare Sub <_> lib "__" [Alias ""] [()]

 

[Public|Private] Declare Function <_> lib "__" [Alias ""] [()] [As _]

: Visual Basic, . StdCall.

String WINAPI, VB Unicode ANSI, , ANSI Unicode. , Long, , StrPtr, .

Windows API Windows :

Private Declare Function GetWindowsDirectory Lib "kernel32.dll" Alias "GetWindowsDirectoryA" (ByVal buffer As String, ByVal nSize As Long) As Long

Private Declare Function MessageBox Lib "user32.dll" Alias "MessageBoxA" (ByVal hWnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long

 

Private Const MB_ICONASTERISK As Long = 64

 

Public Sub Main()

Dim buffer As String ' .

Dim retLen As Long

 

buffer = String(256, vbNullChar)

lens = GetWindowsDirectory(buffer, Len(buffer)) '

buffer = Left(buffer, lens)

 

MessageBox 0&, " : " & buffer, "", MB_ICONASTERISK '

End Sub

, WINAPI , , , , , . , , , .

 

 

Microsoft Windows.

.

, P- ( ).

, . Visual Basic , .

WinAPI , . , Visual Basic Programmers Guide to the Win32 API.

Windows Mac OS X ( VB1 for DOS).

. , .

, , , / , .

Microsoft Windows, Windows-. , , : , , , (IntelliSense). Visual Basic ,

Visual Basic, , , Variant. , . , , VB , .

, , ASM-, , . , Visual Basic VB- , . , , VB (, VarPtr, StrPtr ObjPtr); , , , ++.

, . Visual Basic , (DLL), (, C++).

 

 

http://studentbank.ru/view.php?id=11130

https://ru.wikipedia.org/wiki/Visual_Basic

http://www.lessons-tva.info/edu/e-inf2/m2t3_7.html

http://progopedia.ru/dialect/visual-basic/

 





:


: 2017-02-24; !; : 270 |


:

:

! . .
==> ...

1695 - | 1482 -


© 2015-2024 lektsii.org - -

: 0.014 .