VB试验答案.doc

实验报告参考答案（本部） 实验一 VB6.0集成开发环境 实验内容（3）： 四、设计流程 ①界面设计：在窗体上画一个标签。 ②属性设置：标签的width设为2000，height设为500。显示“Visual Basic语言程序设计”是将caption设为“Visual Basic语言程序设计”，居中是将Alignment设为2－Center。标签具有边框是将其BordStyle属性设为1。 ③代码设计：无 五、关键代码（注意：解题方法有多种，其它方法只要能完成实验任务也是正确的） 无 六、调试和测试结果 至少要写测试结果正确，如果写了调试中出现的典型问题及解决方法，分数给高些 实验二 设计简单的VB应用程序 实验内容（1）中改变标签字体的颜色为红色是将其forecolor属性设置为红色。 实验内容（3）： 四、设计流程 ①界面设计：窗体上画一个命令按钮 ②属性设置：命令按钮属性设置如下：名称（Name）为C1,caption 为“显示”，Visible为false. ③代码设计：需要在2个事件Form_Click和C1_Click中编程。其中“命令按钮出现”需要将命令按钮的Visible属性设为True,要在窗体上显示“VB欢迎您”则需要利用窗体的Print方法。 五、关键代码（注意：解题方法有多种，其它方法只要能完成实验任务也是正确的） Private Sub Form_Click() C1.Visible=True End Sub Private Sub C1_Click() Print “VB欢迎您” End Sub 实验内容（4）： 四、设计流程 ①界面设计：在窗体上画一个标签、一个命令按钮。 ②属性设置：固定边框是将标签的BordStyle属性设为1，背景透明是将其BackStyle属性设为0。 ③代码设计：分别在3个事件过程form_load()，form_click(),Cmd1_click()中编程。其中图片直接使用计算机中的图片或从网上下载，与工程文件、窗体文件放置在同一目录，代码中省略路径或使用相对路径app.path。 五、关键代码（注意：解题方法有多种，其它方法只要能完成实验任务也是正确的） Private Sub Form_Load() Form1.Picture = LoadPicture(App.Path + \tu.jpg) Form1.Caption = 我的变化 End Sub Private Sub Form_Click() LBL1.Top = 0 LBL1.Left = 0 End Sub Private Sub Cmd1_Click() Cmd1.Height = 1500 Cmd1.Width = 2000 End Sub 六、调试和测试结果 至少要写测试结果正确，如果写了调试中出现的典型问题及解决方法，分数给高些 实验3 数据类型及其运算 四、设计流程 ①界面设计：在窗体上画1个文本框、1个标签、6个命令按钮。 ②属性设置：文本框将text属性清空，标签及6个命令按钮设置“标题”属性。 ③代码设计：分别在6个命令按钮的单击事件过程中编程。其中ctan命令按钮利用tan函数并的倒数。 保存运行：选择“文件|保存”命令。保存窗体文件时，文件类型为“*.frm”，在文件名框中输入：“sjt2”；保存工程文件时，文件类型为“*.vbp”，在文件名框中输入：“sjt2”。 五、关键代码（注意：解题方法有多种，其它方法只要能完成实验任务也是正确的） Const pi = 3.14159 Dim a! Private Sub CMD1_Click() a = pi * Val(Text1.Text) / 180 LBL2.Caption = Sin(a) End Sub Private Sub CMD2_Click() LBL2.Caption = Cos(a) End Sub Private Sub CMD3_Click() LBL2.Caption = Tan(a) End Sub Private Sub CMD4_Click() LBL2.Caption = 1 / Tan(a) End Sub Private Sub CMD5_Click() Text1.Text = LBL2.Caption = End Sub Private Sub CMD6_Click() End End Sub 六、调试和测试结果 至少要写测试结果正确，如果写了调试中出现的典型问题及解决方法，分数给高些 实验4 数据的输入与输出 四、设计流程 ①界面设计：在窗体上画1个命令按钮。 ②属性设置：设置命令按钮