有cmd1 cmd2 cmd3如果是这样 点cmd1的时候 a = 1
点cmd2的时候 a = 2sub cmd3_Click
   if a = 1 then
      '  xxx   这部分我自己来写。主要上面那两句话
   elseif a = 2 then
      '  yyy   这部分我自己来写。主要上面那两句话   end if
end sub 

解决方案 »

  1.   

    sub cmd1_Click
     a=1
    end subsub cmd2_Click
     a=2
    end sub
      

  2.   

    private a as longprivate sub cmd1_Click()
     a=1
    end subprivate sub cmd2_Click()
     a=2
    end subprivate sub cmd3_Click()
      if a = 1 then
      ' xxx 这部分我自己来写。主要上面那两句话
      elseif a = 2 then
      ' yyy 这部分我自己来写。主要上面那两句话  end if
    end sub 
      

  3.   

    sub cmd1_Click
      a=1
    end subsub cmd2_Click
      a=2
    end sub
    sub cmd3_Click
      if a = 1 then
        ' xxx 这部分我自己来写。主要上面那两句话
      elseif a = 2 then
        ' yyy 这部分我自己来写。主要上面那两句话  end if
    end sub
    就是这样啊