- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 列集合 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79548)
-- 发布时间：2016/1/4 18:19:00
-- 列集合
Dim cls() As String = {"学段","学科"} ‘列集合
Dim t As Table = Tables("课程设置")
For i As Integer = 0 To cls.Length - 1
If t.Rows(cls(i)) Is Nothing Then
MessageBox.Show("【" & cls(i) & "】内容不能为空!")
t.Rows(cls(i)).Select()
Exit For
Return
End If
Next
请大师指点，问题出在哪?
[此贴子已经被作者于2016/1/4 18:45:37编辑过]
-- 发布时间：2016/1/4 20:02:00
--
Dim cls() As String = {"学段","学科"} \'列集合
Dim t As Table = Tables("课程设置")
For i As Integer = 0 To cls.Length - 1
If t.current.isnull(cls(i)) Then
MessageBox.Show("【" & cls(i) & "】内容不能为空!")
t.Select(t.Current.Index, t.cols(cls(i)).Index)
Exit For
Return ""
End If
Next
-- 发布时间：2016/1/5 8:12:00
--
谢谢
-- 发布时间：2016/1/5 8:16:00
--
此主题相关图片如下：qq截图20160105081511.png
出现错误i
-- 发布时间：2016/1/5 8:58:00
--
既然提示不能返回值，把return后面的双引号去掉
-- 发布时间：2016/1/5 9:08:00
--
谢谢