电大VisualBasic程序设计作业答案.doc

Visual Basic程序设计作业1 一、选择题 1．D 2．B 3．C 4．C 5．B 6．D 7．A 8．B 9．A 10．C 11．C 12．C 13．B 14．D 15．A 二、填空题 1．视图 工具箱 2．对象 事件 3．.vbp .frm 4．窗体 控件 菜单 5．完成某种特定的功能 对象名.方法名 Form1.Show 6．Multiline True 7．4000 8．AutoSize True 9．窗体布局窗口 10．txtshow.text=GOOD WORK！ 11．Click()、frm1.show 12．单击 双击 装载 多 响应某个事件后所执行的程序代玛 cmd1 Click 13．完成某种特定的功能 对象名.方法名 Form1.Show 14．工具 选项 选项 自动语法检测 15．Timer Interval ms 三、问答题 1．参考答案 答：可视化编程是目前最直观的编程方法，Visual一词表示它。之所以叫做可视，。Windows应用程序开发工具。 在中引入了控件的概念，每个控件都有若干方法属性来控制控件的外观。，随意点几下鼠标，一个按钮就完成了，也可由代码间接引发（例如当代码装载其他窗体时产生的Load事件nd语句或单击“结束”按钮停止程序的运行。 四、程序设计题 1． Private Sub Form_Load() Text1.Text = VB程序设计 Text1.FontSize = 16 End Sub Private Sub Command1_Click() Text1.Visible = False End Sub Private Sub Command2_Click() Text1.Visible = True End Sub 2． Private Sub Command1_Click() Text1.Text = Text2. Text = [Text3.Text = End Sub Private Sub Command2_Click() If Text1 Text = Or Text2.Text = Or Text3.Text = Then MsgBox 成绩输入不全！ Else Text4.Text = (Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text)) /3 End If Sub End Private Sub Command3_Click() Unload Me End Sub 3． Private Sub Command1_Click() If Text1.Text = Then MsgBox 至少要输出单价！ Text1.SetFocus Exit Sub End If If Text2.Text = Then Text2.Text = 1 If Text3.Text = Then Text3.Text = 1 Text4.Text = Text1.Text * Text2.Text * Text3.Text End Sub 电大天堂【Visual Basic程序设计】作业2 一、选择题 1．B 2．C 3．D 4．B 5．D 6．A 7．B 8．C 9．A 10．D 11．C 12．B 13．D 14．C 15．A 16．B 17．C 18．B 19．D 20．B 二、填空题 1．下拉式菜单 弹出式菜单 2．打开 另存为 颜色 字体 打印 3．文本框 列表框 4．Option Base 1 5．Call语句 6．工程 工程属性 通用 Form1.Show 7．0 8．Sub过程的过程名不能返回值，而Function过程能通过过程名返回值 9．窗体模块 标准模块 类模块 10．移出内存 无效状态 11．（1）2*Cos?*Sin?/(2*?) (2) Sqr(s*(s-a)*(s-b)*(s-c)) (3) Si