问答题
在考生目录下有一个工程文件sjt4.vbp，及窗体文件sjt4.frm，该程序是不完整的，请根据下面的描述，编写Select分支结构的Case语句部分，以满足题目的要求。注意：不得增行或减行，也不能更改程序的结构。存盘时不得改变文件名和文件夹。
本题捕述如下：在窗体Form1上有6个标签、6个文本框以及1个控制按钮。标签、文本框和控制按钮都使用默认的Name属性，标签与控制按钮的标题如下图所示。窗体上所有控件的属性都在程序代码中设置。本程序运行时使用随机数模拟掷骰子(六面，分别为1点、2点、3点、4点、5点、6点)计算出现1点、2点、3点、4点、5点、6点朝上的概率。
本题捕述如下：在窗体Form1上有6个标签、6个文本框以及1个控制按钮。标签、文本框和控制按钮都使用默认的Name属性，标签与控制按钮的标题如下图所示。窗体上所有控件的属性都在程序代码中设置。本程序运行时使用随机数模拟掷骰子(六面，分别为1点、2点、3点、4点、5点、6点)计算出现1点、2点、3点、4点、5点、6点朝上的概率。
【正确答案】第一步：启动Visual Basic，打开考生文件夹下的工程文件T502.vbp。
第二步：双击窗体的任何部分，进入程序编写窗口，补充Select语句中的程序如下：
1 Case 1
2 n1=n1+1
3 Me.Text1.Text.= Format(n1/n."0.00")
4 Case 2
5 n2=n2+1
6 Me.Text2.Text=Format(n2/n，"0.00")
7 Case 3
8 n3=n3+1
9 Me.Text3.Text= Format(n3/n．"0.00")
10 Case 4
11 n4=n4+1
12 Me.Text4.Text= Format(n4/n，"0.00")
13 Case 5
14 n5=n5+1
15 Me.Text5.Text=Format(n5/n，"0.00")
16 Case 6
17 n6=n6+1
18 Me.Text6.Text=Format (n6/n，"0.00")
笫三步：补充完毕，调试程序，确定正确后，将工程与窗体以原文件名保存在考生文件夹下。
第二步：双击窗体的任何部分，进入程序编写窗口，补充Select语句中的程序如下：
1 Case 1
2 n1=n1+1
3 Me.Text1.Text.= Format(n1/n."0.00")
4 Case 2
5 n2=n2+1
6 Me.Text2.Text=Format(n2/n，"0.00")
7 Case 3
8 n3=n3+1
9 Me.Text3.Text= Format(n3/n．"0.00")
10 Case 4
11 n4=n4+1
12 Me.Text4.Text= Format(n4/n，"0.00")
13 Case 5
14 n5=n5+1
15 Me.Text5.Text=Format(n5/n，"0.00")
16 Case 6
17 n6=n6+1
18 Me.Text6.Text=Format (n6/n，"0.00")
笫三步：补充完毕，调试程序，确定正确后，将工程与窗体以原文件名保存在考生文件夹下。
【答案解析】[解析] 本题主要考查了Select Case语句的使用。本题中，由于有六种情况，故Case语句中共有六个分支，对应不同的六面。Format( )函数用以返回指定格式的字符串。0表示一个数字位，多余的位以0补齐；小数点与0结合使用，可以放在显示区段的任何位置，根据格式字符串的位置，小数部分多余的数字按四舍五入处理。