为计算10+21+22+23+24+…+210的值,并把结果显示在文本框Textl中,若编写如下事件过程:Private Sub Commandl_Click()Dim a%,s%,k%S=1a=2FOr k=2 To 10a=a*2S=S+aNext kText1,Text=sEnd Sub执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是A.把s=1改为s=0B.把For k=2 TO 10改为For k=1 To 10C.交换语句S=s+a和a=a*2的顺序D.同时进行B.C两种修改
为计算10+21+22+23+24+…+210的值,并把结果显示在文本框Textl中,若编写如下事件过程:
Private Sub Commandl_Click()
Dim a%,s%,k%
S=1
a=2
FOr k=2 To 10
a=a*2
S=S+a
Next k
Text1,Text=s
End Sub
执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是
A.把s=1改为s=0
B.把For k=2 TO 10改为For k=1 To 10
C.交换语句S=s+a和a=a*2的顺序
D.同时进行B.C两种修改
相关考题:
在窗体中有两个文本框分别为Textl和Text2,一个命令按钮Cmmand1,编写如下两个事件过程:Private Sub Commandl_Click()a=Textl.Value+Text2.ValueMsgBox aEnd SubPrivate Sub Form_Load()TextI.Value=“”Text2.Value=””End Sub程序运行时,在文本框Textl中输入78,在文本框Text2中输入87,单击命令按钮,消息框中输出的结果为【 】。
( 27 )为计算 1+2+22+23+24+ … +210 的值,并把结果显示在文本框 Text1 中,若编写如下事件过程 :Private Sub Command1_Click()Dim a%,s%,k%s=1a=2For k=2 To 10a=a*2s=s+aNext kText1.Text=sEnd Sub执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是A )把 s=1 改为 s=0B )把 For k=2 To 10 改为 For k=1 To 10C ) 交换 语句 s=s+a 和 a=a*2 的顺序D )同时进行 B ) 、 C )两种修改
在窗体上添加一个文本框Textl,然后编写下列Load事件过程,则程序运行结果是 。 Private Sub Form_LoadO Textl.Text=〞〞 Textl.SetFocus Fork=1 To 5 T=t﹡k Next k Textl.Text=t End SubA.在文本框中显示120 B.文本框中仍为空 C.在文本框中显示1 D.出错
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程: Private Sub Command1 Click( ) Dim a%,s%,k% s=1 a=2 For k=2 To 10 a=a*2 s2 s+a Next k Text1.Text=s End Sub 执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是( )。A.把s=1改为s=0B.把For k=2 T0 10改为For k=1 T0 10C.交换语句s=s+a和a=a*2的顺序D.同时进行B、C两种修改
在窗体中有一个文本框Textl,编写事件代码如下:Private Sub Form. Cl ick() ’X=val(Inputbox(“输入X的值”))Y=1If X0 Then Y:2Textl.Value=YEnd Sub打开窗体运行后,在输入框中输入整数12,文本框Textl中输出的结果是A.1B.2C.3D.4
在窗体上添加一个文本框,名为Textl,然后编写如下的Load事件过程,则程序的运行结果是 Private Sub Form_Load() Text1.Text=" " Text1.Setfocus t=1 For k=10 To 6 Step -2 t=t(k Next k Text1.Text =t End SubA.在文本框中显示120B.文本框仍为空C.在文本框中显示480D.出错
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl),编写如下事件过程:打开窗体运行后,单击命令按钮,文本框中显示的内容是__________。