Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: cb9002
  • Content: Threads
  • Order by date
  1. cb9002

    Changing text box backgrond colour with function

    Good morning! I am using Access 2003. I have written a function called ChangeColour that returns either vbRed, vbYellow or vbGreen. My code is: Dim x as String If Not (IsNull(comboProbability.value) Or IsNull(comboImpact.Value)) Then x =...
  2. cb9002

    Acessing NTFS Partition on Ghosted Drive

    Hi I'm running XP on my laptop. To gain HDD space I bought a new HDD, fitted it and installed XP. The old HDD was fitted into an external USB caddy. Windows won't let me access the old drive - it lets me into the root and windows directories, but not my old personal folders (under the...
  3. cb9002

    Argument Not Optional Error

    Hi I'm using Access 2000 and DAO. I have a form with fields that include "Date" and six categories listed as the array "DefectType". Each category has an associated text box with the word "Box" suffixed to the category name. On submission, I wish to check the contents of the text box for...
  4. cb9002

    VBA Trim Statement Syntax

    Hi The code below is part on the onclick sub of a form If Trim(Initals) = "" Then MsgBox "Please enter your initals in the box", vbOKOnly Else: CorrectField = CorrectField + 1 End If The idea is, if the text box Initals is blank, bring up the dialog box, otherwise add one to...
  5. cb9002

    Loop not working

    Hi I am a beginner to VBA! I am trying to write a module that checks the content of six unbound text boxes, defined in an array. If the boxes do not contain any content, I wish to prompt the user to enter content. My code is: Private Sub Submit_Click() Dim DefectType(0 To 5) As String...

Part and Inventory Search

Back
Top