中易网

vb中errhandler是什么意思

答案:3  悬赏:70  
解决时间 2021-04-21 18:02
Private Sub Command1_Click()
Dim retval
CommonDialog1.CancelError = True
On Error GoTo errhandler
CommonDialog1.Filter = "all files(*.*)│*.*│bmp文件(*.bmp)│*.bmp│jpg文件(*.jpg)│*.jpg"
CommonDialog1.FilterIndex = 1
CommonDialog1.ShowOpen
retval = Shell(CommonDialog1.FileName, vbNormalFocus)

errhandler
Exit Sub

End Sub
这个程序在运行的时候,提示:errhandler子程序或函数未定义,请问各位大虾为什么啊?
呵呵,弱弱的问一句哈:英文状态下的│我怎么找不到啊??请问在哪里能够找到啊??谢谢了!
最佳答案
errhandler
Exit Sub
改成
errhandler:
Exit Sub
带一个冒号 是容错处理来的

这个当然啦 你这句
CommonDialog1.Filter = "all files(*.*)│*.*│bmp文件(*.bmp)│*.bmp│jpg文件(*.jpg)│*.jpg"

里面的│全部都是中文的标点符号
你将它们全部重新改成英文状态下的|吧

就是Shift+反斜杠那个键
全部回答
是 。。。 On Error GoTo errhandler 。。。 errhandler: if err then msgbox err.Description
一般是这么来的: on error goto errhandler k=5/0 exit sub '未发生错误,则退出sub errhandle: msgbox “有可能除数是0” '若发生错误,则弹出提示,再退出sub end sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
四牌楼街我想知道这个在什么地方
CBF30齿轮泵应配多大的电机?
今天到明天甘肃庆阳天气预报
我买了一辆二手摩托车没有过户昨天被交警扣了
泡泡糖吃进肚子里
我住在厦门湖里,听说可以去社区卫生院建卡比
男朋友前任说跟你做好朋友,为什么
中考常用的化学方程式有哪些?
青梅是咋煮酒的?
悫悫咖啡我想知道这个在什么地方
芜湖长江市场园有没有招聘信息
两个月的宝宝要把头发都剃光吗
免费看韩剧《青青草》的网站
济南亚运村在哪个区
上班无聊吗?
推荐资讯
暴雨洗车(新丰店)怎么去啊,有事要去办理
数学题,因式分解
晶彩照相馆地址在哪,我要去那里办事
法国的上帝叫什么。
如图,已知⊙O的半径为r,另有圆心也是点O的两
一个太阳可以创几个群
怎么修改空间里面的个人形象
有关大宝SOD的生产日期问题
玉龙黎明诺玛底客栈地址有知道的么?有点事想
空气加湿器为什么不出雾 加湿器不出雾是什么
为什么啊0.0
盐都区幼儿园地址在什么地方,我要处理点事
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?