王老师：19139051760(微信同号)  13333709510
联大   青书学堂   文才   和学   现代兴业   安徽教育在线   超星   弘成   广东开放大学   国家开放大学   上海开放大学   含弘慕课 

教育服务
成人高校
成考录取分数线
我要提升学历
提升学历的理由：
升职加薪、积分落户、考研、公务员考试、子女入学、出国留学


成人高考报名入口

当前位置： 首页 > 国家开放大学系统 > 南昌大学> 国家开放大学Visual Basic6.0程序设计
 

输入试题：
本题添加时间：2023/5/30 20:12:00
圆梦客服：王老师  19139051760(微信同号)  19139051760(微信同号)
Sub test(i As Integer)
    i = i + 4
End Sub
Private Sub Form_Click()
    Dim x As Integer
    x = 5
    Print "x="; x
    Call test(x)
    Print "x="; x
End Sub
程序运行后,单击窗体，在窗体上显示的值是（   ）。
A、x= 5  x= 9
B、x= 9  x= 5
C、
x= 5
x= 9
D、9  5

答案是:C

出自 国家开放大学Visual Basic6.0程序设计  国家开放大学系统

南昌大学

更多试题>>>>
1、Sub Change(x As Integer, y As Integer)    Dim t As Integer    t = x    x = y  
2、Private Sub Command1_Click()   Dim M(5)   For I = 1 To 5      M(I) = I * I   Next
3、Private Sub Command1_Click()   Dim A(1 To 5) As Integer   Dim x As Integer   For i = 1 To 5  
4、Private Sub Command1_Click()     Dim A(1 To 5) As Integer     Dim x As Integer  &#
5、Private Sub Form_Click()   Dim A(1 To 3) As String   Dim c As Integer   Dim j As Integer   A(1)


提升学历-成人高考报名入口 提升学历-成人高考院校名单