这一句话什么意思?

nanyankaoran 2007-12-15 02:49:05
Private Sub Command1_Click()
Common.DefaultExt = "*.mdb"
Common.Filter = "*.mdb"
Common.ShowOpen
Text1.Text = Common.FileName
cn.Open "Provider =Microsoft.Jet.OLEDB.4.0;Data Source=" & Common.FileName & ";Persist Security Info= False"
Set rs = cn.OpenSchema(adSchemaTables)
Do Until rs.EOF
If Left(rs!TABLE_NAME, 4) <> "MSys" Then

List1.AddItem rs!TABLE_NAME
End If
rs.MoveNext
Loop
rs.Close
End Sub
If Left(rs!TABLE_NAME, 4) <> "MSys" Then
尤其是MSYS J是什么?
...全文
77 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
zuoxingyu 2007-12-17
  • 打赏
  • 举报
回复
MSys

数据库里的表名称,前4个字符是MSys的,就不列出来了,其他都列出来,估计MSys是系统表吧
东方之珠 2007-12-17
  • 打赏
  • 举报
回复
应该是一个表
guyehanxinlei 2007-12-17
  • 打赏
  • 举报
回复
是一张表名
  • 打赏
  • 举报
回复
应该是循环判断access中 的表 假如是用户表就把 表名 罗列到 list1 列表控件中
wing013 2007-12-15
  • 打赏
  • 举报
回复
一個表,名叫MSys

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧