| Author |
Message |
_aLfa_
Site Admin
Joined: 21 Sep 2002
Posts: 233
Location: Aveiro, Portugal
|
|
Posted: Mon Sep 27, 2004 6:38 pm
Post subject: MSVBVM60.DLL exports uncovered
|
|
[size=134:3c89xz4c]rtcMakeDir
Description:
This function creates a directory. It works the same way as its VB equivalent - MkDir.
Declaration:
[vb:3c89xz4c]- Private Declare Sub rtcMakeDir Lib "msvbvm60.dll" (ByVal pPath As Long)
Parameters:
pPath
[in] Pointer to a unicode string that specifies the path of the directory to be created.
Return values:
None.
Remarks:
rtcMakeDir uses CreateDirectoryA API to create directory.
Example code:
[vb:3c89xz4c]- Private Declare Sub rtcMakeDir Lib "msvbvm60.dll" (ByVal pPath As Long)
-
- Call rtcMakeDir(StrPtr("d:\aaa\"))
====================================================================================================
[size=134:3c89xz4c]EbGetHandleOfExecutingProject
Description:
This function returns application base address. It works the same way as VB statement - App.hInstance.
Declaration:
[vb:3c89xz4c]- Private Declare Sub EbGetHandleOfExecutingProject Lib "msvbvm60.dll" (ByRef hModule As Long)
Parameters:
hModule
[out] Pointer to the variable that receives the base address.
Return values:
None.
Remarks:
This function fails in VB IDE.
Example code:
[vb:3c89xz4c]- Private Declare Sub EbGetHandleOfExecutingProject Lib "msvbvm60.dll" (ByRef hModule As Long)
-
- Dim hModule as Long
- Call EbGetHandleOfExecutingProject(hModule)
- MsgBox Hex(hModule)
_________________
One thing only I know, and that is that I know nothing. (Socrates)
Last edited by _aLfa_ on Sat Oct 29, 2005 9:30 am; edited 1 time in total
|
|
| Back to top |
|
 |
|
Max_Power
New User
Joined: 15 May 2005
Posts: 1
|
|
Posted: Sun May 15, 2005 1:16 am
Post subject:
|
|
Here are a couple I did a few months ago:
------------------------------------------------------------
Math
------------------------------------------------------------
rtcCos
Description:
Calculates the cosine of an angle.
Declaration:
Private Declare Function rtcCos Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
Parameters:
dblNumber
[in] A number expressing the angle in radians.
Return values:
Returns a double specifying the cosine of an angle.
Remarks:
The Cos function takes an angle and returns the ratio of two sides of a right triangle. The ratio is the length of the side adjacent to the angle divided by the length of the hypotenuse.
The result lies in the range -1 to 1.
Example code:
Private Declare Function rtcCos Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
rtcCos 1
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
rtcSin
Description:
Calculates the sine of an angle.
Declaration:
Private Declare Function rtcSin Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
Parameters:
dblNumber
[in] A number expressing the angle in radians.
Return values:
Returns a double specifying the sine of an angle.
Remarks:
Takes an angle and returns the ratio of two sides of a right triangle. The ratio is the length of the side opposite the angle divided by the length of the hypotenuse.
The result lies in the range -1 to 1.
Example code:
Private Declare Function rtcSin Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
rtcSin 1
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
rtcSqr
Description:
Calculates the square root of a number.
Declaration:
Private Declare Function rtcSqr Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
Parameters:
dblNumber
[in] A number whose square root is to be calculated.
Return values:
Returns a double specifying the square root of a number.
Remarks:
None
Example code:
Private Declare Function rtcSqr Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
rtcSqr 4
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
rtcTan
Description:
Calculates the tangent of an angle.
Declaration:
Private Declare Function rtcTan Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
Parameters:
dblNumber
[in] A number expressing the angle in radians.
Return values:
Returns a double specifying the tangent of an angle.
Remarks:
Tan takes an angle and returns the ratio of two sides of a right triangle. The ratio is the length of the side opposite the angle divided by the length of the side adjacent to the angle.
Example code:
Private Declare Function rtcTan Lib "msvbvm60.dll" (ByVal dblNumber As Double) As Double
rtcTan 1
------------------------------------------------------------
Misc
------------------------------------------------------------
rtcDoEvents
Description:
This function yields execution so that the operating system can process other events. It works the same way as its VB equivalent -
DoEvents.
Declaration:
Private Declare Sub rtcDoEvents Lib "msvbvm60.dll"
Parameters:
None
Return values:
None
Remarks:
Passes control to the operating system. Control is returned after the operating system has finished processing the events in its queue and all keys in the SendKeys queue have been sent.
Example code:
Private Declare Sub rtcDoEvents Lib "msvbvm60.dll" ()
Dim i As Long
For i = 0 To 10000000
Me.Caption = i
rtcDoEvents
Next i
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
rtcBeep
Description:
Sounds a tone through the computer's speaker.
Declaration:
Private Declare Sub rtcBeep Lib "msvbvm60.dll"
Parameters:
None
Return values:
None
Remarks:
The frequency and duration of the beep depend on your hardware and system software, and vary among computers. Uses MessageBeep API.
Example code:
Private Declare Sub rtcBeep Lib "msvbvm60.dll" ()
rtcBeep
|
|
| Back to top |
|
|
|
shirely
New User
Joined: 07 Oct 2005
Posts: 1
|
|
Posted: Thu Oct 20, 2005 2:35 pm
Post subject:
|
|
|
thanks for your sharing
|
|
| Back to top |
|
|
|
|
|
Memberlist