| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 查询 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=102313) |
| -- 作者：等待 -- 发布时间：2017/6/17 9:09:00 -- 查询 Dim btn As WinForm.Button = Forms("車鲁H7A751").Controls("查询") Dim btn As WinForm.Button = Forms("車鲁H7A855").Controls("查询")
老师帮我看看这段代码是什么错误，改怎么写 |
| -- 作者：有点蓝 -- 发布时间：2017/6/17 9:37:00 -- http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50080 [此贴子已经被作者于2017/6/17 9:37:13编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2017/6/17 9:39:00 -- 代码本身没有问题。 请详细说明代码在什么事件，想实现什么功能，运行有什么错误，想要达到什么效果。并截图说明
|
| -- 作者：等待 -- 发布时间：2017/6/17 9:39:00 -- Dim btn As WinForm.Button = Forms("車鲁H7A751").Controls("查询") Dim btn As WinForm.Button = Forms("車鲁H7A855").Controls("查询")
出现下面的提示
编译错误：当前块中已声明了局部变量“btn” 错误代码：Dim btn As WinForm.Button = Forms("車鲁H7A855").Controls("查询") |
| -- 作者：有点蓝 -- 发布时间：2017/6/17 9:40:00 -- 就这样给出2句代码问有没有问题的问题基本是没有答案的 |
| -- 作者：等待 -- 发布时间：2017/6/17 9:44:00 -- 查询按钮中的事件如下：
Dim btn As WinForm.Button = Forms("車鲁H7A751").Controls("查询") Dim btn As WinForm.Button = Forms("車鲁H7A855").Controls("查询")
当确定时出现下面的提示：
编译错误：当前块中已声明了局部变量“btn” 错误代码：Dim btn As WinForm.Button = Forms("車鲁H7A855").Controls("查询") |
| -- 作者：有点蓝 -- 发布时间：2017/6/17 10:07:00 -- 方法一 Dim btn As WinForm.Button = Forms("車鲁H7A751").Controls("查询") btn = Forms("車鲁H7A855").Controls("查询") 方法二 Dim btn As WinForm.Button = Forms("車鲁H7A751").Controls("查询") Dim btn2 As WinForm.Button = Forms("車鲁H7A855").Controls("查询") |
| -- 作者：等待 -- 发布时间：2017/6/17 10:23:00 -- 上面的2种方法都试过了，效果都一样，都是执行第一个表中的“查询”，第二个不执行 |
| -- 作者：有点蓝 -- 发布时间：2017/6/17 10:26:00 -- 第二个写了什么代码？ |
| -- 作者：等待 -- 发布时间：2017/6/17 10:31:00 -- 就是上面的代码，車鲁H7A751这个可以，車鲁H7A855这个不行 |