【正确答案】正确答案：审题分析 本题可通过Select Case语句对组合框的Text属性返回值逐一进行判断，并根据Text属性值不同，分别进行相应运算。为实现“第4位截去”的功能，可将运算值乘以1000后取整，再除以1000。 操作步骤 步骤1：打开考生文件夹中的工程文件sjt3．vbp，依次选中窗体中的两个文本框，将其Alignment属性值设置为1-Right Justify。 步骤2：双击窗体中的“计算”命令按钮，在打开的代码编辑窗口中编写其单击事件过程。 参考代码： Private Sub Command1_Click() Const PI=3．14159 Select Ca se Combo1．Text Case "sin"：a=Sin(CInt(Text1．Text)*PI／180) Case"cos"：a=Cos(CInt(Text1．Text)*PI／180) End Select Text2=Int(a*1000)／1000 End Sub 步骤3：按＜F5＞键运行程序，在左侧文本框中输入“40”，选择不同选项，单击“计算”按钮。 步骤4：单击窗体右上角的关闭按钮以结束程序。 步骤5：按要求将文件保存至考生文件夹中。 考点链接 多分支结构、常用内部函数。