| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
买学问 - 大佬一对一辅导,有问必答买学问 - 专业的付费知识问答平台
共有 170 人关注过本帖
标题:VB点击启动后第一次能正常,结束启动后,再一次点击启动,VB就会闪退
只看楼主 加入收藏
lubh
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2021-10-7
结帖率:0
收藏
已结贴  问题点数:20 回复次数:4 
VB点击启动后第一次能正常,结束启动后,再一次点击启动,VB就会闪退
运行环境是windows10专业版
vb6.0连接access2016
具体代码如下:
Private Sub Form_Load()
Dim cn As New Connection
Dim rs As New Recordset
Dim constr As String
cn.ConnectionString = "provider=microsoft.ace.oledb.12.0;" & "data source=" & App.Path & "\RD.accdb"
cn.Open
constr = "select * from login where id=1"
Set rs.ActiveConnection = cn
rs.Open (constr)
Text1.Text = rs.Fields(1).Value
Text2.Text = rs.Fields(2).Value
rs.Close
cn.Close
End Sub
搜索更多相关主题的帖子: 结束 Dim 启动 VB 点击 
2021-10-07 11:44
约定的童话
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:7
帖 子:49
专家分:256
注 册:2021-8-1
收藏
得分:10 
关掉杀毒软件试一下
2021-10-08 09:28
为情而疯
Rank: 2
等 级:论坛游民
帖 子:1
专家分:10
注 册:2021-10-8
收藏
得分:10 
调试环境看下报错原因。
2021-10-08 17:17
lubh
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2021-10-7
收藏
得分:0 
调试环境也不行,只要点运行就会关闭
2021-10-09 08:07
lubh
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2021-10-7
收藏
得分:0 
删除代码再点运行是不会关闭的,问题就出现在代码里面
2021-10-09 08:09
快速回复:VB点击启动后第一次能正常,结束启动后,再一次点击启动,VB就会闪退
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.056414 second(s), 8 queries.
Copyright©2004-2021, BCCN.NET, All Rights Reserved