Microsoft Access Sample Code
Function for using InStr
In Microsoft Access, the Instr function returns the position of the first occurrence of a string in another string. For example, if you had a string value in your database of "this is a sentence" and you wanted to find the first occurrence of a space, you could use the InStr function as follows:
Dim sValue As String
sValue = InStr(1,"this is a sentence"," ")
sValue would contain a numeric value of 5 as that's the location in the string where the first space occurs.
Below, we have a function that makes use of the InStr function. It allows you to pass in a string as the first parameter. Then, a second parameter contains the phrase or character of which you want to find the first occurrence. The function then returns all the characters to the first occurrence of the search term. The second function is very similar, but instead of returning everything to the left, it returns everything to the right or after the search occurrence is found. The third function is similar to the first two, but returns the position in which the search term is found. You can also specify the occurrence number for which you wish to search. For example, if you have the string "ab ab ab ab djfkd ab dfjkd" and you wanted to find the location where the fourth "ab" is at, this function would work by calling: sFindByOccurrence("ab ab ab ab djfkd ab dfjkd","ab",4) and the function would return 10 telling you that the fourth occurrence of "ab" starts at position 10.
The Microsoft Access InStr Database is a sample database that shows you how to implement the InStr inside your own Access Database.
Please note that this is a template database. If it does not meet your needs 100%, and you are unable to customize it yourself, let WSI know and we will provide a quote to develop the customizations you need to get you exactly what you want in your Access InStr Database System.
Main Form - Form Criteria
Main Menu Form
Main Menu - Modern Look (Access 2010/2013)
Are you having problems getting the code to work for you? If so, then try out the demo to see how it can work for you.
a demo version for free to test!. The demo version is in Access 2007, which will work on either Access 2007, 2010, 2013 or 2016. If you need a previous version of Access to try, please Contact Us
. Please note that the demo version of the software is fully functional but does not allow you to see the code implementation. The full version allows you to design the code implementation and adjust it for your needs.
Access 2007 Download
Access 2010/2013/2016 Download
Access 2010 64 Bit Download
Access 2013/2016 64 Bit Download
The full version of the database is a standard Access Database file. You will have full access to the database window, all design objects, the visual basic project code, and you will be able to modify or add to the design in any way you wish (this does not apply to the run-time/compiled versions). If you lack the time to integrate this database into your system, please Contact Us and we will be glad to help with your integration process. If you like the basics of what you see in the database, but need enhancements to make the system functional for your business, please Contact Us and we will develop a quote for you to implement the additional features and enhancements that you require.
$9.99 - this allows you to use this database template however you wish within your organization.
$19.99 for unlimited developer use - this allows you to use this database template however you wish for any applications you develop and distribute.
Once your purchase is complete - you will receive an email within 12 Hours (shorter during standard business hours) with a link to download the full version of the database. Please be sure and check your junk mail folder as this often ends up there.
If you need any help implementing this function or modifications made for your needs, to get a free quote
for your Microsoft Access Development needs. WSI will determine your needs based on written requirements that you provide. Please ask your WSI representative to send you an example of what constitutes sufficient written requirements. If you need assistance preparing the necessary requirements, WSI offers a fee based service to assist you. Please ask your WSI representative for details or you can review our process mapping service
"Once again, you guys have outdone yourself. The service and support you have provided has been the best I've ever experienced from a software development team. You guys have the best Access calendar GUI I've ever seen."
"Thanks to all!! Nice job on the changes. They look good, thanks for your quick response !!"
Tulip Systems, Inc.
"Thanks for all your help. Your service is great as I find you and your team easy to deal with and very responsive in terms of getting the changes done.
Steve Da Silva
Manager – Customer Support
The Hospital for Sick Children
Toronto Ontario Canada
On October 5, 2015 I was working on an Access database program, and needed assistance to get it in use quickly. I found Winning Solutions via google/chat now, they contacted me with their programmer Andres Dominicci the next day. With the expertise of Andres the database was put in the store for use just 4 days later. The efficiency of his programming and the added benefit of video to refer back to in case of small adjustments brought what seemed like a daunting task into reality very quickly. You can get quick, efficient, trustworthy help directly into your office regardless of your location. This is utterly amazing. I would not hesitate to recommend this company for specialized projects in your office.
Much thanks to Winning Solutions… Andres you are a winner!
Glendon Bald Eagle Holdings Ltd.
British Columbia, Canada