题库 高中信息

题干

两个10 进制大整数相加可以用数组的方法逐位相加来实现,小王同学制作了如图的 VB 程序,以实现求2个50 位以内的10进制整数的和。

(1)根据程序代码,该事件过程名为____。
(2)把代码补充完整。
Private Sub Command1_Click()
Dim a(1 To 51) As Integer, b(1 To 51) As Integer, c(1 To 51) As Integer
Dim lens1 As String, lens2 As String
lens1 = Len(Text1.Text) :lens2 = Len(Text2.Text)
For i = Len(Text1.Text) To 1 Step -1   ‘读取数据,逐位保存在数组中
a(i) = Mid(Text1.Text, lens1 - i + 1, 1)
Next i
For i = Len(Text2.Text) To 1 Step -1
b(i) = Mid(Text2.Text, lens2 - i + 1, 1)
Next i
For i = 1 To 51    ‘从个位到高位逐位求和
c(i) =_______________ 
If c(i) > 9 Then
c(i) = c(i) - 10
c(i + 1)=__________________ 
End If
Next i
f = False  '从左到右输出第一个不为 0 的元素开始从高位到低位输出和 For i = 51 To 1 Step -1
If c(i) <> 0 Then f = True

If f

Then Text3.Text = Text3.Text & c(i)

Next i

End Sub
(3)第 14 题图中,为了使 Text1 和 Text2 文本框在 Form1 界面上能够左对齐,需要更改 Text1 的 Left 属性,则可以在 Form_Load()中添加代码 Text1.Left=__________
上一题 下一题 0.99难度 填空题 更新时间:2019-04-15 08:55:15

答案(点此获取答案解析)

相关知识点