VBA学习小组第3课作业

兰色幻想 · 发表于 2012-1-11 09:16

   第3课的作业如下：
         1、请找出下面Sub程序中的3个错误之处。

                     Sub筛选
                        运行的语句（这里没错）
                     End
         2、请编写一个名子为“B”的Sub程序，调用下面带参数的“A”程序，第一个参数值为100，第二个参数值为500
            Sub A(g1 As Integer, g2 As Integer)
                  Range("a1") = g1 + g2
            End Sub
         3、请编写一个名子为“mysub”的Sub程序，调用下面的函数程序，把函数返回的结果放在A1（VBA中表示为Range("A1")）里。调用时参数的值设置为4（A1的结果显示为24答案为正确）

            Function Myfun(A As Integer)
            Dim x As Integer
               Myfun = 1
               For x = A To 1 Step -1
                  Myfun = Myfun * x
               Next x
         End Function
      4、我想在sheet1工作表中添加一个SelectionChange事件，请说出添加步骤（只添加开始和结束语句即可）

   上述4个题目请上交到班统计的发的作业上交处，注意直接把代码和答案粘贴在你的回贴里，不用做成附件上传，也不要在本贴后跟贴上交答案

windimi007 · 发表于 2012-1-11 09:18

沙发是我的吗？{:3912:}

kakaco · 发表于 2012-1-11 09:26

板凳呢

yewei113 · 发表于 2012-1-11 09:26

我是板凳

F_LM · 发表于 2012-1-11 09:27

前排就坐

libenwen2011 · 发表于 2012-1-11 09:28

谢谢

开心rabbit · 发表于 2012-1-11 09:28

认真做作业！！

qzc804030 · 发表于 2012-1-11 09:31

来看作业来了!

zhbitgogo · 发表于 2012-1-11 09:33

顶起支持老师

hanqing · 发表于 2012-1-11 09:38

看看什么作业

给自己一点压力

		自动登录	找回密码
密码			注册

[练习题] VBA学习小组第3课作业

评分