Skip to content

Commit b8dcb5a

Browse files
committed
added Sample Applications from installer
added compile.bat with helper instructions to compile there are some differences to SourceZipFiles
1 parent 86f279e commit b8dcb5a

File tree

125 files changed

+13141
-0
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

125 files changed

+13141
-0
lines changed

.gitignore

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,10 @@
11
**vbw
22
**lvw
33
**exe
4+
**dll
5+
*.lib
6+
*.exp
7+
*.csi
48

59
## Ignore Visual Studio temporary files, build results, and
610
## files generated by popular Visual Studio add-ons.
Lines changed: 20 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,20 @@
1+
2+
Microsoft Visual Studio Solution File, Format Version 9.00
3+
# Visual Studio 2005
4+
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "MyCompany.HelloWorld", "MyCompany.HelloWorld\MyCompany.HelloWorld.vbproj", "{13331BB7-D82A-4580-8517-CEE194C91B99}"
5+
EndProject
6+
Global
7+
GlobalSection(SolutionConfigurationPlatforms) = preSolution
8+
Debug|Any CPU = Debug|Any CPU
9+
Release|Any CPU = Release|Any CPU
10+
EndGlobalSection
11+
GlobalSection(ProjectConfigurationPlatforms) = postSolution
12+
{13331BB7-D82A-4580-8517-CEE194C91B99}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
13+
{13331BB7-D82A-4580-8517-CEE194C91B99}.Debug|Any CPU.Build.0 = Debug|Any CPU
14+
{13331BB7-D82A-4580-8517-CEE194C91B99}.Release|Any CPU.ActiveCfg = Release|Any CPU
15+
{13331BB7-D82A-4580-8517-CEE194C91B99}.Release|Any CPU.Build.0 = Release|Any CPU
16+
EndGlobalSection
17+
GlobalSection(SolutionProperties) = preSolution
18+
HideSolutionNode = FALSE
19+
EndGlobalSection
20+
EndGlobal
Lines changed: 58 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,58 @@
1+
VERSION 5.00
2+
Begin VB.Form Form1
3+
Caption = "Form1"
4+
ClientHeight = 3090
5+
ClientLeft = 60
6+
ClientTop = 450
7+
ClientWidth = 4680
8+
LinkTopic = "Form1"
9+
ScaleHeight = 3090
10+
ScaleWidth = 4680
11+
Begin VB.CommandButton cmdLaunchNetForm
12+
Caption = "Launch .NET Form"
13+
Height = 1335
14+
Left = 960
15+
TabIndex = 0
16+
Top = 840
17+
Width = 2895
18+
End
19+
End
20+
Attribute VB_Name = "Form1"
21+
Attribute VB_GlobalNameSpace = False
22+
Attribute VB_Creatable = False
23+
Attribute VB_PredeclaredId = True
24+
Attribute VB_Exposed = False
25+
26+
' Declare the .NET HelloWorldForm.
27+
Dim WithEvents hello As HelloWorldForm
28+
Attribute hello.VB_VarHelpID = -1
29+
30+
Private Sub cmdLaunchNetForm_Click()
31+
32+
' Instantiate the form.
33+
Set hello = New HelloWorldForm
34+
35+
' Call one of the Initialize methods which
36+
' is calling one of the .NET
37+
' parameterized constructors.
38+
'hello.Initialize "Hello from VB6"
39+
40+
' Show the form.
41+
hello.Show vbModeless
42+
43+
' Other standard Form methods and properties are available...
44+
'hello.Move 0, 0, 800, 800
45+
'hello.Caption = "Other Caption"
46+
47+
' Other custom methods and properties are available, as well...
48+
'hello.HelloText = "Other Hello Text"
49+
'hello.ReverseBackgroundColors
50+
51+
End Sub
52+
53+
' Handle the SampleEvent event.
54+
Private Sub hello_SampleEvent(ByVal sampleEventText As String)
55+
MsgBox sampleEventText
56+
End Sub
57+
58+
Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
Attribute VB_Name = "Globals"
2+
' Global Variables
3+
Public g_InteropToolbox As InteropToolbox
Lines changed: 38 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,38 @@
1+
Type=Exe
2+
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\WINDOWS\system32\stdole2.tlb#OLE Automation
3+
Reference=*\G{4FF8CA67-C55E-4124-9C6D-EE577B0A8C7B}#1.0#0#..\MyCompany.HelloWorld\bin\Release\MyCompany.HelloWorld.tlb#MyCompany_HelloWorld
4+
Reference=*\G{124C25D4-C596-4B41-AC51-F45E6D196751}#1.0#0#..\..\..\Program Files\Microsoft InteropForm Toolkit\SDK\Libraries\Microsoft.InteropFormTools.tlb#InteropFormTools
5+
Module=Globals; Globals.bas
6+
Module=MainModule; MainModule.bas
7+
Form=Form1.frm
8+
Startup="Sub Main"
9+
HelpFile=""
10+
ExeName32="HelloWorldVB6.exe"
11+
Command32=""
12+
Name="HelloWorldVB6"
13+
HelpContextID="0"
14+
CompatibleMode="0"
15+
MajorVer=1
16+
MinorVer=0
17+
RevisionVer=0
18+
AutoIncrementVer=0
19+
ServerSupportFiles=0
20+
VersionCompanyName="My Company Inc."
21+
CompilationType=0
22+
OptimizationType=0
23+
FavorPentiumPro(tm)=0
24+
CodeViewDebugInfo=0
25+
NoAliasing=0
26+
BoundsCheck=0
27+
OverflowCheck=0
28+
FlPointCheck=0
29+
FDIVCheck=0
30+
UnroundedFP=0
31+
StartMode=0
32+
Unattended=0
33+
Retained=0
34+
ThreadPerObject=0
35+
MaxNumberOfThreads=1
36+
37+
[MS Transaction Server]
38+
AutoRefresh=1
Lines changed: 25 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,25 @@
1+
Attribute VB_Name = "MainModule"
2+
' Entry Point for Application
3+
Sub Main()
4+
5+
' Instantiate the Toolbox
6+
Set g_InteropToolbox = New InteropToolbox
7+
g_InteropToolbox.Initialize
8+
9+
' Call Initialize method only when first creating the toolbox
10+
' This aids in the debugging experience
11+
g_InteropToolbox.Initialize
12+
13+
' Signal Application Startup
14+
g_InteropToolbox.EventMessenger.RaiseApplicationStartedupEvent
15+
16+
17+
' Do application logic
18+
Dim f1 As New Form1
19+
f1.Show vbModal
20+
21+
22+
' Signal Application Shutdown
23+
g_InteropToolbox.EventMessenger.RaiseApplicationShutdownEvent
24+
25+
End Sub

Sample Applications/Hello World/MyCompany.HelloWorld/HelloWorldForm.Designer.vb

Lines changed: 58 additions & 0 deletions
Some generated files are not rendered by default. Learn more about customizing how changed files appear on GitHub.

0 commit comments

Comments
 (0)