单选题假定有以下循环结构Do Until条件表达式循环体Loop则以下正确的描述是
单选题图像框中的stretch属性为true时,其作用是( )。
单选题要清除已经在图片框Picturel中打印的字符串而不清除图片框中的图像,应使用语句( )。
单选题以下叙述中错误的是( )。
单选题设有如下一段程序:
Private Sub Command1_Click()
Static a As Variant
a=Array("one", "two", "three", "four", "five")
Print a(3)
End Sub
针对上述事件过程,以下叙述中正确的是
单选题下列叙述中正确的是( )。
单选题( )控件可以使图形根据控件大小而改变大小。
单选题窗体上有1个名称为Command1的命令按钮,在设计模式下,双击Command1,将打开( )。
单选题下面程序的输出结果是( )。 Private Sub Command1_Click() ch$="ABCDEF" proc ch Print ch End Sub Private Sub proc(ch As String) s="" For k=Len(ch)To 1 Step-1 s=s & Mid(ch,k,1) Next k ch=s End Sub A) ABCDEF B) FEDCBA C) A D) F
单选题下列程序代码段中,在单击命令按钮调用SelMid函数时,其运行结果为( )。 Private Function SelMid(aStr As String)As String Dim temp As String Dim sLen As Integer temp="" sLen=Len(aStr) i=1 Do While i<=sLen/2 temp=temp+Mid(aStr,i,1)+Mid(aStr,sLen-i+1,1) i=i+1 Loop SelMid=temp End Function Private Sub Command1_Click() Dim Str As String Str="abcdef":Print SelMid(Str) End Sub
单选题假定窗体上有一个文本框,名为txt1,为了使该文本框的内容能够换行,并且具有垂直滚动条,没有水平滚动条正确的属性设置为
单选题设有如下函数:
Function DelSpace(ch As String)As Integer
Dim n%,st$,c$
st=””:n=0
For k=1 To Len(ch)
c=Mid(ch,k,1)
If c<>””Then
st=st&c
Else
n=n+1
End If
Next k
ch=st:DelSpace=n
End Function
该函数的功能是
单选题如果在c盘当前文件下已存在名称为studata.dat的顺序文件,那么执行语句“Open"c:studatadat“For Append As#1”之后,将( )。 A) 删除文件中原有内容 B) 保留文件中原有内容,并在文件尾填加新内容 C) 保留文件中原有内容,并在文件头填加新内容 D) 以上均不对
单选题关于通用对话框控件叙述不正确的是 ( )
单选题下面关于多窗体程序设计描述不正确的是
单选题窗体上有一个如右图所示的图形控件,控件中显示了如图所示的文字,可以判断这个图形控件()。A)是图像框(Image)B)是图片框(PictureBox)C)是形状控件D)不是上述3种控件中的一种
单选题设a=5,b=6,c=7,d=8,执行下列语句后,x的值为 X=IIF((a>b) And (c>d),10,20) A)10 B)20 C)True D)False
单选题如果关系模式R为1NF,且每个非主属性都完全函数依赖于R的候选码,则称R属于______ 。
单选题在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是______。
单选题窗体如图所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击“删除”按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click()Dimn%,k%n=Len(Text1.Text)Fork=0ToList1.ListCount-1IfLeft(List1.List(k),n)=Text1.TextThenList1.RemoveltemkEndIfNextkEndSUb在调试时发现,如输入“陈”,可以正确删除所有姓“陈”的项目,但输入“刘”,则只删除了“刘邦”、“刘备”2项,结果如图2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把Fork=0ToList1”ListCount-1改为()。
