Foxtable(狐表)用户栏目专家坐堂 → 請教錯誤碼


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

主题:請教錯誤碼

美女呀,离线,留言给我吧!
catyin1989
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
請教錯誤碼  发帖心情 Post By:2012/10/3 0:17:00 [只看该作者]

想問這個錯誤代表甚麼?? 我在不同的窗口中打了幾乎相同的代碼, 只是control及table名稱改變了, 但是其中一個窗口卻出現了這個錯誤碼.. >.<

For Each r As Row In Tables("批改作業 - Writing 2 (Document)_Table1").Rows
    If r("作業編號") >= 0 Then
        r.Checked = True
    End If
Next
For Each r As Row In Tables("批改作業 - Writing 2 (Document)_Table1").GetCheckedRows
    r.Delete
Next
Tables("作業批改").Current.Delete()
Tables("學生作業").Current("首次批改") = False
e.Form.Close()
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/10/3 11:28:00 [只看该作者]

 注意设置窗口的名字。

 回到顶部
美女呀,离线,留言给我吧!
catyin1989
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
  发帖心情 Post By:2012/10/3 17:42:00 [只看该作者]

應該是支援空格的, 因為我在另一個form的button也能讀以下的指令:
e.Form.Close()
Dim frm As winform.Form
frm = Forms("批改作業 -Writing2 (Document)")
frm.Open()

不過我把form的名稱換成沒空格的了, 也是不行...
有人能幫我看出其他問題嗎? >.<

 回到顶部
美女呀,离线,留言给我吧!
catyin1989
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
  发帖心情 Post By:2012/10/3 17:56:00 [只看该作者]

事件1:
For Each r As Row In Tables("批改作業 - Writing_Table3").Rows
    If r("作業編號") >= 0 Then
        r.Checked = True
    End If
Next
For Each r As Row In Tables("批改作業 - Writing_Table3").GetCheckedRows
    r.Delete
Next
Tables("作業批改").Current.Delete()
Tables("學生作業").Current("首次批改") = False
e.Form.Close()


事件2:
For Each r As Row In Tables("批改作業 - Assessment Document_Table3").Rows
    If r("作業編號") >= 0 Then
        r.Checked = True
    End If
Next
For Each r As Row In Tables("批改作業 - Assessment Document_Table3").GetCheckedRows
    r.Delete
Next
Tables("作業批改").Current.Delete()
Tables("學生作業").Current("首次批改") = False
e.Form.Close()

為甚麼事件1沒有問題, 事件2就出錯了?

 回到顶部