更多"运行以下程序后,输出的图形是 Private Sub Command"的相关试题:
[单项选择]运行以下程序后,输出的图形是
Private Sub Command1_Click( )
Line(500,500)-(1000,500) Line(750,300)-(750,700)
End Sub
A. 一条折线
B. 两条分离的直线段
C. 一个伞形图形
D. 一个十字形图形
[单项选择]运行以下程序后,输出的图形是
Private Sub Command1_Click( )
Line(500,500)-(1000,500)
Line(750,300)-(750,700)
End Sub
A. 一条折线
B. 两条分离的直线段
C. 一个伞形图形
D. 一个+字形图形
[单项选择]运行以下程序后,输出的图形是 Private Sub Command1_Click( ) Line(500,500)-(1000,500) Line(750,300)-(750,700) End Sub
A. 一条折线
B. 两条分离的直线段
C. 一个伞形图形
D. 一个十字形图形
[单项选择]执行以下程序后,在窗体上输出的是( )。
Private Sub Command1_Click( )
Dim a(20)
For j=1 To 20 Step 2
a(j)=j
Next j
Print a(1)+a(2)+a(3)
End Sub
A. 4
B. 5
C. 6
D. 7
[单项选择]窗体上有一个按钮和一个列表框,执行下列程序后,输出的结果为 Private Sub Command1_Click( ) List1.AddItem "Visual" List1.AddItem "Basic" List1.AddItem "Programming", 1 Print list1.List(2) End Sub
A. Visual
B. Basic
C. Programming
D. 2
[单项选择]以下程序运行后输出的结果是 ______。
Option Base 1
Private Sub Form_Click( )
Dim A(20)
For K=1 To 20
A(K)=K^2
Next K
Print A(K)
End Sub
A. 20
B. 441
C. 400
D. 出错信息
[单项选择]以下程序运行后输出的结果是______。
Private Sub Form _Click( )
a=0
For j=1 To 15
a=a+j Mod 3
Next j
Print a
End Sub
A. 10
B. 15
C. 80
D. 100
[单项选择]运行以下程序后,输出的图形是( )。 Forr=O To 150 Circle(320,240),r Fori=1 To 1000 Nexti Nextr
A. 一个固定的空心圆
B. 一个半径逐渐变大的空心圆
C. 一个固定的实心圆
D. 一个半径逐渐变大的实心圆
[单项选择]以下程序运行后的输出结果是
#include<stdio.h>
#define SUB(
A. (a)-(a)
B. *e;
[单项选择]以下程序运行后的输出结果是______。 Private Sub Form_ Click( ) y=1 :x=2 Print Iif(x>=y,x,y) End Sub
A. 0
B. 1
C. 2
D. 3