在线等待一个弱的问题

Question

今天下午我才学vb因为让我改东西，想问一下大家
MYSQL = "id_vsl= " & gid_vsl & ""
 Set myrs = objzh.Catalog.Queryvsl(MYSQL)
第一句也没说从哪个表选取数啊，为什么下面就执行了，而且，下面这一句没有详细的说如何执行？
大家给我讲讲吧谢谢
我还有别的问题，高分相送请大家帮忙了，谢谢

Answer 1

还有下面一句也是类似大家指点我一下后面的就不用看了，就是第三句
  t_num = 0
fname1 = "I" + Mid(Format(Now, "yy/mm/dd"), 1, 2)
sqlvsl = "e_vslnm='" & tvslname(0) & "' and e_vslvoy= '" & tvslvoy(0) & "' and e_type='DMT' "////////////////这一句啊，你们说表在哪呢，它是怎么得出来的，我用断点试了，上面真的有值。If IsNull(CheckExistsedi(sqlvsl)) Then
   'sqlseq = "select * from tbl_seq"
   n_seqsid = getseqsid()
   n_seqfid = getseqfid()
   n_seqiid = getseqiid()
   n_seqiid = n_seqiid + 1
   Call objzh.Catalog.updtblseq(n_seqsid, n_seqfid, n_seqiid)
   str_sid = fname1 + Right(Format(n_seqiid, "0000"), 4) + e_code1
   Call objzh.Catalog.Addtbledi(tvslname(0), tvslvoy(0), str_sid, str_sid, Format(Now, "yy/mm/dd hh:mm:ss"), "DMT")
Else
   str_sid = CheckExistsedi(sqlvsl)
   n_seqsid = getseqsid()
   n_seqfid = getseqfid()
   n_seqiid = getseqiid()