单选题在窗体上画一个命令按钮,然后编写如下事件过程: Prevate Sub Command1_ Click() x=0 Do Until x=-1 a= InputBox(“请输入A的值”) a= Val (
单选题在启动窗体Form1上画一个名为Command1的命令按钮和两个文本框(其名称分别为Text1和Text2),新建一个窗体Form2。然后编写如下程序: Private Sub Command1_ Click() msg$ = "Retry" Title$ = "Error!" If Text1. Text = "a" And Text2. Text = "1" Then Unload Me Form 2. Show Else MsgBox msg$, vbOKOnly + vbCritical, Title$ End If End Sub运行该程序,要实现单击Command1命令按钮后卸载当前窗体,再弹出名为Form 2的窗体,则在两个文本框中应分别输入______ 。
单选题在窗体上添加一个文本框,名为text1,然后编写如下的load事件过程,则程序的运行结果是______ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t end sub
单选题下列描述中,正确的是( )。
单选题设有如下通用过程: Public Function Fun(xStr As String)As String Dim t Str As String,strL As Integer tStF=" " strL=Len(xStr) i=1 Do While i<=strL/2 tStr=Tstr&Mid(xStr,i,1)&Mid(xStr,strL-i+1,1) i=i+l Loop Fun=tStr End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下的事件过程: Private Sub Command1_Click() Dim S1 As String S1="abedef" Prim UCase(Fun(S1)) End Sub 程序运行后,单击命令按钮,输出结果是( ) A.ABCDEF B.abcdef C.AFBECD D.DEFABC
单选题窗体的MouseDown事件过程如下: Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) 有4个参数,关于这些参数,正确的描述是 ______。
单选题窗体上有一个文本框,其Name属性为Text1,如图所示,并有如下事件过程:PrivateSubForm_Load()Text1.Text="":Text1.SetFocusFori=1To10Sum=Sum+iNextiText1.Text=SumEndSub上述程序的运行结果是{{U}}{{/U}}。A.在文本框Text1中输出55B.在文本框Text1中输出0C.语法错误D.在文本框Text1中输出不定值
单选题编写如下程序: Option Base 1 Prirate Sub Command1_Click() Dim a a=Array(1,2,3,4):s=0:j=1 For i=4 To 1 Step-1 s=s+a(i)*j:j=j*10 Next i Print s End Sub 程序运行后,单击命令按钮Command1,输出结果为
单选题下列程序段,在运行时最早输出的内容是( )。
a=2
C=1
AAA:
C=C + a
If c<10 Then
Print c
GoTo AAA
Else
Print"10以内的奇数显示完毕。"
End If
单选题在容量为15的循环队列中,若头指针front=6,尾指针rear=9,则循环队列中的元素个数为
单选题窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:Dim flag As Boolean Private Sub Timer1_Timer()Private Sub Form_Load() If flag Thenflag=True Shape1.Height=Shape1.Height*2Timer1.Enabled=True Shape1.Width=Shape1.Width*2Timer1.Interval=1000 ElseEnd Sub Shape1.Height=Shape1.Height*0.5Shape1.Width=Shape1.Width*0.5End Ifflag=Not flagEnd Sub执行程序所产生的效果是
单选题使用__________方法可将新的列表项添加到一个列表框中。
单选题窗体上有—个名称为Frame1的框架(如图),若要把框架上显示的“Frame1”改为汉字“框架”,下面正确的语句是______。
单选题下面控件中,没有Caption属性的是( )。
单选题下列针对框架控件的叙述中,错误的是( )。
单选题在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”;一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中(窗体外观如下图),则能够实现上述要求的语句序列是
单选题以下能在窗体Forml的标题栏中显示“VisualBasic窗体”的语句是
单选题为了在列表框中使用<Ctrl>和<Shift>键进行多个列表项的选择,应将列表框的MultiSelect属性设置为
____
。
单选题以下关于函数过程中叙述中错误的是
单选题InputBox函数可以产生输入对话框。执行下列语句: St$=InputBox("请输入字符串","字符串") 运行程序,用户输入完毕并单击“确定”按钮后,St$变量内容为( ) A.字符串 B.请输入字符串 C.字符串对话框 D.用户输入内容
