软件测试的主要和重要的测试方法是通过测试数据和【 】的设计来实现。
第1题
在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Commandl和Label1,通过属性窗口把列表框中的项目设置为:“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数,运行情况如图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序,请填空。 Pfivme Sub Command1_Click( ) If List1.List1ndex>=【 】Then List1.Removehem【 】 Label1.Caption=【 】 Else MsgBox“请选择要删除的项目”
End If End Sub
请帮忙给出正确答案和分析,谢谢!
第2题
在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1),然后编写如下几个事件过程: Private Sub Form_Load( ) Timer1.Enabled=False Timer1.Interval=【 】 End Sub Private Sub Form_Click( ) Timer1.Enabled=【 】 End Sub Private Sub Timer1_Timer( ) Label1.Caption=【 】 End Sub 程序运行后,单击窗体,将在标签中显示当前时间,每隔1秒钟变换一次(见图)。请填空。
请帮忙给出正确答案和分析,谢谢!
第3题
以下程序的功能是:把当前目录下的顺序文件smtextl.txt的内容读入内存,并在文本框Texd中显示出来。请填空。 Pfivme Sub Commandl_Click( ) Dim inData As String Textl.Text ="" Open".\smtextl.txt"【 】As1 Do While【 】 Input1,in Data Text1.Text=Text1.Text&inData Loop Close1 End Sub
请帮忙给出正确答案和分析,谢谢!
第4题
设有程序: Option Base 1 Pfivme Sub Command1_Click( ) Dim arr1,Max as Integer arr1=Array(12,435,76,24,78,54,866,43) 【 】=arr1(1) For i=1 To 8 If arr1(i)>MaxThen【 】 Next i Print"最大值是:";Max End Sub 以上程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中元素的最大值。请填空。
请帮忙给出正确答案和分析,谢谢!
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!