赞题库-背景图
单项选择题

有如下程序:Private Sub Form_Click()  Dim i As Integer, n As Integer  For i=1 To 20    i=i+4    n=n+i    If i>10 Then Exit For  Next  Print nEnd Sub程序运行后,单击窗体,则输出结果是(  )。

A.14
B.15
C.29
D.30
<上一题 目录 下一题>
热门试题

单项选择题窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:Private Sub Command1_Click() Dim s1 As String, s2 As String Open c: d4.dat For Append As #3 Line Input #3, s1 Line Input #3, s2 Text1.Text=s1+s2 Close End Sub该程序运行时有错误,应该进行的修改是( )。

A.将Open语句中的For Append改为For Input
B.将Line Input改为Line
C.将两条Line Input语句合并为Line Input #3, s1,s2
D.将Close语句改为Close #3

单项选择题设窗体上有一个水平滚动条HScroll1和一个命令按钮Command1,及下面的事件过程:Private Sub Form_Load() HScroll1.Min=0 HScroll1.Max=100End SubPrivate Sub Command1_Click() HScroll1.Value=70End Sub程序运行时单击命令按钮,则滚动条上滚动块位置的图示是( )。

A.
B.
C.
D.