运行下列程序,窗体中的显示结果是:x= 。 Option Compare Database Dim x As Integer Private Sub Form_Load() x=3 End Sub Private Sub Command

admin2011-04-29  69

问题 运行下列程序,窗体中的显示结果是:x=   
  Option Compare Database
  Dim x As Integer
Private Sub Form_Load()
    x=3
End Sub
Private Sub Commandll_ Click()
   Static a As Integer
Dim b As Integer
b=x^2
  funl x,b
funl x,b
MsgBox〝x=〞&x
End Sub
Sub funl(ByRef y As Integer,ByVal z As nteger)
y=y+z
z=y-z
End Sub

选项

答案21

解析
转载请注明原文地址:https://jikaoti.com/ti/vbw0FFFM
0

最新回复(0)