※声明:
1.
实验所属课本原件为《Visual Basic程序设计教程(第4版) (□主编 龚沛曾 □编者 杨志强 陆慰民 谢步瀛)》 ;
2. 3. 4.
实验答案代码采用红色字体突出 ;
仅提供课本前七个实验的代码,之后的实验上课考试均不涉及故不作 ;
教学平台上机实验、课本篇后实验,两者题目操作略有差异,作业以前者要求为准,故以下答案代码为前者代码,如对后者代码有所需求请私信 ;
5. 6. 7.
本文为作者原创,复制转载请注明出处 ;
如果对代码有所疑问,或者略感繁琐想直接要已完成实验,请私信 ; 浏览、复制、下载后请给作者一个合理的评价,感激不尽 。
实验1-1
编制简单的欢迎界面程序。
要求:在屏幕上显示“欢迎学习Visual Basic”;在文本框Text1中输入姓名;单击命令按钮“你输入的姓名是”,在Label3标签显示在文本框中输入的姓名。
“学号-1-1.frm”和“学号-1-1.vbp”文件名保存。以后每个实验项目的命名规则都是如此,即“学号-实验号-实验题目”“”和“”) 图2.1.1 实验1.1运行界面
提示: 表2.1.1 属 性 设 置 控件名 Label1 属 性 Caption=\欢迎学习Visual Basic\;Font属性:字号为二号,字体为隶书,Aligment=2(居中) Label2 Caption=\请输入你的姓名\;Font属性:字体为楷体,有下划线 Label3 Text1 Command1 Caption=\,BorderStyle=1 Text=\ Caption=\你输入的姓名是\ (2) “欢迎学习Visual Basic”要在两行显示,只要将Label1控件的宽度缩小一些。 Private Sub Command1_Click() Label3.Caption = Text1.Text End Sub
实验1-2
模仿教学篇例1.1,将事件过程中的自上而下移动改为自右向左移动,同时考虑
文字超出窗体边界的情况。各个控件及属性窗口的设置见表2.1.2,背景图形文件可以选择自己喜欢的,按钮上的图标可通过Windows搜索功能查找。以“学号-1-2”为项目名保存。 表2.1.2 属 性 设 置 控件名 Form1 Label1 Command1 属 性 Caption=\实验1.2\;Picture:选择自己喜欢的图片 Caption=\我开始学习程序设计\;FontSize=36;BackStyle=0 Caption=\;Style=1;Picture=\;ToolTipText=\自动\ Command2 Caption=\;Style=1;Picture=\;ToolTipText=\手动\ Timer1 Interval=0 注:因为印刷错误,例题1.1中两个命令按钮的图形与事件过程代码不一致,需要调整。 提示: 自定义事件过程MyMove代码应调整为,可实现文字移动方向的改变 Sub MyMove() Label1.Move Label1.Left - 50, Label1.Top