终结版...

下面的题有一部分问过了但是出现了问题，所以再拿来问问..考试之前最后一次提问了= = 大家走过路过千万不要错过~~

1，inputbox() 函数返回值的类型是

A、数值   B、字符串   C、变体   D、数值或字符串

2，

常数e=1+1/1!+1/2!+1/3!+……+1/n!，式中某一项的值小于10^(-3)为止。要求用函数过程F1运算e值，并用另一个Function过程F2获得1/n!倒数的值

 sub F1
 dim i as integer,e as single,x as single
 i=1
 e=1       
 do while Ture

x=1/(i/x)     
    if x<=0.001 then exit do   else     
       e=e+x
       i=i+1     end if

 loop
 msgbox e & " " & i
 end sub
 

function F2(x as integer) as long
dim j as integer,mult as long
mult=1
for j =1 to     x      
     mult =mult *j
next j
F2=1/mult         
end function

这道题为什么不能运行FUCTION F2...是不是牵扯到调用？我觉得是牵扯到调用，那么这样答案就要彻底改改了是不是= =下划线部分是要求填空的，sub部分能运行出来e的值，但是FUCTION F2不行> <,无法运行

3，文本框中显示一次当前时间，程序为：

private sub timer1_ _______________()    '注意，这里有个下划线

   text1.text=time

end sub

煮江老师给的答案：

文本框中显示一次当前时间，程序为：

private sub timer1(time as date=now())

   text1.text=time

end sub

我表示运行不出来= =

4，在一间窗体中有一命令按钮（名为command1），该按钮的单击事件对应的VBA代码为：

private sub command1_click()

form.recordsource="select * from 雇员"

end sub

问：单击该按钮实现的功能是？

5，val(x) 是指将字符转化为字符串，能不能几个例子？

6，上年的考试题，发现答案错误百出，不敢掉以轻心，把没有把握的打上来。。

   a.只能作为窗体记录源的是   A、表      B、查询     C、select语句      D、表，查询或select语句

   b.下列对数据输入无法起到约束作用的是

     A、输入掩码     B、有效性规则      C、字段名称     D、数据类型

   c.Access中，设置为主键的字段：

    A、不能设置索引      B、可设置为“有（有重复）”索引

    C、系统自动设置索引      D、可设置为“无”索引

   d.若要求在文本框中输入文本时达到密码“*”的显示效果，则应设置的属性是：

     A、默认值     B、有效性文本    C、输入掩码      D、密码

7，书上有这样一句话：debug.print表示换行，意思是不是说：debug.print=chr(13)？