单选题：设有如下程序：Private Sub Form Click（　　） Dim ary(1 To 5)As Integer

  • 题目分类：VB
  • 题目类型：单选题
  • 号外号外：注册会员即送体验阅读点！
题目内容：
设有如下程序：
Private Sub Form Click（　　）
Dim ary(1 To 5)As Integer
Dim i As Integer
Dim sum As Integer
For i=1 To 5
ary(i)=i+l
sum=sum+ary(i)
Next i
Print sum
End Sub
程序运行后，单击窗体，则在窗体上显示的是（　　）。 A．15
B．16
C．20
D．25

参考答案：【答案仅供学习，请勿对照自行用药等】
答案解析：

设有如下程序：Private Sub Form Click（　　） Dim s As Long，f As Long D

设有如下程序：Private Sub Form Click（　　）Dim s As Long，f As LongDim n As Integer，i As

分类：VB  题型：单选题
查看答案

设有如下程序Private Sub Command1 Click（　　）x=10：Y=0For i=l To 5Dox

设有如下程序Private Sub Command1 Click（　　）x=10：Y=0For i=l To 5Dox=x-2y=y+2Loop

分类：VB  题型：单选题
查看答案

假定用下面的语句打开文件：Open"Filcl．txt"For Input As#1则不能正确读文件的语句是（　　）。

假定用下面的语句打开文件：Open"Filcl．txt"For Input As#1则不能正确读文件的语句是（　　）。A．Input#1，ch$ B．Lin

分类：VB  题型：单选题
查看答案

窗体上有一个名称为Cb1的组合框，程序运行后，为了输出选中的列表项，应使用的语句是（　　）。

窗体上有一个名称为Cb1的组合框，程序运行后，为了输出选中的列表项，应使用的语句是（　　）。A．Print Cb1．Selected B．Print Cb1．L

分类：VB  题型：单选题
查看答案

下面可以产生20～30(含20和30)的随机整数的表达式是（　　）。

下面可以产生20～30(含20和30)的随机整数的表达式是（　　）。A．Int(Rnd*10+20) B．Int(Rnd*11+20) C．Int(Rnd*20

分类：VB  题型：单选题
查看答案