佳礼资讯网

 找回密码
 注册

ADVERTISEMENT

查看: 1121|回复: 5

[急]怎样seach subform的东西?

[复制链接]
发表于 9-9-2007 06:00 PM | 显示全部楼层 |阅读模式
我create了一个button在main form,
但我要search的是在subform里的field
难道只能把search放在subform才能search到??
回复

使用道具 举报


ADVERTISEMENT

发表于 9-9-2007 10:38 PM | 显示全部楼层
舍咚咚form? webform?windows form?vb form?c# form? java form?linux form?survey form?加入黑手党注册form?

不过不管什么form,要search sub sub sub + n*sub form 都行啦
回复

使用道具 举报

 楼主| 发表于 10-9-2007 09:31 AM | 显示全部楼层
是access 的。。
请帮帮忙啊。。
我的form是关于借书的。。
当那个人要还书的时候,我想就是create一个command button然后key in ISBN就可以search出那本书。。
这一步可以用。。我是用query做的。。它会跑出另外一个table..
可是,当我key in return date的时候,如果超过due date,它的font却不会换颜色...明白我说什么吗?
回复

使用道具 举报

 楼主| 发表于 10-9-2007 09:35 AM | 显示全部楼层
还有一个问题是,
当一个人借了也还了那本书,
那怎样才能让另外一个人能借??
我的code是

Dim BID As String
Dim LID As String
Dim stLinkCriteria As String
Dim rsc As DAO.Recordset
Set rsc = Me.RecordsetClone
BID = Me.ISBN.Value
stLinkCriteria = "[ISBN]=" & "'" & BID & "'"
  
    If DCount("ISBN", "LoanDetails", stLinkCriteria) > 0 And DCount("Isnull(Return_date)", "LoanDetails", stLinkCriteria) = 0 Then
      
        Me.Undo
     
        MsgBox "Warning Book Number " _
        & BID & " has already been entered." _
        & vbCr & vbCr & "", vbInformation _
        , "Duplicate Information"
        End If
        
LID = Me.Loan_ID.Value
stLinkCriteria = "[Loan_ID]=" & "'" & LID & "'"
    If DCount("Loan_ID", "LoanDetails", stLinkCriteria) > 1 Then
         
        Me.Undo
     
        MsgBox "Exceed book limit can borrow!" _
        & "" _
        & vbCr & vbCr & "", vbInformation _
        , "Duplicate Information"
End If
        
Set rsc = Nothing


求求帮帮忙!!
回复

使用道具 举报

发表于 17-9-2007 04:55 PM | 显示全部楼层
原帖由 star4u 于 10-9-2007 09:31 AM 发表
是access 的。。
请帮帮忙啊。。
我的form是关于借书的。。
当那个人要还书的时候,我想就是create一个command button然后key in ISBN就可以search出那本书。。
这一步可以用。。我是用query做的。。它会跑 ...


不明白你在说什么。。。
你得先说说你需要做什么,和你现在怎么做。。。大家才知道怎么帮你呀。
回复

使用道具 举报

发表于 17-9-2007 04:58 PM | 显示全部楼层
原帖由 star4u 于 10-9-2007 09:35 AM 发表
还有一个问题是,
当一个人借了也还了那本书,
那怎样才能让另外一个人能借??
我的code是

Dim BID As String
Dim LID As String
Dim stLinkCriteria As String
Dim rsc As DAO.Recordset
Set rsc = ...


这个是流程的问题吧。

你的问题老实说乱七八糟:

一个人借了也还了那本书,
那怎样才能让另外一个人能借??

同一个人?
你应该先说说你软件的设计流程,再说说实际流程。。。这样大伙才知道那里出错嘛。
回复

使用道具 举报

Follow Us
您需要登录后才可以回帖 登录 | 注册

本版积分规则

 

ADVERTISEMENT



ADVERTISEMENT



ADVERTISEMENT

ADVERTISEMENT


版权所有 © 1996-2023 Cari Internet Sdn Bhd (483575-W)|IPSERVERONE 提供云主机|广告刊登|关于我们|私隐权|免控|投诉|联络|脸书|佳礼资讯网

GMT+8, 25-9-2025 09:47 PM , Processed in 0.146228 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表