计算机程序设计
执行以下程序段，在窗体上显示的结果是___A__。PrivateSubForm_Click（）DimSAsString，iAsIntegerS="ab"Fori=Len（S）To1Step-1PrintChr（Asc（Mid（S，i，1））+i）NextIEndSubA、dbB、cbC、ccD、fd
题目
执行以下程序段，在窗体上显示的结果是___A__。PrivateSubForm_Click（）DimSAsString，iAsIntegerS="ab"Fori=Len（S）To1Step-1PrintChr（Asc（Mid（S，i，1））+i）NextIEndSub
- A、db
- B、cb
- C、cc
- D、fd
参考答案和解析
相似问题和答案
第1题：
（ 27 ）下面程序执行时，在窗体上显示的是
Private Sub Command1_Click()
Dim a(10)
For k = 1 To 10
a(k) = 11 – k
Next k
Print a(a(3)\a(7) Mod a(5))
End Sub
A ） 3
B ） 5
C ） 7
D ）9
第2题：
阅读以下程序：
Private Sub Form_click()
Dim k, n, m As integer
n = 20
m = 1
k = 1
Do While k ＜= n
m=m+2
k = k + 1
Loop
Print m
End Sub
单击窗体程序的执行结果是【 】。
41 解析：本题的循环体共要执行20次，m的最终值为1+2*20=41。
第3题：
下列程序段，运行后窗体上输出结果是 Private Sub Commnad1_Click() a=5∶b=4∶c=3∶d=2 x=3＞2*b Or a=c And b＜＞c Or c＞d Print X End SubA. 1 B. True C. False D. 2
【解析】表达式的执行顺序是：首先进行函数运算，接着进行算术运算，然后进行关系运算，最后进行逻辑运算。程序中表达式x=3>2*b Or a=c And b<>c Or c>d的执行过程是：x=3>8 Or False And True Or True→x＝False Or False And True Or True→x＝False Or True→x＝True；打印输出True。
第4题：
窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。 Private Sub Command1_Click() Picture1.Picture=LoadPicture("C:\picture.jpg") Picture1.Cls Picture1.Print"picture" End Sub
A．窗体无显示，图片框显示图片和文字picture
B．窗体上出现picture文本，图片框无显示
C．窗体上出现picture文本，图片框显示图片picture.jpg
D．窗体无显示，图片框只显示picture文字
解析：图片框的装载语句为：Picture1.Picture=LoadPicture(图片完整路进)。Print输出方法的功能是在指定的对象上输出文本信息，它的基本格式为：对象名.Print。
第5题：
在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click()Dim a As Integer, b As Integerb = 1for a = 1 To 100 if b＞= 10 then exit for if b Mod 3 = 1 then b=b+3 End ifNext aPrint aEnd Sub在命令按钮上单击后，窗体上显示的结果是______。
A．101
B．6
C．5
D．4
解析：当发生Conunand1_Click事件时，给变量b赋值1，然后执行for循环：首先给a赋初值1，判断if后面的条件“b＞=10”为False，接着执行下面的if语句，判断条件“b Mo d 3=1”为True，执行语句“b=b+3”，b的值为4，第一次循环结束，循环变量a增加1变为2，没有超过终值，接着执行第二次循环；同样解析可知第二次循环结束后，b的值为7，a的值为3，接着执行第三次循环：同样解析可知第三次循环结束后b的值为10，a的值为4，接着执行第四次循环；判断第一个if语句的条件“b＞=10”为 True，执行后面的exit for语句，退出循环。输出的a的值为4。
第6题：
（18）窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是。 Privte Sub Command1_Click() Picture1.Picture=LoadPicture("c:\picture.jpg") Picture1.Cls Picture1.Print"Picture" End SubA.窗体无显示，图片框显示图片和文字Picture B.窗体上出现Picture文本，图片框无显示C.窗体上出现Picture文本，图片框显示图片picture.jpg D.窗体无显示，图片框只显示Picture文字
【解析】图片框的装载语句为：Picture1.Picture=LoadPicture(图片完整路径)。Print输出方法的功能是在指定的对象上输出文本信息，它的基本格式为：对象名.Print。
第7题：
在窗体上画一个命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim a As Integer, b As integer b = 1 For a = 1 To 100 If b ＞＝ 10 Then Exit For If b Mod 3 = 1 Then b = b + 3 End If Next a Print a End Sub 在命令按钮上单击后，窗体上显示的结果是 ______。
A．101
B．6
C．5
D．4
解析：事件发生时给变量b赋值1，然后执行For循环。先给a赋初值1，判断If后面的条件“b＞=10”为False，接着执行If语句，判断“b Mod 3=1”为“True”，执行语句“b=b+3”，第一次循环结束后，b=4，a=2。第二次循环结束后，b=7，a=3。第三次循环后，b=10， a=4。接着执行第四个循环，判断If后面的条件“b＞=10”为True，退出循环，a的输出值为4。
第8题：
有以下程序：
Private Sub Form_Activate()
For j=1 to 3
x=3
For i=l to 2
x=x+6
Next
Next
Print x
End Sub
程序运行后，窗体上显示的结果为______。
15
第9题：
下列程序段的运行结果是：Private Sub Command1_Click() Dim n AS Integer I =21: n = 3 do while I＞n I=I- n Loop Print IEnd Sub在窗体上打印的结果是______。
A．3
B．5
C．6
D．8
解析：while型循环的条件为假时离开循环，即i=3时就离开，最后打印的i值为3。
第10题：
以下程序的执行结果是 ( )。 #include ＜iostream＞ using namespace std; class sample { private: int x; public: sample (int A) { x=a; } friend double square(sample s); }; double square(sample s) {
A．20
B．30
C．900
D．400
解析：本题考核友元函数的应用。程序中函数square()是类sample的一个友元函数，它可以直接访问类sample的所有成员。它的功能是返回类sample的私有数据成员x的平方。所以程序的执行结果是：900。注意：友元函数不是类的成员函数，在类外定义时不要加上类名及其作用域运算符(::)。友元函数的调用与一般函数的调用的方式和原理一致，可以在程序的任何地方调用它。