189 8069 5689
双击项目资源管理器里的My Project
创新互联是一家集网站建设,翔安企业网站建设,翔安品牌网站建设,网站定制,翔安网站建设报价,网络营销,网络优化,翔安网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。
在应用程序页里取消“启用应用程序框架”选项
这时候在上面的“启动对象”下拉表里就可以选sub main了
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Integer
long 改 Integer
使用 ADO 连接到 Excel
ADO 使用 MDAC 中以下两个 OLE DB 提供程序中的任何一个都可以连接到 Excel 数据文件。
Microsoft Jet OLE DB Provider — 或 —Microsoft OLE DB Provider for ODBC Drivers
使用 Microsoft Jet OLE DB Provider
Jet 提供程序只需要两条信息就可以连接到 Excel 数据源：路径（包括文件名），和 Excel 文件版本。
Jet 提供程序使用连接字符串
Dim cn as ADODB.Connection
Set cn = New ADODB.Connection
With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=C:\MyFolder\MyWorkbook.xls;" _
"Extended Properties=Excel 8.0;"
.Open
End With
提供程序版本：必须使用 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：
Couldn't find installable ISAM.
Excel 版本：对于 Excel 95 工作簿（Excel 版本 7.0），应指定 Excel 5.0；对于 Excel 97、Excel 2000 或 Excel 2002 (XP) 工作簿（Excel 版本 8.0、9.0 和 10.0），应指定 Excel 8.0 版本。
使用“数据链接属性”对话框的 Jet 提供程序
如果在应用程序中使用“ADO 数据控件”或“数据环境”，就会出现数据链接属性对话框来收集必要的连接设置。
在提供程序选项卡上，选择 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：
Couldn't find installable ISAM.
在连接选项卡上，浏览到工作簿文件。忽略“用户 ID”和“密码”项，因为这些不适用于 Excel 连接。（无法打开受密码保护的 Excel 文件作为数据源。）
在所有选项卡上，从列表中选择扩展属性，然后单击编辑值。输入 Excel 8.0;，用分号 (;) 将其与任何其他已有的项分隔。如果忽略此步骤，测试连接时将出现一条错误信息。这是因为如果不另行指定，Jet 提供程序期望 Microsoft Access 数据库。返回到连接选项卡，并单击测试连接。将出现一个消息框，通知测试已成功完成即可。
在资源文件管理器中，找到数据库，属性管理器中出现属性，选择不复制，或当文件最新时才复制
需要激活的是vs，vb是vs里的集成模板工具
Microsoft Visual Studio Ultimate 2012 旗舰版 有效注册密钥：
YKCW6-BPFPF-BT8C9-7DCTH-QXGWC
- Microsoft Visual Studio Premium 2012 高级版 有效注册密钥：
MH2FR-BC9R2-84433-47M63-KQVWC
- Microsoft Visual Studio Professional 2012 专业版 有效注册密钥：
4D974-9QX42-9Y43G-YJ7JG-JDYBP
项目属性引用
在列表中找到Shape什么的Dll然后它的属性里的复制本地设置为True。
然后那些dll和exe一起复制下来。
然后在XP运行。