单项选择题

在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果是( )。

Private Sub p1(n As Integer)

For i=n To 1 Step-1

x=String(i,"*")

Print x

Next i

End Sub

Private Sub Command1_Click()

p1(3)

End Sub

A．***

**

*
B．*

**

***
C．*

*

*
D．******
<上一题 目录 下一题>
热门 试题

单项选择题
有下列Sub过程： Sub Sun(x As Single,y As Single) t=x x=t y y=t Mody End Sub 在窗体上的命令按钮Command1中，编写下列事件过程，执行该事件过程调用Sun过程，结果是( )。 Private Sub Conunandl Cliek() Dim a As Single Dim b As Single a=5 b=4 Sun a,b Print a;b End Sub
A．1.25 1
B．5 4
C．4 5
D．1 1.25
单项选择题
在窗体上画1个名为Text1的文本框和1个名为Label1的标签，再画4个名为Op1的单选按钮控件数组，其Index属性按季度顺序为0～3，如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按钮，则Text1中显示相应季度的销售总额，并把相应的文字显示在标签上。如图 2所示是单击“第二季度”单选按钮所产生的结果。请选择可在空白处填写的合适语句( )。 Option Base 1 Dim sales(12) As Long Private Sub Form_Load() open c: sales.txt For Input As #1 For k=1 To 12 Input #1,sales(k) Next k Close #1 End Sub Private Sub ______ (Index As Integer) Dim sum As Long,k As Integex,month As Integer sum=0 month=Index*______ For k=1 To 3 month=month+1 sum=sum+sales(month) Next k Label1.Caption=______.Caption & 销售总额: Text1=sum End Sub
相关试题