社区
VB基础类
帖子详情
很简单的问题,大侠帮忙看一下,100分
ysotn
2004-04-08 06:13:31
我在form的Load事件里执行数据库连接操作,如果发生错误异常的话,进行处理,并要求form不在打开显示,该怎么做,谢过
...全文
80
8
打赏
收藏
很简单的问题,大侠帮忙看一下,100分
我在form的Load事件里执行数据库连接操作,如果发生错误异常的话,进行处理,并要求form不在打开显示,该怎么做,谢过
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
8 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
shierren
2004-04-08
打赏
举报
回复
sub main作为程序初始化和入口点有助于加强软件的模块化及软件流程的清晰度,当然并不是非用不可的部分。
daisy8675
2004-04-08
打赏
举报
回复
放那都一樣呀,隻要處理好出錯處理就可以了,為甚而非得放在sub main裡面,那位說個理由?
csdnmzk
2004-04-08
打赏
举报
回复
可以在load事件:
on erro goto errhandle
'.......处理语句
exit sub
errhandle:
msgbox Err.Description
programfish
2004-04-08
打赏
举报
回复
在sub main里进行连接数据库,判断用户等,没有错误再启动窗体。
csdnmzk
2004-04-08
打赏
举报
回复
可以在load事件:
on erro goto errhandle
'.......处理语句
exit sub
:errhandle
Err.Description
aabbss
2004-04-08
打赏
举报
回复
sub Form_Load()
on error goto errHandler:
'数据库的连接操作代码写在这里
'
'
exit sub
errHandler:
Msgbox "连接数据库出错了!"
end
End sub
daisy8675
2004-04-08
打赏
举报
回复
Public Function make_connection() As Boolean
g_db_err = ""
strconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Datas\ListenEZ.mdb;Persist Security Info=False;Jet OLEDB:DataBase Password='Elegance'"
conn1.CursorLocation = adUseClient
On Local Error GoTo connection_error
conn1.Open strconn
Call colletion
make_connection = True
frmLoad.Timer1.Enabled = False
Exit Function
connection_error:
g_db_err = "Connect fail !! " & Err.Description
make_connection = False
strmsg = MsgBox("無法連接數據庫,請檢查數據庫", vbExclamation, "ListenEZ")
Err.Clear
frmLoad.Timer1.Enabled = False
End
End Function
跳錯誤顯示呀。
并要求form不在打开显示
////是form繼續開,但是數據不再讀的意思嗎?
shierren
2004-04-08
打赏
举报
回复
一般在sub main里连接,成功后再load form
asp.net 在线教学管理网站,有
大侠
帮忙
调试吗?
在这个特定的
问题
中,标题提到的是一个在线教学管理网站,这通常涉及到用户管理、课程管理、学习进度跟踪等功能。而描述中提到的“新建网站项目复制了内容,出现缺少命名空间错误”,这是一个常见的编程
问题
,通常在...
请大家
帮忙
看看这个2.4G无线鼠标存在的
问题
板子是用PADS2007做的,板子做出来总是距离不行,5米左右效果就不好了。是用凌阳方案做的。
基于matlab的粒子群算法求助-指数PSO源代码.rar
基于matlab的粒子群算法求助-指数...希望各位
帮忙
指教
一下
。 待求函数形式: Y=p1*x1p2 p3*x2p4 p5*x3p6 p7*x4p8 p9*x5p10 p11*x6p12 p13X是六维变量,求未知参数P. P是13维变量。 主程序和适应度函数在word文档中。
多位数字相乘(乘数和被乘数在255位以内)
上午传的有
问题
,重新发一个,大家多包涵啊~~~
大侠
们
帮忙
知道
一下
啊~~~
帖子:MFC 控件类指针、new和GetDlgItem——工程代码
近日在论坛上发一帖子: MFC 控件类指针、new和GetDlgItem ,该代码是我新建一个工程,将其余与此
问题
无关的代码删掉后得到。但尽管如此,我所提到的
问题
依然存在,没有变化。希望各位高手、
大侠
和热心人士可以
帮忙
...
VB基础类
7,785
社区成员
197,585
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章