Access

Front 1

Write dim and set statement for a recordset

Back 1

dim db as dao.database
dim rs as dao.recordset
set db = currentdb()
set rs = db.openrecordset("tablename")
set rs = db.openrecordset(_
"select tablename.* from table anem where x = y",dbopendynaset)

Hint 1

db database
rs recordset
dynaset
select

Front 2

Use with statement to add a screen field firstname to a table

Back 2

with rs
.addnew
!firstname = txtfirsname.text
.update
end with

Hint 2

no hint

Front 3

Create Class statement for creating a record 2 lines only

Back 3

public sub createrecord
end sub

Hint 3

public or private

Front 4

Create a switch using the iif function

Back 4

sw = iif(value1 = x,true,false)

Hint 4

sw =

Front 5

create an instance of the validate input object

Back 5

private validate as new clsvalidateinput

Hint 5

no hint

Front 6

Use qbe grid to illustrate between

Back 6

between "a" and "n"

Hint 6

Criteria

Front 7

use qbe grid to illustrate like

Back 7

like "3/*/94"

Hint 7

Criteria

Front 8

use qbe grid to illustrate less than or equal to twenty five

Back 8

<=25

Hint 8

no hint

Front 9

use qbe grid to show query indicating non blank state/province

Back 9

field state/province
table customers
sort ascending
cirteria is not null

Hint 9

field
table
sort
criteria

Front 10

what is the secret of the autolooup query

Back 10

many to one

Hint 10

no hint

Front 11

How do you prompt for input firts name field using the qbe grid

Back 11

field first name
criteria [what first name?]

Hint 11

field
cirteria

Front 12

use qbe to show the total city and states for each customer if you are given the city, state and customer id's sort should be in ascending order

Back 12

field city state count :customer id

table customers customers customers

total group by group by count

sort ascending

Hint 12

field
table
total
sort

Front 13

using qbe given category id, current price show average price for each category

show smallest first

Back 13

field category id avgprice:currentprice

table products products

total group by avg

sort descending

Hint 13

field
table
total
sort

Front 14

convert this select query to an update query increasing the price by 15%

field current price product name

table products products

sort ascending ascending

criteria < 30

Back 14

field current price product name

table products products

update to 1.15*[current price]

criteria < 30

Hint 14

field
table
update to
criteria

Front 15

Write the statements to bring in a text file 811 bytes long

Back 15

Private Sub cmdConvert_Click()
Dim InString As String
Dim NewFile As String
Dim ConvertedRecord As String
Dim ExistingFile As String
GoSub OpenExistingFile
GoSub OpenNewFile
While Not EOF(1)
InString = Input(811, #1)
Write #2, Converted(InString)
Wend
Close #1
Close #2
Kill ExistingFile
Name NewFile As ExistingFile
Exit Sub

OpenExistingFile:
On Error GoTo FileopenErrorRoutine
ExistingFile = "c:\test.txt"
Open ExistingFile For Input As #1
Return

OpenNewFile:
On Error GoTo FileCreationErrorRoutine
NewFile = "C:\temp.txt"
Open NewFile For Output As #2
Return

FileopenErrorRoutine:
MsgBox "Error opening file: " & Err.Description, vbOKOnly
Exit Sub

FileCreationErrorRoutine:
MsgBox "Error creating file: " & Err.Description, vbOKOnly
Exit Sub


End Sub

Front 16

p? means

Back 16

values that start with p folowed by any single character

Front 17

(619)*

Back 17

any text starting with (619)

Front 18

9# means

Back 18

9 plus any single digit

Front 19

! means

Back 19

any character except [!n-z]