vb代码求解,代码如下 请问哪里错了 怎么改? 原意是间隔一段时间插入一张图片的

[复制链接]
查看11 | 回复2 | 2011-8-9 03:30:15 | 显示全部楼层 |阅读模式
Private Sub Timer1_Timer()
Static i As Integer
i = i + 1
Image1.Picture = LoadPicture(App.Path + "\& i &.bmp")
If i = 70 Then i = 0
End Sub

回复

使用道具 举报

千问 | 2011-8-9 03:30:15 | 显示全部楼层
双引号内的是字符串为string型,而你的 i 是 integer 型,出错是在.bmp前少了双引号把Image1.Picture = LoadPicture(App.Path + "\& i &.bmp")改成Image1.Picture = LoadPicture(App.Path & "\" & i & ".bmp")...
回复

使用道具 举报

千问 | 2011-8-9 03:30:15 | 显示全部楼层
Image1.Picture = LoadPicture(App.Path + "\& i &.bmp")改为:Image1.Picture = LoadPicture(App.Path & "\"& i & ".bmp")...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行