以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  在弹出的窗口中输入字符用来赋值给指定的变量  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70125)
--  作者：wengstars
--  发布时间：2015/6/16 11:11:00
--  在弹出的窗口中输入字符用来赋值给指定的变量

    Dim JRRQ1, JRRQ2 As String

InputValue(JRRQ1, "上次节日费日期","请输入上次节日日期,格式如20150501:")

      InputValue(JRRQ2 "本次节日费日期","请输入本次节日日期,格式如20150620:")

      下面的代码用来对比入职日和JRRQ1和JRRQ2的天数差，来判断是否执行节日费发放。此处代码省略。

  在编译的时候为何会报错，提示为“Variable \'JRRQ1\' hides a variable in an enclosing block.“也就是变量隐藏变量。究竟什么原因？想请教一下各位，谢谢！
--  作者：Bin
--  发布时间：2015/6/16 11:13:00
--  
所有代码发出来看看.  你调试一下看看是那一句报错.
--  作者：大红袍
--  发布时间：2015/6/16 11:28:00
--  
Dim JRRQ1, JRRQ2 As String 改一个名字，提示的意思是你已经定义过这个变量了。