Foxtable(狐表)用户栏目专家坐堂 → 公鸡母鸡小鸡事件


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

主题:公鸡母鸡小鸡事件

帅哥哟,离线,有人找我吗?
hudouzhitiger
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:91 积分:833 威望:0 精华:0 注册:2017/11/21 13:41:00
  发帖心情 Post By:2018/5/1 9:11:00 [只看该作者]

看看

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


加好友 发短信
等级:四尾狐 帖子:859 积分:10790 威望:0 精华:0 注册:2016/5/6 14:34:00
  发帖心情 Post By:2018/5/1 9:21:00 [只看该作者]

什么东东?

 回到顶部
帅哥哟,离线,有人找我吗?
ytzn
  13楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:439 积分:3850 威望:0 精华:0 注册:2012/10/12 5:20:00
  发帖心情 Post By:2018/5/1 11:54:00 [只看该作者]

学习

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


加好友 发短信
等级:童狐 帖子:250 积分:2089 威望:0 精华:0 注册:2014/3/25 14:24:00
  发帖心情 Post By:2018/5/1 14:53:00 [只看该作者]

看看思路是否不一样

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


加好友 发短信
等级:童狐 帖子:250 积分:2089 威望:0 精华:0 注册:2014/3/25 14:24:00
  发帖心情 Post By:2018/5/1 15:05:00 [只看该作者]

哈有意思的小作业, 有四种结果
For gj As Integer = 0 To 20
    For mj As Integer = 0 To 33
        Dim yuan As Double = 100 - gj*5 - mj*3
        Dim zs As Integer = gj + mj + yuan*3
        If zs = 100 Then
            e.Form.Controls("gj").value =e.Form.Controls("gj").value & "丨" & gj
            e.Form.Controls("mj").value =e.Form.Controls("mj").value & "丨" & mj
            e.Form.Controls("xj").value =e.Form.Controls("xj").value & "丨" & yuan*3
        End If
    Next
Next

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


加好友 发短信
等级:婴狐 帖子:5 积分:127 威望:0 精华:0 注册:2017/6/15 0:25:00
  发帖心情 Post By:2018/5/1 17:09:00 [只看该作者]

进来学习,当年学VB的经典题目类型。。。

 回到顶部
帅哥哟,离线,有人找我吗?
方丈
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:803 积分:10727 威望:0 精华:1 注册:2008/9/2 18:58:00
  发帖心情 Post By:2018/5/1 22:01:00 [只看该作者]

记号

 回到顶部
帅哥哟,离线,有人找我吗?
crychen
  18楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:120 积分:1933 威望:0 精华:0 注册:2016/8/30 4:18:00
  发帖心情 Post By:2018/5/2 2:42:00 [只看该作者]

看看

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


加好友 发短信
等级:小狐 帖子:327 积分:2511 威望:0 精华:0 注册:2018/3/15 7:39:00
  发帖心情 Post By:2018/5/16 15:06:00 [只看该作者]

kankan ````````````````

 回到顶部
总数 19 上一页 1 2