题目

给出用等号连接的两个整数,如“222 = 24”,让你在左边的整数中间某个位置插入一个加号,看有没有可能让等式成立。以上面的式子为例,可以写成2+22=24和22+2=24两种答案。现设计一个程序,实现该算法,程序运行界面如图所示。 (1) 标题要显示“趣味数学”,需修改窗体的(选填:Caption、Name、Text)属性。 (2) 实现上述功能的VB程序如下,请在程序划线处填入合适代码。 Private Sub Command1_Click() Dim s As String, s1 As String, s2 As String Dim c As Integer, k As Integer, i As Integer, flag As Boolean flag = False: c = 0 s = Text1.Text For i = 1 To Len(s)  If Mid(s, i, 1) = “=”Then Exit For Next i s2 = Mid(s,i+1,Len(s)- i) k = Len(s1) For i = 1 To k-1  If Val(Mid(s1, 1, i))+Val(Mid(s1, i + 1, k-i))=Val(s2) Then   List1.AddItem “第”+Str (c)+“种答案:”+Mid(s, 1, i)+“+”+Mid(s, i + 1, Len (s)-i)   flag = True  End If Next i IfThen List1.AddItem “没有答案!” End Sub 答案: 【1】Caption 【1】s1 = Mid(s, 1, i - 1)【2】c=c+1【3】Not flag 或 flag=False
信息技术 试题推荐
最近更新