在窗体上有一个命令按钮Command1,编写事件代码如下: Prirate Sub Command1_Click() Dim d1 AS Date Dim d2 As Date d1=#12/25/2009# d2=#1/5/2010# MsgBox DateDiff("ww",d1,d2) End Sub 打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。A.1B.2C.10D.11
在窗体上有一个命令按钮Command1,编写事件代码如下: Prirate Sub Command1_Click() Dim d1 AS Date Dim d2 As Date d1=#12/25/2009# d2=#1/5/2010# MsgBox DateDiff("ww",d1,d2) End Sub 打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。
A.1
B.2
C.10
D.11
相关考题:
34 )在窗体上有一个命令按钮 Commandl ,编写事件代码如下:Private Sub Commandl_Click()Dim d1 As DateDim d2 As Datedl = #12/25/2009#d2 = #1/5/2010#MsgBox DateDiff( ” ww ” , d1, d2)End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是A ) 1B ) 2C ) 10D ) 11
窗体上有一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = InputBox("x=")y = InputBox("y=")Print x + yEnd Sub运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。A、 444B、 123321C、 123+321D、 出错信息
在窗体上有一个命令按钮Command1,编写事件代码如下:Private Sub Command1_Click()Dim a(10),P(3) As Integerk=5For i=1 To 10For i=1 To 3For i=1 To 3End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。
在窗体上有一个命令按钮Commandl,编写事件代码如下:Private SuB commandl_Click()Dim d1 As DateDim d2 As Dated1=#12/25/2009#d2=#1/5/2010#MsgBox DateDiFF(“WW”,d1,d2)End SuB打开窗体运行后,单击命令按钮,消息框中输出的结果是A.1B.2C.10D.11
在窗体上有一个命令按钮Command1,编写事件代码如下: Private Sub Command 1_Click() Dim x As Integer,y As Integer x=12:y=32 Call Proe(X,Y) Debug.Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=in Mod 10 End Sub 打开窗体运行后,单击命令按钮,立即窗口上输出的结果是( )。A.2 32B.12 3C.2 2D.12 32
在窗体上有一个标签Lb1和一个命令按钮Command1,事件代码如下: Option Compare Database Dim a As String * 10 Private Sub Command1_Click( ) a="1234" b=Len(a) Me. Lb1. Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是( )。A.4B.5C.10D.40
在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl Click( ) Dim dl As Date Dim d2 As Date d1=#12/25/2009#d2=#1/5/2010# MsgBox DateDiff(”ww”,d1,d2) End Sub 打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。A.1B.2C.10D.11