单项选择题

下列表达式中，与 DateDiff("m",#1893-12-26#,Date()) 等价的表达式是

A．(Month(date())-Month(#1893-12-26#))
B．(MonthName(date())-MonthName(#1893-12-26#))
C．(year(date())-year(#1893-12-26#))*12-(month(date())-month(#1893-12-26#)
D．(year(date())-year(#1893-12-26#))*12+(month(date())-month(#1893-12-26#)

<上一题目录下一题>

热门试题

单项选择题

以下程序的功能是计算并输出两个整数的最大公约数。Private Sub a1()Dim x As Integer, y As Integer, t As Integerx = InputBox( 请输入x的值 )y = InputBox( 请输入y的值 )Do【】x = yy = tLoop While (t <> 0)Debug.Print 【】End Sub有如下语句：① t = x ② t = y③ t = x y④ t = x Mod y⑤ x⑥ y⑦ t⑧ x y程序中有两个【】，将程序补充完整的正确语句是

A．①⑦
B．②⑥
C．③⑧
D．④⑤

单项选择题

下列代码实现的功能是：在窗体中一个文本框 tNum，运行时若在其中输入课程编号，则会自动在课程表中找出对应的课名显示在另一个名为 tName 文本框中。Private Sub 【】( )Me!tName = DLookup ( 课名 , 课程表 , 课程编号=’ & Me!tNum& ’ )End Sub则程序中【】处应该填写的是

A．tNum_AfterUpdate
B．tNum_Click
C．tName_AfterUpdate
D．tName_Click