Click here to Skip to main content
15,916,945 members
Home / Discussions / Visual Basic
   

Visual Basic

 
QuestionOnClick Pin
Socheat.Net21-Oct-06 16:20
Socheat.Net21-Oct-06 16:20 
AnswerRe: OnClick Pin
Dave Kreskowiak21-Oct-06 17:11
mveDave Kreskowiak21-Oct-06 17:11 
QuestionHow to make Delay Function In VB Pin
ZulnurainAdil21-Oct-06 10:25
ZulnurainAdil21-Oct-06 10:25 
AnswerRe: How to make Delay Function In VB Pin
FredH21-Oct-06 12:20
FredH21-Oct-06 12:20 
GeneralRe: How to make Delay Function In VB Pin
Dave Kreskowiak21-Oct-06 17:14
mveDave Kreskowiak21-Oct-06 17:14 
AnswerRe: How to make Delay Function In VB Pin
Dave Kreskowiak21-Oct-06 17:13
mveDave Kreskowiak21-Oct-06 17:13 
QuestionA Console - Like in Half-life 2 and gaems like that Pin
TDSp21-Oct-06 9:40
TDSp21-Oct-06 9:40 
QuestionHow to compare date in visual basic 6.0 - its very urgent Pin
Software_Guy_12321-Oct-06 9:27
Software_Guy_12321-Oct-06 9:27 
Hello All,

I had wrote a small piece of code in Visual basic 6.0 and MS Access 2000.

In Access I have 1 table tbl_expire it includes from, to and amount columns.

from - 01/09/1993 to - 31/12/1998 - Amount - 300 - date format is dd/mm/yyyy
from - 01/01/1999 to - 14/01/2000 - Amount - 275
from - 15/01/2000 to - 28/02/2001 - Amount - 250
from - 01/03/2001 to - 28/02/2002 - Amount - 225

If user enters like - 01/05/2000 then I should get Amount 250, but I am getting 275.


SSql = "select tbl_expire.from as from_dt, to,amount from tbl_expire where '" & Format(TxtDate, "dd/mm/yyyy") & "' >= format(from, 'dd/mm/yyyy') "
SSql = SSql & " and '" & Format(TxtDate, "dd/mm/yyyy") & "' <= format(to, 'dd/mm/yyyy') order by from asc"
Set rs = db.OpenRecordset(SSql, dbOpenDynaset)
If Not rs.EOF Then
TxtFinAmt.Text = Format(rs!maturity_amt, "0.00")
End If
rs.Close

Regards,
S Kumar
AnswerRe: How to compare date in visual basic 6.0 - its very urgent Pin
Guffa21-Oct-06 12:55
Guffa21-Oct-06 12:55 
GeneralRe: How to compare date in visual basic 6.0 - its very urgent Pin
Software_Guy_12321-Oct-06 20:42
Software_Guy_12321-Oct-06 20:42 
QuestionWinapi :: SC_HANDLE Pin
darkoex21-Oct-06 8:39
darkoex21-Oct-06 8:39 
QuestionFULL JUSTIFICATION IN RICH TEXT BOX CONTROL IN VB.NET Pin
T ALEX JOHN20-Oct-06 23:08
T ALEX JOHN20-Oct-06 23:08 
QuestionLogin Pin
Wildhorsend20-Oct-06 22:08
Wildhorsend20-Oct-06 22:08 
Questionneeds help in crystal report Pin
deepakkp20-Oct-06 18:28
deepakkp20-Oct-06 18:28 
QuestionHow to save the change data in the datagird? Pin
Evalee20-Oct-06 15:25
Evalee20-Oct-06 15:25 
AnswerRe: How to save the change data in the datagird? Pin
Tamimi - Code21-Oct-06 20:09
Tamimi - Code21-Oct-06 20:09 
GeneralRe: How to save the change data in the datagird? Pin
Evalee23-Oct-06 23:14
Evalee23-Oct-06 23:14 
QuestionVB Collection Pin
Wrycu20-Oct-06 14:27
Wrycu20-Oct-06 14:27 
GeneralRe: VB Collection Pin
Wrycu20-Oct-06 15:30
Wrycu20-Oct-06 15:30 
AnswerRe: VB Collection Pin
Guffa20-Oct-06 15:44
Guffa20-Oct-06 15:44 
GeneralRe: VB Collection [modified] Pin
Wrycu20-Oct-06 15:51
Wrycu20-Oct-06 15:51 
GeneralRe: VB Collection Pin
Guffa20-Oct-06 16:12
Guffa20-Oct-06 16:12 
QuestionRealy I need it..... Pin
msleem20-Oct-06 13:12
msleem20-Oct-06 13:12 
AnswerRe: Change character in Agent control Pin
Guffa20-Oct-06 13:48
Guffa20-Oct-06 13:48 
GeneralRe: Change character in Agent control Pin
msleem21-Oct-06 2:10
msleem21-Oct-06 2:10 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.