| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1259 人关注过本帖
标题:程序运行错误如何自动忽略
只看楼主 加入收藏
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:0 
IF VarType(_Screen.Image1) != "O"
    _screen.AddObject('Image1','Image')
ENDIF

授人以渔,不授人以鱼。
2013-04-03 17:00
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
这个贴子,对你可能有用
http://bbs.

坚守VFP最后的阵地
2013-04-03 17:03
ntzhangkang
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2013-3-18
收藏
得分:0 
CLEAR
CLOSE ALL
tp11=RAND(-1)
tp12=ROUND(tp11*70,0)
tp13=ALLTRIM(STR(tp12))+".jpg"
IF VarType(_Screen.Image1) != "O"
    _screen.AddObject('Image1','Image')
ENDIF
_screen.Image1.width = _screen.width
_screen.Image1.height = _screen.height
_screen.Image1.stretch = 2
_screen.Image1.anchor = 15
_screen.Image1.picture='&tp13'

通过上段代码已解决问题,谢谢各位
2013-04-03 17:12
qshuju
Rank: 3Rank: 3
等 级:论坛游侠
威 望:3
帖 子:217
专家分:112
注 册:2011-6-9
收藏
得分:4 
记号了。anchor=15,很好很好啊
2013-04-03 20:56
gdzjwcyz
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2013-4-19
收藏
得分:0 
路过的新手也来看看
2013-04-19 22:41
快速回复:程序运行错误如何自动忽略
数据加载中...
 
   



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

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