程序运行后,单击窗体,则在窗体上显示的内容是(). Private Sub Form_Click( ) Dim a(1 To 6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8:a(2)=6:a(3)=9:a(4)=3:a(5)=2:a(6)=7 n=6 For i=1 To n-1 min 1=i For j=i+1 To n If a(j)<a(min1)Then min1=j Next j t=a(i):a(i)=a(min1):a(min1)=t Next i For i=1 To n Print a(i) Next i End SubA、9 8 7 6 3 2B、2 3 6 7 8 9C、9 8 7 6 3D、2 3 6 7 8
程序运行后,单击窗体,则在窗体上显示的内容是(). Private Sub Form_Click( ) Dim a(1 To 6)As Integer Dim min1%,i%,j%,n%,t%,k% a(1)=8:a(2)=6:a(3)=9:a(4)=3:a(5)=2:a(6)=7 n=6 For i=1 To n-1 min 1=i For j=i+1 To n If a(j)<a(min1)Then min1=j Next j t=a(i):a(i)=a(min1):a(min1)=t Next i For i=1 To n Print a(i) Next i End Sub
- A、9 8 7 6 3 2
- B、2 3 6 7 8 9
- C、9 8 7 6 3
- D、2 3 6 7 8
相关考题:
在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:Private Sub Command1_Click()For I=1 To 2For J=1 To IPrint String(I,"Hello");Next JPrintNext IEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A.H HH HHB.H HHHHC.HHHHHD.H HH HHHH
有如下事件过程: Prirate Sub Form_Click() A$="123": B$="456" x=Val(A$)+Val(B$) Print x\100 End Sub 程序运行后,单击窗体,则窗体上显示的内容是______。A.123B.3C.5D.579
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As String, c As Integer a=1234: b=Str(a)c=Len(b)Print c End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是______。A.0B.5C.6D.7
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim a() a=Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承
下面对程序段运行结果叙述正确的是( )PrivateSubForm_Click()Caption="鼠标单击鼠标单击Picture=LoadPicture(App.Path+\window.jpg)Print欢迎使用VBEndSubPrivateSubForm_DblClick()Caption=鼠标双击Picture=LoadPicture()Print结束使用VBEndSubA.单击窗体时窗体的标题为鼠标单击,窗体上显示结束使用VBB.双击窗体时窗体的标题为鼠标双击,窗体上显示结束使用VBC.双击窗体时窗体的图片还在D.单击窗体时窗体的图片删除
设有如下程序:Private Sub Form. Click( )Dim ary(1 To 5)As IntegerDim i As IntegerDim sum As IntegerFor i=1 To 5ary(i)=i+lsum=sum+ary(i)Next iPrint sumEnd Sub程序运行后,单击窗体,则在窗体上显示的是( )。A.15B.16C.20D.25
在Form1的窗体土绘制一个命令按钮,名为Cmd1,标题为Display,按钮隐藏。编写适当的事件过程,使程序运行后,若单击窗体,则命令按钮出现;此时如果单击命令按钮,则在窗体上显示VisualBasic。程序运行情况如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise114.vbp,窗体文件名为execise114.frm。
在窗体上绘制一个文本框和一个图片框,然后编写如下两个事件过程:Private Sub Form_Click()Text1.Text="VB程序设计"End SubPrivate Sub Text1_Change()Picmml.Print"VBProgramming"End Sub程序运行后,单击窗体,则在文本框中显示的内容 [9] ,而在图片框中显示的内容是 [10] 。
在名为Form1的窗体上绘制3个名称分别为Cmd1、Cmd2和Cmd3,标题分别为“加法”、“减法”和“乘法”的命令按钮。编写适当的事件过程,使程序运行后,‘若单击“加法”按钮,则在窗体上显示“50+30=80”;如果单市“减法”按钮,则在窗休上显示“50-30=20”;如果单击“乘法”按钮,则在窗体上显示“50*30=1500"。程序的运行情况如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,窗体文件名为 execise117.frm,工程文件名为execise117.vbp。
有下列程序: Option Base 0 Private Sub Command1_Click() Dim City As Variant x = Array("Visual","Basic","Microsoft","Programming") Print x(2) End Sub 程序运行后,单击命令按钮,则在窗体上显示的内容是A.MicrosonB.错误提示C.VisualD.Basic
设有如下程序: Private Sub Form_Click() A=1 For i=1 To 3 Select Case i Case 1,3 A=A+1 Case 2,4 A=A+2 End Select Next i Print A End Sub 程序运行后,单击窗体,则在窗体上显示的内容是A.6B.5C.4D.3
在窗体上画一个名称为cl的命令按钮,然后编写如下事件过程: Private Sub Cl_Click( ) a=0n=InputBox(‘‘‘‘)Fori=lTonForj=lToia=a+lNextjNextiPrint aEnd Sub程序运行后单击命令按钮,如果输入4,则在窗体上显示的内容是( )。A.5B.6C.9D.10
在Form1的窗体上建立一个主菜单,标题为“操作”,名为vbOp,该菜单有两个菜单项,其标题分别为“显示”和“清除”,其名称分别为vbDis和vbClear。编写适当的事件过程,使程序运行后,若单击“操作”菜单中的“显示”命令,则在窗体上显示Visual Basic:如果单击“清除”命令,则清除窗体上显示的内容。程序的运行情况如下图所示。注意:文件必须存放在考生文件夹中,工程文件名为execise41.vbp,窗体文件名为 execise41.frm。
在Form1的窗体上绘制一个命令按钮,名为Cmd1,标题为Display。编写适当的事件过程,使程序运行后,若单击命令按钮,则在窗体上显示ViSBa1 Basic;如果单击窗体,则命令按钮消失。程序运行情况如下图所示。注意:在程序中不能使用任何变量;文件必须存放在考生文件夹中,工程文件名为 execise16.vbp,窗体文件名为execise16.frm。
运行下列程序:Private Sub Form_Click( )Dim x As Integer, y As String, z As Stringy = 12345For x = 1 To Len(y)z = Mid(Left(y, x), 1)Next xPrint zEnd Sub单击窗体后,则在窗体上显示的结果是( )。A.1B.11111C.55555D.12345
单选题假定有如下的窗体事件过程:程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是( )。AMicrosoft VisualBMicrosoftCBasicD5