网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
（25）下面程序的执行结果是
Private Sub Command 1 Click()
a=10
For k=1 To 5 Step-1
a=a-k
Next k
Print a; k
End Sub
A）-5 6
B）-5 -5
C）10 0
D）10 1
参考答案
更多 “ （25）下面程序的执行结果是Private Sub Command 1 Click()a=10For k=1 To 5 Step-1a=a-kNext kPrint a; kEnd SubA）-5 6B）-5 -5C）10 0D）10 1 ” 相关考题
考题
在窗体上有一个文件名称为Text1的文本框和1个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮一次，文本框向右移动一定距离。下面能够正确实现上述功能的程序是（ ）。A．Private Sub Command1_Click（）Text1.Left=100End SubB．Private Sub Command1_Click（）Text1.Left= Text1.Left-100End SubC．Private Sub Command1_Click（）Text1.Move.Text.Left+100End SubD．Private Sub Command1_Click（）Text1.Move.Text.LeftEnd Sub
考题
下面程序运行后，窗体中显示【 】。Private Sub Command1_Click) ( )aS ="*" :b$ ="$"For k = 1 To 3x$ =Strings (Len(a$) +k,b$ )Print x $;NextPrintEnd Sub
考题
有如下程序，该程序的执行结果是【 】。Private Sub Command1_lick()For i= 1 To 4x= 4For j =1 To 3x =3For k=1 To 2X= K+5Next kNext jNext iPrint xEnd Sub
考题
窗体上有两个按钮，则执行程序后按键盘Cance1键的输出结果是 【7】 。Private Sub Command1_Click（）Print "北京";End SubPrivate Sub Command2_Click（）Print "南京";End SubPrivate Sub Form_Load（）Command2.Cancel=TrueCommand1.Cancel=TrueEnd Sub
考题
在窗体上有—个名称为Text1的文本框和一个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮—次，文本框向右移动—定的距离。下面能够正确实现上述功能的程序是 ______。A．Private Sub Command1_Click() Text1.Left=100 End SubB．Private Sub Command1_Click() Text1.Left=Text1.Left-100 End SubC．Private Sub Command1_Click() Text1.Move Text1.Left+100 End SubD．Private Sub Command1_Click() Text1.Move Text1.Left End Sub
考题
（ 27 ）下面程序执行时，在窗体上显示的是Private Sub Command1_Click()Dim a(10)For k = 1 To 10a(k) = 11 – kNext kPrint a(a(3)\a(7) Mod a(5))End SubA ） 3B ） 5C ） 7D ）9
考题
（ 30 ）下面程序的输出结果是Private Sub Command1_Click()ch$= ” ABCDEF ”proc chPrint chEnd SubPrivate Sub proc(ch As String)S= ””For k=Len(ch) To 1 Step-1s=sMid(ch,k,1)Next kch=sEnd SubA ） ABCDEFB ） FEDCBAC ） AD ） F
考题
阅读以下程序：Private Sub Form_click()Dim k, n, m As integern = 20m = 1k = 1Do While k ＜= nm=m+2k = k + 1LoopPrint mEnd Sub单击窗体程序的执行结果是【 】。
考题
在窗体上有一个命令按钮Command1，编写事件代码如下：Private Sub Command1_Click()Dim a(10)，P(3) As Integerk=5For i=1 To 10For i=1 To 3For i=1 To 3End Sub打开窗体运行后，单击命令按钮，消息框中输出的结果是( )。
考题
下面程序的执行结果是（ ）。Private Sub Command1Click（ ）a=10For k=1 To 5 Step-Ia=a-kNext kPrint a；kEnd SubA.-5 6B.-5 -5C.10 0D.10 1
考题
有如下程序：Private Sub Command1_Click()j =10For i= -1 To 1 Step 0.3j =j + 1Next iPrint jEnd Sub该程序共循环【 】次，程序执行完毕后j的值是【 】。
考题
下列程序的运行机结果是【 】。Private Sub Form_ Click()Dim k As Integern= 5m= 1k= 1Dom=m+2k= k+1Loop While k＜=nPrint mEnd Sub
考题
阅读下面的程序： Private Sub Command1_Click() For i=1 To 3 For j=1 To i For k=j To 3 x=x+1 Next k Next j Next i Print x End Sub 程序运行后，单击命令按钮，窗体上输出的结果是A．3B．9C．14D．21
考题
下面程序的执行结果是Private Sub Commandl_Click()a=1OFor k=l To 5 Step一1a=a--kNext kPrint a；kEnd SubA．一5 6B．一5—5C．10 0D．10 1
考题
在窗体上一个名为Commandl的命令按钮，然后编写以下程序：Private Sub Commandl一Click()Dim a(10)As IntegerFor k=10 To 1 Step-1a(k)=20—2*kNext kk=k+7Print a(k—a(k))运行程序．单击命令按钮，输出结果是A．1 8B．12C．BD．6
考题
执行下面的程序，消息框里显示的结果是 【 】 。Private Sub Form_Click()Dim Str As String， K As IntegerStr="ab"For k=Len(Str) TO 1 Step-1Str=Str Chr(Asc(Mid(Str，k，1))+k)Next kMsgBox StrEnd Sub
考题
有如下程序，该程序的执行结果是【 】。Private Sub Command1 Click()For i=1 To 4x=4For j=1 To ix =3For k=1 To 2x= x + 5Next kNext jNext iPrint xEnd Sub
考题
执行下面的程序，消息框的输出结果是【 】。Option Base1Private Sub Command1_Click( )Dim a(10)，P(3)As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3P(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iMsgBox kEnd sub
考题
下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch：Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=sMid(ch，k，1) Next k ch=s End Sub A．ABCDEF B．FEDCBA C．A D．F
考题
执行下面的程序，消息框里显示的结果是( )。Private Sub Form_Click()Dim Str As String,S As String,k As IntegerS=StrFor k=Len(Str) To 1 Step -1S=S (Mid(Str,k,1)Next kEnd Sub
考题
阅读下列程序： Private Sub Command1_Click() Dim i As Integer, k As Integer k=2 For i=1 To 3 Print H(k); Next i End Sub Function H(j As Integer) Static b a=0 a=a+1 b=b+1 H=a*b+jEnd Function单击命令按钮，执行程序，输出结果是( )。A．2 3 4B．3 4 5C．5 6 7D．3 5 6
考题
在窗体上画了两个按钮控件Command1和Command2，有如下程序： Private Sub Command1_Click() Print "Visual"； End Sub Private Sub Command2_Click() Print "Basic"； End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后，按键盘Cancel键，在窗体上输出的结果是A．BasicB．VisualC．CancelD．True
考题
下面程序的执行结果是（ ）。 Private Sub Command1Click（ ） a=10 For k=1 To 5 Step-I a=a-k Next k Print a；k End SubA.-5 6B.-5 -5C.10 0D.10 1
考题
下列程序运行后的输出结果是______。Private Sub f(k，s)s=1For j=1 To ks=s*jNextEnd SubPrivate Sub Command1_Click()Sum=0For i=1 To 3Call f(i，s)Sum=Sum+sNextPrint SumEnd Sub
考题
(29）在窗体上画一个名为Command 1的命令按钮，然后编写以下程序：Private Sub Commandl_lick()Dim a(10) As IntegerFor k＝10 To 1 Step-1a(k)＝20-2*kNext kk＝k＋7Print a(k-a(k))End Sub运行程序，单击命令按钮，输出结果是A）18B）12C）8D）6
考题
单选题下面程序执行时在窗体上显示的是（）。 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 SubA
3B
5C
7D
9
热门标签
最新试卷
