问题一:
如何取得当前的时间?
我想在一个TEXTBOX里显示现在的时间,能实现吗?
问题二:
我这有两个表:FROM1和FROM2
 WX.MDB数据库里有duizhao这个表,表里有两个字段:报障人和报帐分局
 FROM1里有个ADODC1连接了WX.MDB数据库
 FROM2里有两个COMBOL,一个是报障人,一个是报帐分局.我想在报障人的COMBOL里ADDITEM,增加的选择的内容是FORM1里连接的WX.MDB数据库里的报障人字段,字段有限制,是要求名称为报帐分局对应的哪个报帐人的数据.应该怎样编写这段SELECT

解决方案 »

  1.   

    问题一:
    Option ExplicitPrivate Sub Form_Load()
      Text1.Text = Now
    End Sub
      

  2.   

    1:text1=now
    2:
    dim r as new adodb.recordset
    dim SQL as string         SQL = "select DISTINCT 保障人 as tt from expcontract "
            r.Open SQL, cN
            Do While Not r.EOF
                Me.cmbLoadPort.AddItem Trim(r!tt & " ")
            r.MoveNext
            Loop
            r.Close
    sub combo1_change()
    dim r as new adodb.recordset
    dim SQL as string 
            SQL = "select * as tt from expcontract  where 保障人='" & combo1  & "'"
            r.Open SQL, cN
            Do While Not r.EOF
                Me.cmbLoadPort.AddItem Trim(r!tt & " ")
            r.MoveNext
            Loop
            r.Close
    end sub
      

  3.   

    如果楼上的能把程序给点点说明,我会给你双倍的分数,谢谢
    其实我要的很简单,我只需要WX库里表duizhao里的报障人字段,但这个报帐人,我要有个限制
    就是要保障人字段的内容要和duizhao表里的报帐分局字段关联的哪个保障人.
    表DUIZHAO结果如下       field(0) field(1)
    字段  保障分局  报帐人
    数据   白云区    张三
    数据   青天区    李四我只要那个COMBOL2里面列出张三或者李四,不过一定要在我的另一个COMBOL里面先选了白云区,然后COMBOL2里直接就变成张三了,而不用选李四
    如果程序有详细的解释,我会给双倍的分,谢谢