当前位置: 高中信息技术 / 综合题
  • 1. (2019高二下·温州期末) “杨辉三角”问题,如图所示,其规律如下:其显著特征是除斜边上的1以外,其余数值均等于其肩部两数之和。编写VB程序,其功能如下:在文本框Text1中输入20以内的整数,点击“打印”按钮,在列表框list1中输出杨辉三角,程序界面如图所示,VB 程序代码如下。

    实现上述功能的VB程序如下,请回答下列问题:

    Private Sub Command1_Click()

    Dim a(20) As Long

    Dim i As Integer, j As Integer, s As String List1.Clear

    n = Val(Text1.Text)

    a(1) = 1

    List1.AddItem Str(a(1)) For i = 2 To n

        s = ""

        For j = Step -1  

            a(j) =    ①     

            s = s + Str(a(j))

        Next j

                       Next i

    1. (1) 代码“Private Sub Command1_Click()”中的 Command1_Click()属于 (单选,填字母: A .对象名/B .属性名/C .事件名/D .事件过程)。
    2. (2) 请在划线处填入合适的代码。

       ② 

    3. (3) 若将加框处代码改为“1 To i”,则 (选填:会/不会)影响程序结果。

微信扫码预览、分享更方便