mirror of
https://github.com/avast/ioc
synced 2024-07-08 11:01:29 +00:00
14 lines
190 B
QBasic
14 lines
190 B
QBasic
|
Attribute VB_Name = "Module1"
|
||
|
|
Option Explicit
|
||
|
|
|
||
|
|
Dim g As Long
|
||
|
|
|
||
|
|
Private Declare Sub callback Lib "dummy.dll" (ByVal s As Long)
|
||
|
|
|
||
|
|
Sub Main()
|
||
|
|
g = 21
|
||
|
|
callback g + 1
|
||
|
|
End Sub
|
||
|
|
|
||
|
|
|