单项选择题

单击命令按钮时，下列程序的执行结果为
Private Sub Command1_click()
Dim X As Integer，Y As Integer
　　x=12:y=32
　　Call PCS(x,y)
　　Print x；y
End Sub
Public Sub PCS(ByVal n As Integer，ByVal m As Integer)
　　n=n Mod 10
　　m=m Mod 10
End Sub

A．12 32
B．2 32
C．2 3
D．12 3

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个名为Command1的命令按钮，其Command1_Click事件过程如下： Sub Command1_Click() Dim student As studtype Dim record_no As Integer record_no=1 With student .ino=12 .strname= smith .strsex= 男 .smark=89 End With ______ Put # 1，record_no，student Close # 1 End Sub 要求在c: 的随机文件student.dat写入一条记录。应在程序中空行处填入以下哪条语句使该功能完整

A．Open"c:\student.dat"For Input As # 1 len=len(student)
B．Open"c:\student.dat"For random As # 1 len=len(student)
C．Open"c:\student.dat"For Output As # 1 len=len(student)
D．Open"c:\student.dat"For Append As # 1 len=len(student)

单项选择题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim in As Integer，n As Integer，p As Integer m=3:n=5:p=0 Call Y(m,n,p) Print Str(p) End Sub Sub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是

A．4
B．6
C．8
D．10

相关试题