要做学生成绩系统,求救

我给你做了一个例子， 你可以照葫芦画瓢。

其余函数都是一样的。 举一反三就行了。

Option Compare Database

Function TJSY(tj As Long)    ''' 函数=TJSY ： 台阶试验， 返回值=单项得分。

    TJSY = DLookup("单项得分", "高中一年级女生评分标准", "台阶试验=" & tj)
    '''  使用实例：   ? TJSY(62) , 返回值=92
End Function

------

看了你的表结构， 建议：

将学生成绩表中的“姓名” 删掉， 属于“冗余字段”， 不应该要。

重新给你建立关系。 见图：“学生”

另， 表中字段名称最好不要使用括弧等符号。 等等还有其他不规范的地方。