注册 登录
编程论坛 VB6论坛

新手上路,出现声明字符与声明的数量类型不符

Jamin_Wong 发布于 2017-06-03 11:04, 1712 次点击

'通用,option explicit
   Dim x, y, h, w, i As Integer   '定义x,y,h,w,i为整数型变量
   Const n = 30       '相片总数数量
   
   
Private Sub Command1_Click()

    i = 1       '变量i表示要浏览第一张照片
   
    Image1.Picture = LoadPicture(App.Path & "D:\Other\My_Picture1\p" & i&, ".jpg")


   
   
   
3 回复
#2
HVB62017-06-03 11:18
回复 楼主 Jamin_Wong
如果是vb6语句,则修改为红色部分:
'通用,option explicit
   'Dim x, y, h, w, i As Integer   '定义x,y,h,w,i为整数型变量
   Dim x As Integer, y As Integer, h As Integer, w As Integer, i As Integer   '定义x,y,h,w,i为整数型变量
   Const n = 30       '相片总数数量
   
   
Private Sub Command1_Click()

    i = 1       '变量i表示要浏览第一张照片
   
    Image1.Picture = LoadPicture(App.Path & "D:\Other\My_Picture1\p" & i&, ".jpg")
#3
风吹过b2017-06-03 12:56
    Image1.Picture = LoadPicture(App.Path & "D:\Other\My_Picture1\p" & i&, ".jpg")

i&,  这里错了。i 后面要有一个空格,没有  逗号
#4
Jamin_Wong2017-06-03 16:16
谢谢你们帮助!新手上路。问题解决!
1