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

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


成人高考报名入口

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

输入试题：
本题添加时间：2023/5/30 20:12:00
圆梦客服：王老师  19139051760(微信同号)  19139051760(微信同号)
Function F(a As Integer)
   Dim b As Integer
   Static c As Integer
   b = b + 2
   c = c + 3
   F = a + b + c
End Function
Private Sub Command1_Click()
   Dim a As Integer
   a = 4
   For i = 1 To 3
    Print F(a);
   Next i
End Sub
程序运行后,单击窗体，在窗体上显示的值是（   ）。
A、9  9  9
B、9  12 15
C、9  14 19
D、9  11 13

答案是:B

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

南昌大学

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


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