单选题在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Commandl_Ciick() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是______。
单选题组合框是文本框和( )特性的组合。
单选题在C盘当前文件夹下有一个已建立好的顺序文件Alph.txt,文件内容为只含有字母的一个字符串(有双引号界定符)。单击窗体,打开Alph.txt文件,读取字符串并显示在文本框Text1中,然后调用StrSort过程将此字符串按ASCII码的顺序重新排列并显示在文本框Text2中,最后将重新排列的字符串存入AlpO.txt文件中(无双引号界定符)。请选择横线处合适的语句( )。 Private Sub Form_Load() Dim StrIn As String,StrOut As Strings Open"C:/Alph.txt"For Input As #1 ______ Close Text1.Text=StrIn ______ Text2.Text=StrOut Open"C:/AlpO.txt"For Output As#2 ______ Close End Sub Private Function StrSort(s As String)As String Dim s Arr() As String *1,i As Integer,j As Integer,n As Integer Dim t As String *1 n=Len(s) ReDim sArr(n) For i=1 To n s Arr(i)=Mid(s,i,1) Next i For i=1 To n-1 For j=i+1 To n If sArr(i)>sArr(j) Then t=sArr(i):sArr(j):sArr(j):sArr(j)=t End If Next j,i For i=1 To n StrSort=StrSort & s Arr(i) Next i End Function
单选题假定在图片框Picture1中装入了一个图片,在程序运行中,为了清除该图片f注意,清除图片,而不是删除图片框),应采用的正确方法是______。
A.单击图片框,然后按Del键
B.执行语句Picturel.Picture=LoadPicture("")
C.执行语句Picture1.Picture=""
D.执行语句:Picture1.Cls
单选题编写如下程序: Private Sub Command1_Click() Dim m As Integer,n As Integer m=1:n=0 Do While m<20 n=m+n:m=3*m+1 Loop Print m,n End Sub 程序运行后,单击命令按钮Command1,输出结果为
单选题在窗体中添加一个列表框(listBox1)和一个命令按钮,并编写如下代码:Private Sub Command1_ Click() Dim Entry, I, Msg Msg = "Choose Ok to add 100 items to your list box." MsgBox Msg for I = 1 To 100 Entry = "Entry" & I List1. AddItem Entry Next IEnd Sub程序完成的功能是______。
单选题下列打开“代码窗口”的操作中错误的是
单选题结构化程序设计的主要任务是确定每个模块的
单选题在Visual FoxPro报表设计中,“学生成绩表”的报表布局类型是()
单选题以下自定义数据类型的语句中,正确的是
单选题下列控件中,具有Caption属性的是( )。
单选题表示“x+y小于10且x—y大于或等于6”的Visual Basic表达式是( )。
单选题窗体上有1个Timer1计时器,1个Shapel形状控件,还有下面程序代码:Dim flagAs BooleanPrivate Sub Form_Load() flag=True Timer1.Enabled=True Timer1.Interval=1000End SubPrivate Sub Timer1_Timer() If flag Then Shape1.Height=Shape1.Height*2 Shape1.Width=Shape1.Width*2 Else Shape1.Height=Shape1.Height*0.5 Shape1.Width=Shape1.Width*0.5 End If flag=Not flagEnd Sub 执行程序所产生的效果是
单选题要求当鼠标在图片框Picture1中移动时,立即在图片中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是( )。 A) Private Sub Picture1_MouseMove(Button As Integer,Shift As integer,XAs Single,Y As Single) Picture1.Print X,Y EndSub B) Private Sub Picture1_MouseMove(Button As Integer,Shift As Integer,XAs Single,Y As Single) Print X,Y EndSub C) Private Sub Picture1_MouseDown(Button As Integer,Shift As Integer,XAs Single,Y As Single) Picture.Print X,Y End Sub D) Private Sub Form_MouseMove(Button As Integer Shift As Integer,XAs Single,Y As Single) Picture1.Print X,Y End Sub
单选题设窗体上有3个图像框:Image1、Image2、Image3,并有下面的程序代码:Private Sub Form_Load() Private Sub Image2_Click()Image1.Picture=LoadPicture("LEAF.bmp") Image3.Picture=Image2.PictureImage2.Picture=LoadPicture("OPEN.bmp") Image2.Picture=Image1.PictureImage3.Visible=False Image1.Picture=Image3.PictureEnd Sub End SubPrivate Sub Image1_Click()Image2.Picture=Image1.PictureEnd Sub在程序运行期间单击Image2,则在窗体上看到的结果是
单选题确定图片框Picturel在窗体上位置的属性是
单选题要设置工程中某一个窗体作为启动窗体,必需的操作步骤是______。
单选题Visual Basic程序中语句的续行符是( )。
单选题开发软件所需高成本和产品的低质量之间有着尖锐的矛盾,这种现象称做( )。 A) 软件矛盾 B) 软件危机 C) 软件藕合 D) 软件产生
单选题下列程序段的执行结果为( )。 a=6 For k=1 To 0 a=a+k Next k Print k;a