Help With KeyDown Function
Dec 1, 2005
I've posted this on a couple other forums with no nibbles. Anyone here wanna lend a hand?
I have a number of cmdButtons on a Parent Form that changes the SourceObject
of a subform. I would like to give the user the option of using the Right
Arrow key to SetFocus on the subform. I know I can do this on each cmdButton
using the KeyDown event but what I rather do is create a function to
accomplish this so I don't have to code each and every button. My problem is
I'm new to creating functions, subs and etc. Could I get someone to lend a
hand in accomplishing this, please?
TIA,
Shane
View Replies
ADVERTISEMENT
Nov 14, 2005
I am using the VB KeyDown event on a text box. I am wanting to use keys F1 - F8.
The intended code runs for each key (using a case statement), but also the windows default task runs for that key i.e F1 will load help and run the code in the key press event.
Any ideas how to stop default keys for just the text box in question?
View 2 Replies
View Related
Jun 5, 2014
I am aware that access 2007 has keyDown event for reports but access 2003 does not. My client's system is written in 2003 and he is not willing to invest in 2007.
Is there a way to have the report print by selecting F6 after the customer views the reports contents to see if they are correct.
View 1 Replies
View Related
Dec 11, 2013
So basically I need making a function that will count the number of records from another table/query based on a field from the current query.
View 2 Replies
View Related
Jan 30, 2014
I have a project at hand and it's been a predecessor of mine and client has asked me to do some work on it and extend functionality - but I have not really delved into Access before and I have had to worked my way through to this final snag :/
The Main Form has one sub form. This sub form allows the user to add multiple order items i.e. qty, stock, description from records within the system - fairly straight forward.At the last column of each row is the sub total of those particular items i.e.
Qty Unit | Item ID | Total
-----------------------
2 | 1234 | 80.00
------------------------
1 | 43526 | 20.00
------------------------
> | |
So the total is a function of =[Qty Unit] * [Unit Price].Then in the Footer of this SubForm is the Sub Total
=SUM([Qty Unit] * [Unit Price])
All fine and well..... However, the additional functionality kicks in.
Lets add the additional customer_id from the Main Form. Each Item bought is dependent on the customer_id i.e. they get special prices depending on who they are.So a New table is made which has the Item ID and SpecialPriceID (of a table to define as a specialPrice) and the Price linked to this Item and Special Price category. So say that there are two groups of users "wholesale" and "nonwholesale" these would be SP_1 and SP_2 and each client is defined either one of these, and each stock item has a Price for each SP_1 and SP_2. Hopefully I've explained myself there.
Back to the SubForm. So now the Total needs to calculated differently with needed the external customer_id from the Main Form.
Code:
Function CalculateSpecialPrice(ItemID As String, CustomerID As String, Unit As Integer)
Dim SPSelect As String
SPSelect = "SELECT Price FROM [Items_SpecialPrices] WHERE"
SPSelect = SPSelect & " ItemID = '" & ItemID
SPSelect = SPSelect & "' AND SpecialPriceID = (SELECT SpecialPriceID FROM Customers WHERE customer_id = " & CustomerID & ") "
[code]....
its the sub total I just keep on getting #Error on. I have even watched (using alerts) that the correct return variable is the same as the individual rows. This is the equation I used for the SubTotal within the footer.
=SUM(CalculateSpecialPrice([Item ID], [Form]![FormName]![CustomerID], [Qty Unit]))
#Error
View 2 Replies
View Related
Jun 9, 2005
We have a date function that converts a text date format. Can someone help me with time function to do the same thing? We want military time. The field is like this now: txt fields.
160037
213137
224356
235716
235800
12341
21708
22732
Here is the date function we use:
Function f2Date(strDateOld As String)
Dim strDate As String, strMonth As String, strYear As String
strMonth = Mid(strDateOld, 5, 2)
strDate = Right(strDateOld, 2)
strYear = Left(strDateOld, 4)
f2Date = strMonth & "-" & strDate & "-" & strYear
f2Date = CDate(f2Date)
f2Date = Format(f2Date, "mmmm d yyyy")
End Function
View 9 Replies
View Related
May 25, 2006
Hi all,
I need a little help. In my DB, I have a command button set up (I was tired of typing in dates) for date, but I used the Now function, which also gives me the time.
Now I have over 3000 subrecords of the main ones. I now need to queries transaction for that specific date, but it also retrieves the time.
I tried to go back and change the NOW to DATE in VB, but the code does not run.
How do I change all records that have date and time (using NOW function) and only click that command button to show only the date (mm/dd/yyyy)?
Thanks in advance.
View 1 Replies
View Related
Aug 1, 2005
Is there any function that can convert either a True, False, "Yes", "No" or Null value.... to a yes/no (check box) data type?
What I want to do is create a make table query. I would like to add a checkbox field from the query. So if there was a function that could convert a data type to a Yes/No checkbox, this would be very helpful...
To give you and idea of what I'm talking about...and how I want to use this... If I am making a table from a query and I want to add a number field, but leave it empty for the time being, what I can do is make a new field in the query maybe call it "Number1". What I would do is Add this as a field in my make table query:
Number1: Cint("")
This will add a blank field that is formatted as a number field when I run the make table query.
So using the same logic, I'd like to make a blank (or unchecked) Yes/No check box field when I run my make table query.
Anyway...that's what I'm hoping for.... I hope someone can help!
Gary
View 10 Replies
View Related
Nov 3, 2005
I'm having a problem getting a form to open. I'm using access 97 on on XP machine and whan I open my database I get Function isn't available in expressions in query expression '[Case Types]![theName]&"-"&Format([SourceDocs]![CaseNumber]&"","00")&"-"&Format([SourceDocs]![CaseYear]&"","00")'.
This database works fine on a Windows 2000 machine running Access 97 but none of the XP machines will open it.
Any suggestions?
Thanks,
Rick
View 8 Replies
View Related
Nov 10, 2006
I have a database in which I am designing a report which includes a name/address block. I am surprised to find that the report does not recognise the Chr() function in the text box control source string "=[Organisation] & Chr(13) & Chr(10) & [Address]..."; designed to insert a CRLF between the contents of the named fields.
I know the syntax is correct because I've checked by using the expression builder to replicate the code. (Expression builder includes the Chr() function, as expected.)
The interesting thing is that the function is recognised in other databases used on the same machine, both those created remotely and locally.
Anyone know what could be going wrong?
Stuart
View 7 Replies
View Related
Sep 4, 2005
I am using a crosstab query to gather info from a table. I am using the Format [DateAppt], "mmm". The query ran successfully before but I now get the error "Function is not abailable in expression in query expression 'Format ([DateAppt], "mmm")'. This is used for column headings in a report that gives results by month.
I am using Microsft Office 2000 Premium with XP Professional operating system.
I used the original disk to repair Office thinking that the function was missing from the function library but to no avail.
Does anyone know how to restore this function?
Thank you,
Jack
View 1 Replies
View Related
Sep 29, 2005
Just wonder if anyone could give me some help on an IIF function used in my query:
I have a table which has numerous “W” codes, the charging for an order does not occur if it has a W12 or a W14 code and has no “[Authorising Name]” BUT does however charge if the weight of the order is over 100kg
IIf([WCode]="W12" Or [WCode]="W14",IIf([Authorising Name]="",0,[charge], IFF ([weight]>99,[charge],0)))
I can get this working for a single W code but not for the 2 OR I can get it working for both Codes but then the weight side doesn’t.
I have tried all combinations of <> = < etc etc but still no luck., I think I need another OR but no matter where I put it I hit problems either with the function or the result.
Another small issue, my [authorising Name] field can appear to be empty, but in the field are spaces what is the best way for ensuring I capture both empty and theses space records ?
Thanks in advance
View 4 Replies
View Related
Oct 12, 2005
Got on more question (I hope) about functions.
I have a table that contains a year (school year) and an End Status Code, I need to flag students that have the end status code of 45 in school year 2005.
When I use the below code the column popluates with "#ERROR".
IIf([ST010]![SCH_YR]="2005" And [ST010]![END_STAT]="45","Y","N")
Any Ideas?
Again thanks for the help..
--pete
View 1 Replies
View Related
Oct 21, 2005
I have a question:
SELECT DateSerial(2000+mid([enter],3,2),Mid([enter],1,2),1) AS datevalue;
it works in 2000 windows,
but it doesn't works in XP windows.
Why?
The error message the function mid has a problem.
How can I fix the problem in XP widows.
Thanks.
View 4 Replies
View Related
Dec 11, 2005
hi there
am new to access and i want to know how to use the function now in a query
like i want to know all the birthdays in the date base by using the function now.. firstly i did date part for the day and the month,, then in the criteria box of the day i inserted the function now () but dont know what to put.. any1 can tell me what to do pleaseeeeeeeeee ???????/:) :) :)
View 2 Replies
View Related
Dec 11, 2005
hi there
am new to access and i want to know how to use the function now in a query
like i want to know all the birthdays in the date base by using the function now.. firstly i did date part for the day and the month,, then in the criteria box of the day i inserted the function now () but dont know what to put.. any1 can tell me what to do pleaseeeeeeeeee ???????/:) :) :)
View 9 Replies
View Related
Dec 21, 2005
Hi
i need help using the "IF" function i think.
Basically i have 2 "columns"
A B
aaa
aaa
aaa aaa
Basically if i have say Column A that has some fields filled in and Column B with other fields filled in. I want to Populate a column C with either the stuff in A or B.
So If Column A is blank and Column B is blank, then i want Column C to stay blank.
If Column A is populated and Column B is blank, then i want Column C to be populated with what column A has.
If Column A is blank and B is populated, then i want Column C to be populated with what Column B has.
Thanks in Advance
D
View 14 Replies
View Related
Jan 29, 2006
Can some please tell me if there is an equivalent of the excel LN() function in access.
I have tried to find it all over the web and beyond and cannot
:(
I dont mind if there is a long winded work around for this function.
I am using it in a query and it shows unrecognised function
but for some reason shows in the access help as below :confused:
LN
Returns the natural logarithm of a number.
Syntax
LN(number)
Number is the positive real number whose natural logarithm you want.
Thanks for your help
Cress
View 1 Replies
View Related
May 4, 2006
I have parts table in Access where a part id is automatically assigned to each part number. I am trying to get the last part number entered in the parts table by querying on the max part id. The max part id will always be the last part number entered in the table. I don’t want to display the part id though; I only want to display the part number associated with that max part id. This is what I have been playing with.
"select part_no, (max)part_id as part from tblPartsSignOut "
Can someone give me some insight on how to structure this query the correct way?
Thanks
View 1 Replies
View Related
Mar 12, 2007
I know that the Max functions get the highest value but is there a way to get the second or thrid highest value??
View 4 Replies
View Related
Apr 18, 2007
Within a formula in querry beside other values, I need to have a logaritham of some records, but the Log function is giving me other (higher) results then for exp. in Excell or with calculator !?I hope someone can spent little time to explain it what I am doing wrong!Thanks in advance!!
View 2 Replies
View Related
Apr 19, 2007
Probably simple....
I am using the avg function in a query to calculate the average risk score of all employees. But when i do it my quesry looks like this
Joe shmoe 2.345
Joe shmoe average 2.345
jane doe 2.567
jane doe avg 2.567
how do i make it say only one of those lines. I dont care which i just want it tohave one line per employee.
Thanks
View 1 Replies
View Related
Jun 28, 2007
I'm trying to link a table to a query called M Gate Status. Each product has a certain status that matches it and I'd like my query to show the most recent status for each product. I've created an M Gate Status # column on the MGS table and want to select the maximum number, but I can't figure out the max function to put in my query. I'd like to do this without using VBA.
Thanks in advance!
View 14 Replies
View Related
Jul 3, 2007
Hello everyone,
I need help modifying my query:
SELECT DISTINCT EqInitial, EqNr, LastEventDt, DateDiff("d", StartDt, Date() ) AS TotalDays
FROM EQUIPMENT;
The table Equipment is populated with data that comes from a third party so I cannot change it. Sometimes the StartDt field of this table has no data and when executing the query above the DateDiff function will obviously not return anything for the TotalDays field of that particular record.
I need to populate the TotalDays field with 1 everytime the StartDt fields has no data.
I though about using the IIF function, but I’m not sure if this is the best approach and I don’t know the syntax to “make” the TotalDays field show 1. :confused:
Your help is greatly appreciated .
View 3 Replies
View Related
Jul 31, 2007
Does an IIF function go in the criteria row?
I want to say if place1 has a 'U' in it put it into column 'Stuent1U' but if it has a 'C' in it, I want it to go into Column 'Student1C'.
Thanks to anyone who may help me.
View 14 Replies
View Related
Aug 11, 2007
I am having a bit of trouble with some SQL now that looks like the following....SELECT [fields]
FROM [table]
WHERE ([field]=[control1])
AND (IIf([control2] Is Null,"[set value]","[>=control2 value]"));Can someone tell me where I have gone wrong??
The idea is to get a range of values with the "IIF" function (>=control value) if a value is manually entered into the control and a set value from the query if the control is left blank.
View 11 Replies
View Related
