Foxtable(狐表)用户栏目专家坐堂 → 请教,有For ...Next.


  共有11817人关注过本帖树形打印复制链接

主题:请教,有For ...Next.

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/6/28 14:47:00 [显示全部帖子]

dim k as string = 20

for i as integer = 0 to k

    if  a > 10  then

        i = i+1

    end if

Next


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/6/28 15:05:00 [显示全部帖子]

dim k as string = 20

 

应该是:

 

dim k As Integer

 

否则+1就成了201,不是21


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/6/28 15:37:00 [显示全部帖子]

图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2010/6/28 15:38:00 [显示全部帖子]

增加页数:

 

Dim k as Integer= 20

for i as integer = 0 to k

    if  a > 10  then

        i = i - 1

    end if

Next


 回到顶部