vb窗体html,vb6.0 窗体传参

【实例简介】

打开窗体，传递参数。第三方接口用。

【实例截图】

【核心代码】

VERSION 5.00

Begin VB.Form Form1

Caption = "Form1"

ClientHeight = 4800

ClientLeft = 120

ClientTop = 465

ClientWidth = 8535

LinkTopic = "Form1"

ScaleHeight = 4800

ScaleWidth = 8535

StartUpPosition = 3 '窗口缺省

Begin VB.TextBox Text1

Height = 495

Left = 2880

TabIndex = 1

Text = "Text1"

Top = 1080

Width = 2055

End

Begin VB.CommandButton Command1

Caption = "打开程序"

Height = 855

Left = 2760

TabIndex = 0

Top = 1680

Width = 2415

End

Begin VB.Label Label1

Caption = "Label1"

Height = 255

Left = 120

TabIndex = 2

Top = 120

Width = 7095

End

End

Attribute VB_Name = "Form1"

Attribute VB_GlobalNameSpace = False

Attribute VB_Creatable = False

Attribute VB_PredeclaredId = True

Attribute VB_Exposed = False

Private Sub Command1_Click()

Shell App.Path "\JiaoHao\JiaoHao.exe " Text1

End Sub