郑州大学vb实验报告册答案.docxVIP

郑州大学vb实验报告册答案 　　郑州大学VB实验报告书参考答案。。以下内容均来自百度文库，所以仅供参考。。　　不过经亲自测试习题及实验的答案基本正确，除了实验题的3，4小题没有改字形字体颜色什么的。。　　实验一　　一、选择题　　DDBAB,C(CD)DDC,ADDCA　　二、填空题　　Windows　　中断　　工具箱　　代码　　分类　　有语法错误　　错误　　事件　　结构化　　文件名和结构　　工程　　编写代码　　双击任意控件或右健快捷菜单选“代码窗口”　　vb的安装文件夹　　属性　　方法　　font　　load　　对象　　三、编程　　1-1　　PrivateSubCommand1_Click()　　PrintSqr(8),8^(1/3)　　EndSub　　1-2　　PrivateSubCommand2_Click()　　Fori=100To110　　PrintSqr(i)　　Nexti　　EndSub　　1-3　　PrivateSubCommand3_Click()　　Print郑州大学在前进!　　EndSub　　1-4　　PrivateSubCommand4_Click()　　Label1=蓝天、白云、绿水、青山　　EndSub　　实验二　　一　　BCBCC,CBBDA,CCCBA,CBDCC　　二　　form_click()　　interval,5000　　vbp,frm　　top,left,height,width,像素　　picture　　load　　locked　　font,alignment　　gotfocus,lostfocus　　属性窗口，代码　　三　　2-1　　PrivateSubCommand1_Click()　　Label3=Text1*Text2　　EndSub　　PrivateSubCommand2_Click()　　Label3=Text1/Text2　　EndSub　　2-2　　PrivateSubCommand1_Click()　　=True　　Picture1=LoadPicture(C:\DocumentsandSettings\AllUsers\Documents\MyPictures\示例图片\Water)　　EndSub　　PrivateSubCommand2_Click()　　=True　　Picture1=LoadPicture(C:\DocumentsandSettings\AllUsers\Documents\MyPictures\示例图片\)　　EndSub　　PrivateSubCommand3_Click()　　=False　　EndSub　　2-3　　PrivateSubCommand1_Click()　　Label3=Text1*Text2　　EndSub　　2-4　　PrivateSubCommand1_Click()　　Text2=Text1　　EndSub　　PrivateSubCommand2_Click()　　Text1=　　Text2=　　EndSub　　PrivateSubText1_Change()　　=True　　=True　　EndSub　　2-5　　PrivateSubCommand1_Click()　　=500　　EndSub　　PrivateSubCommand2_Click()　　=0　　EndSub　　PrivateSubTimer1_Timer()　　=Int(Rnd*(-))=Int(Rnd*(-))EndSub　　实验三　　一　　郑州大学VB实验报告书参考答案以下内容均来自百度文库，所以仅供参考。。　　不过经亲自测试习题及实验的答案基本正确，除了实验题的3，4小题没有改字形字体颜色什么的。。　　实验一　　一、选择题　　DDBAB,C(CD)DDC,ADDCA　　二、填空题　　Windows　　中断　　工具箱　　代码　　分类　　有语法错误　　错误　　事件　　结构化　　文件名和结构　　工程　　编写代码　　双击任意控件或右健快捷菜单选“代码窗口”　　vb的安装文件夹　　属性　　方法　　font　　load　　对象　　三、编程　　1-1　　PrivateSubCommand1_Click()　　PrintSqr(8),8^(1/3)　　EndSub　　1-2　　PrivateSubCommand2_Click()　　Fori=100To110　　PrintSqr(i)