• 搜标题
  • 搜题干
  • 搜选项
0 / 200字
填空题

改变驱动器列表框的Drive属性值将引发卫士事件。

答案： Change
题目列表

你可能感兴趣的试题

填空题

在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Commandl。程序运行时，单击命令按钮，能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件 test.dat中。请在空白处填上适当的内容，将程序补充完整。 Private Sub Command1_Click() Open"c：\test.dat"For Output As #1 For I=1 to Len(Text1.text) ______ Next I Close #1 End Sub
答案： Print #A,Mid(textA.text,I,A)
填空题

在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() a = Text1.Text + Text2.Text Print a End Sub Private Sub Form_Load() Text1.Text = " " Text2.Text = " " End Sub 程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入1234和4321，然后单击命令按钮，则输出结果为 。
答案： 12344321
填空题

假定有一个文本框，其名称为Text1，为了使该文本框具有焦点，应执行的语句是 。
答案： SetFocus
填空题

若有一个动态数组a有两个元素a(0)和a(1)，现要令数组a有三个元素a(0)、a(1)和a(2)，则应当使用 语句。
答案： ReDim a(2)
填空题

下列程序段的功能是输入一元二次方程ax2+bx+c=0(a≠0)的3个系数a、b、c，并判断它根的情况，请将程序补充完整。 Dim a As Single,b As Single,c As Single Dim delta As Single a=txtA. Text:b=txtB. Text:c＝txtC. Text delta=______ If delta＞0 Then lblResult. Caption="有两个不相等的实根" Elself delta＝0 Then lblResult. Caption="有两个相等的实根" ______ lblResult. Caption＝"没有实根" End If
答案： b*b—4*a*c Else
填空题

改变驱动器列表框的Drive属性值将引发卫士事件。
答案： Change
填空题

一般来说，算法可以用顺序、选择和 三种基本控制结构组合而成。
答案： 循环
填空题

下面的程序用冒泡法将数组a中的10个整数按升序排列，请在三处将程序补充完整。 Option Base 1 Private Sub Command1_Click() Dim a a=Array(678，45，324，528，439，387，87，875，273，823) For i=______ For j=______ If a(i)______a(j)Then a1=a(i) a(i)=a(j) a(j)=a1 End If Next j Next i For i=1 To 10 Print a(i) Next i End Sub
答案： a To 9 i+1 To 10 ＞=
填空题

为了实现鼠标自动拖放，必须把______属性设置为______；而为了执行手动拖放，必须把该属性设置为______。
答案： DragMode；1；0
填空题

在过程定义中出现的变量名叫做 参数，而在调用过程时传送给过程的常数、变量、表达式或数组叫做 参数。
答案： 形式 实际
填空题

算法复杂度主要包括时间复杂度和 复杂度。
答案： 空间
填空题

软件需求规格说明书应具有完整性、无歧义性、正确性、可验证性、可修改性等特性，其中最重要的是______。
答案： 无歧义性
填空题

如果存在如下过程： 　　Private Function FMax(a( )As Integer) 　　　Dim First As Integer，Last As Integer，i As Integer 　　　First=LBound(A) 　　　Last=UBound(A) 　　　Max=a(First) 　　　For i=First To Last 　　　　If a(i) ＞ Max Then Max=a(i) 　　　Next i 　　　FMax=Max 　　End Function 　　在窗体上添加一个命令按钮，然后编写如下事件过程： 　　Private Sub Command1 Click( ) 　　　　ReDim m(1 To 4) As Integer 　　　　m(1)=20：m(2)=30：m(3)=50：m(4)=100 　　　　c=FMax(m) 　　　　Print c 　　End Sub 　　单击命令按钮，其输出结果为　【12】　。
答案： 【12】100
填空题

下面程序运行后，单击命令按钮，输出的结果是 Private Sub Command1_Click() Dim a%(1 To 4)，b%(2 To 6)，i%，str1#，str2# For i=1 To 4 a(i)=i Next For i=2 To 6 b(i) =i Next str1 = YAG(a) str2 = YAG(b) Print "str1 ="; str1; "str2 ="; str2 End Sub Function YAG (a ( ) As Integer) Dim t#, i% t=1 For i = LBound(a) To UBound(a) t=t * a(i) Next YAG = t End Function
答案： [12]str1=24 str2=720
填空题

算法一般都可以用选择结构、循环结构和 结构组合而成。
答案： 顺序
微信扫码免费搜题