《VB程序设计》实验单元一.docx

《VB程序设计》实验单元一 实验报告 专业班级： 姓名 学号 指导教师： 王自强 完成时间： 2015年3月21日星期六 实验 一VB环境和可视化编程基础 实验目的 1 了解Visual Basic的安装 2 掌握启动与退出Visual Basic 3 掌握建立、编辑和运行一个简单应用程序的全过程 4 掌握基本控件的使用 二、实验环境 VB6.0 三、实验内容 1、编写一程序，在文本框中统计在该窗口上鼠标单击的次数。 提示：对窗口编写两个事件：Form_Load事件对文本框初值设为空；Form_Click事件对文本框计数。 对文本框计数：Text1=Val(text1)+1 。 四、实验步骤 1、绘制Label1的caption输入“你单击窗体的次数：” 2、绘制text。编程为： Private Sub Form_Click() Text1.Text = Val(Text1.Text) + 1 End Sub Private Sub Form_Load() Text1.Text = End Sub 3、text的font size设置为“一号” 五、实验结果 《VB程序设计》实验单元一 实验报告 专业班级： 网媒1403班 姓名 凌紫怡 学号 201424050320 指导教师： 王自强 完成时间： 2015年3月21日星期六 实验 一VB环境和可视化编程基础 实验目的 1 了解Visual Basic的安装 2 掌握启动与退出Visual Basic 3 掌握建立、编辑和运行一个简单应用程序的全过程 4 掌握基本控件的使用 二、实验环境 VB6.0 三、实验内容 2、命令按钮、字号、内容和格式的复制练习。 按钮1：使得Text1中的文本按要求改变。 按钮2：将Text1中选定的文本复制到Text2. 控件名属性Form1Caption=”实验2”Label1复制文本Label2输入文本Text1Text=“VB功能强大，但要下功夫学习才能学好。”Text2Text=””Command1Caption=”隶书25磅”Command2Caption=”复制=”四、实验步骤 1、label1的caption输入“复制效果”；label2的caption输入“输入文本”。 2、绘制两个text。 Private Sub Text1_Click() Text1.Text = VB功能强大，但要下功夫学习才能学好。 End Sub Private Sub Text2_click() Text2.Text = End Sub 3、以及两个Command。Command1的caption输入“隶书25磅”；Command2的caption输入“复制=”。 Private Sub Command1_Click() Text1.FontName = 隶书 Text1.FontSize = 25 End Sub Private Sub Command2_Click() Text2.Text = Text1.SelText Text2.FontName = Text1.FontName Text2.FontSize = Text1.FontSize End Sub 五、实验结果 实验二 VB语言基础和顺序结构 一 、实验目的 1、掌握正确书写表达式、赋值语句的规则 2、掌握常用函数的使用 3、掌握InputBox与MsgBox的使用 4、掌握P