home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Tool Box
/
SIMS_2.iso
/
vb_code1
/
accevl
/
main.frm
(
.txt
)
< prev
Wrap
Visual Basic Form
|
1994-07-01
|
3KB
|
55 lines
frmMain
+Using Access Engine as Expression Evaluator
Form159
txtResult
cmdExit
E&xit
CMDialog1
CommonDialog
Open Access Evaluator Database
$Eval MDB (accevl*.mdb) | accevl*.mdb
cmdOpen
&Open Access Database
cmdEvaluate
E&valuate
txtExpression
log(cos(90)+sin(90))
Data1%
Data1
Label1
6Enter Expression below, then click on Evaluate button.
Line1
Image2
wwwwwwp
Image1
Label1
?Click on "Open Access Database" button and select ACCEVL11.MDB.
Command1_Click
sCmdZ
Text1
Data1
RecordSource
Picture1
Recordset=
ErrorHandlerCommand1_Click
Form_Load
cmdEvaluate_Click
txtExpression
picResult
cmdOpen_Click
CMDialog1
Action
ErrorHandlercmdOpen_Click
DatabaseName
Filename
cmdEvaluate
Enabled
cmdExit_Click
txtResult
cmdEvaluate_Click
select
as MyEval From DummyForEval
Unable to evaluate expression
cmdExit_Click
cmdOpen_Click