题目内容
（请给出正确答案）
运行下列程序，窗体中的显示结果是：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
如搜索结果不匹配，请 联系老师 获取答案
更多“运行下列程序，窗体中的显示结果是：x= 。Option Co…”相关的问题
第1题
ntVar="2"+"Y'之后，变量intVar的值分别是【 】。
第6题
在窗体上添加十个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
sum＝0
For i＝3 To 7
sum＝i+2
Next i
MsgBox sum+i
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是______。
第7题
执行下面的程序，消息框的输出结果是 【 】。
Option Basel
Private Sub Commandl Click()
Dim a(10)，P(3)As Integer
k=5
For i=1 To 10
a(i)=i
Next i
For i=1 To 3
P(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
MsgBox k
End sub
第8题
执行下面的程序，消息框里显示的结果是 【 】 。
Private Sub Form_Click()
Dim Str As String， K As Integer
Str="ab"
For k=Len(Str) TO 1 Step-1
Str=Str & Chr(Asc(Mid(Str，k，1))+k)
Next k
MsgBox Str
End Sub
第9题
在窗体上画一个名称为Com1的命令按钮，然后编写如下事件过程：
Private Sub Com1_Click()
n=10
q=1
sum=0
For i=1 To n
Next
Print sum
End Sub
该事件过程的功能是计算s=1+1/2!+1/3!+…+1/n!的值。请填空。
第10题
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub s(ByVal p As Integer)
p=p*2
End Sub
Private Sub Command1_click()
Dim i As Integer
i=3
Call s(i)
If i＞4 Then i=i^2
MsgBox i
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为【 】。
为了保护您的账号安全，请在“上学吧”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
微信搜一搜
上学吧
微信搜一搜
上学吧
