编写如下程序： Private Sub Command1_Click() For i = 1 To 4 Print Space(12 - 3 * i); For j = 1 To i Print j;

admin2018-12-20 48

问题编写如下程序：
Private Sub Command1_Click()
For i = 1 To 4
   Print Space(12 - 3 * i);
   For j = 1 To i
      Print j;
   Next j
   For k = i - 1 To 1 Step -1
      Print k;
   Next k
   Print
Next i
End Sub
程序运行后，单击命令按钮Command1，输出结果为

选项 A、1
1  2  1
1  2  3  2  1
1  2  3  4  3  2  1
B、                1
         1  2  1
   1  2  3  2  1
1  2  3  4  3  2  1
C、          1
   1  2  1
1  2  3  2  1
1  2  3  4  3  2  1
D、1  2  3  4  3  2  1
1  2  3  2  1
   1  2  1
      1

答案C

解析 Print Space(12 - 3 * i)语句为打印空格符。根据变量i的值变化，打印的个数不同。For循环的执行根据变量值进行相应的打印。选C）。

转载请注明原文地址:https://www.kaotiyun.com/show/jyFp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

编写如下程序： Private Sub Command1_Click() For i = 1 To 4 Print Space(12 - 3 * i); For j = 1 To i Print j;

二级VB

NCRE全国计算机二级

下面不属于软件设计阶段任务的是

现有如下一段程序：PrivateSubCommand1_Click()　　x＝UCase(InputBox("输入："))　　SelectCasex　　　　Case"A"To"C"　　　　　　Print"考核通过！"

语句DimArr(－2To4)AsInteger所定义的数组的元素个数为(　　)。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()c＝1234c1＝Trim(Str(c))Fori＝1To4　　Print　　　　NextEndSub程序

下列选项中属于面向对象设计方法主要特征的是(　　)。

以下关系表达式中，其值为True的是(　　)。

列表框控件List1中已有若干个列表项，以下能表示被选中列表项内容的表达式是()。

下面表达式的值不为5的是()。

已知num1=15，则表达式Len("abc"&num1)+InStr("Internet","net")的值为

下面不属于软件工程的3个要素是

WhatdowemeanbyaperfectEnglishpronunciation?Inone【C1】______thereareasmanydifferentkindsofEnglishastherearesp

胸膜腔内压是由哪个因素形成的()。

初次接种百、白、破联合制剂的月龄是()。

“十一五”时期，西部大开发的城乡居民人均收入水平与全国差距扩大的趋势得到遏制，城镇居民人均可支配收入和农村居民人均纯收入年均增长()以上。

与复印机、激光打印机一起构成现代化的光电子印刷技术，从而彻底取代了铅字手工排版的是()

应用实质推理的前提是()。

编写如下程序： Private Sub Command1_Click() For i = 1 To 4 Print Space(12 - 3 * i); For j = 1 To i Print j;

二级VB

NCRE全国计算机二级

下面不属于软件设计阶段任务的是

现有如下一段程序：PrivateSubCommand1_Click() x＝UCase(InputBox("输入：")) SelectCasex Case"A"To"C" Print"考核通过！"

语句DimArr(－2To4)AsInteger所定义的数组的元素个数为( )。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()c＝1234c1＝Trim(Str(c))Fori＝1To4 Print NextEndSub程序

下列选项中属于面向对象设计方法主要特征的是( )。

以下关系表达式中，其值为True的是( )。

列表框控件List1中已有若干个列表项，以下能表示被选中列表项内容的表达式是()。

下面表达式的值不为5的是()。

已知num1=15，则表达式Len("abc"&num1)+InStr("Internet","net")的值为

下面不属于软件工程的3个要素是

WhatdowemeanbyaperfectEnglishpronunciation?Inone【C1】______thereareasmanydifferentkindsofEnglishastherearesp

胸膜腔内压是由哪个因素形成的()。

初次接种百、白、破联合制剂的月龄是()。

“十一五”时期，西部大开发的城乡居民人均收入水平与全国差距扩大的趋势得到遏制，城镇居民人均可支配收入和农村居民人均纯收入年均增长()以上。

与复印机、激光打印机一起构成现代化的光电子印刷技术，从而彻底取代了铅字手工排版的是()

应用实质推理的前提是()。

现有如下一段程序：PrivateSubCommand1_Click()　　x＝UCase(InputBox("输入："))　　SelectCasex　　　　Case"A"To"C"　　　　　　Print"考核通过！"　　　　

语句DimArr(－2To4)AsInteger所定义的数组的元素个数为(　　)。

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()c＝1234c1＝Trim(Str(c))Fori＝1To4　　Print　　　　NextEndSub程序

下列选项中属于面向对象设计方法主要特征的是(　　)。

以下关系表达式中，其值为True的是(　　)。