VB期末试题2(内蒙古师范大学).pdf

要求：编程，输入圆的半径，计算并输出圆的面积，按下列要求分别实现： （1）在打开的工程的Form1窗体中设计如图1所示的界面 （2）创建一个文本框控件用于输入，创建一个标签控件显示计算结果， 创建一个命令按钮控件单击命令按钮后将结果显示在标签里，将命令按钮的 Caption属性设置为按文本框计算 （3）在窗体中创建一个命令按钮，Caption属性为按输入框计算 单击此命令按钮后，调用Inputbox函数输入数据，通过标签控件显示计算结果。 要求本命令按钮执行的结果需要小数点后15位有效位数， 圆周率15位：3.141592653589793 【窗体属性评分】 【窗体】Form1.frm 标准答案：Caption 计算出圆的面积 Caption Form1 【控件】VB.CommandButton_ 标准答案：Caption 按文本框计算 Caption 【控件】VB.CommandButton_ 标准答案：Caption 按输入框计算 Caption 【事件评分】 【事件】Private Sub Command2_Click() 标准答案： InputBox 【事件评分】 【事件】Private Sub Command1_Click() 标准答案： Label1.Caption 【控件】VB.TextBox_ 标准答案：Name Text1 Name 【控件】VB.Label_ 标准答案：Name Label1 Name 注意：不能使用缺省属性 在窗体上建立一个二级菜单，该菜单含有文件和帮助 （名称分别为vbFile和vbHelp） 两个主菜单项，其中文件菜单包括打开、关闭和退出三个子菜单项 （名称分别为vbOpen、vbClose和vbExit），如图所示。只建立菜单，不必定义其事件过程。 【控件】VB.Menu_ 标准答案：Name vbFile Name 【控件】VB.Menu_ 标准答案：Caption 文件 Caption 【控件】VB.Menu_ 标准答案：Name vbOpen Name 【控件】VB.Menu_ 标准答案：Caption 打开 Caption 【控件】VB.Menu_ 标准答案：Name vbClose Name 【控件】VB.Menu_ 标准答案：Caption 关闭 Caption 【控件】VB.Menu_ 标准答案：Name vbExit Name 注意：不能使用缺省属性 在名为Form1的窗体上画一个框架，名称为Frm1，标题为框架，高度为2500，宽度为4000， 框架内建立一文本框，距左边框600，距框架的上边框1200，文本框中的初始内容设置为文本框， 如图所示。 注意：完成试题后，必须保存，然后关闭窗口。 【控件】VB.Frame_ 标准答案：Name Frm1 Name 【控件】VB.Frame_ 标准答案：Height 2500 Height 【控件】VB.Frame_ 标准答案：Width 4000 Width 【控件】VB.TextBox_ 标准答案：Left 600 Left 【控件】VB.TextBox_ 标准答案：Text 文本框 Text 【控件】VB.TextBox_ 标准答案：Top 1200 Top 注意：不能使用缺省属性 在名称为Form1的窗体上建立一个名称为List1的列表框。 要求：在程序运行后，通过Form_Load()事件过程加载窗体时，执行语句List1.AddItem AAA， 每当单击某个列表项时，都执行语句List1.AddItem List1.Text一次，如图所示。 【事件评分】 【事件】Private Sub Form_Load() 标准答案： List1.AddItem AAA 【事件评分】 【事件】Private Sub List1_Click() 标准答案： List1.AddItem List1.Text 注意：不能使用缺省属性