重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
双击项目资源管理器里的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运行。