1、6-1期中练习试卷一、选择题1. Visual Basic 中的数据也可以以十六进制或八进制表示，八进制数据以_符号开头。A. $E B. $H C. p; nEnd Sub11. 运行下面的程序，单击窗体，在输入框中输入 20，在窗体上显示的内容为_（12）_。Private Sub Form_Click()Dim N As Integer, S As String, R As StringN = InputBox(“输入一个整数“)Do While N 0M = N_（21）_R = M Mod NLoopPrint “最大公约数为:“; NEnd Sub19. 以下是用级数展开法求 ex
2、 的值。（n=1,2,3,）.!.!321nxex计算到第 n 项的值小于 10-5 时为止，界面如图所示。请完善程序。Private Sub Command1_Click()Dim n As Integer, t As Single, s As Single, y As Single6-6n = 0t = 1s = 1y = 1x = Text1.TextDon = n + 1t = x n_（22）_y = y + t / sLoop Until _（23）_Text2.Text = yEnd Sub三、编程题在文本框（Text1）中输入一个整数 N（在 36 之间） ，然后随机生成一个 N 位的整数显示在文本框 Text2 中；并判断此数是否为降序数，若为降序数，则在文本框 Text3 中显示“此数是降序数” ，否则显示“此数不是降序数” 。程序界面如图所示，请写出按钮的事件过程代码。所谓降序数是指一个数的各数位上的数字从高位到低位是递减的，如6543、9844 等。
