编写“字符提取”程序,实现如下功能:分别在文本框Text1中输入起始位置L文本框Text2中输入结束位置R(L≤R),单击“提取”按钮,若提取的字符串长度不足10个,则在文本框Text3中依次提取从起始位置至结束位置上的字符,并显示在标签 Label5中。若提取的字符串长度超过10个(包括10个),则标签Label5中只显示从起始位置开始的前10个字符,如提取的字符串为“abedefghijklm”,则显示结果为“abcdefghij”。程序运行界面如图所示。
(1)
根据程序运行界面及程序代码可知,当前窗体中添加的按钮对象的名称为 。
(2)
实现上述功能的VB程序如下,请在划线处填入合适的代码
Private Sub Command1 _Click( )
Dim As Integer, As Integer, temp As Integer i As Integer Dim c As String, s As String
L= Val (Text1. Text)
R= Val(Text2.Text)
If R-L <10 Then
temp =R
Else
temp= ①
End If
②
Do While i < = temp
c= ③
s=+c
i=1+1
Loop
Label5.Caption =s
End Sub
① ② ③
(3)
若在上图所示运行界面(原始内容含32个字符)的文本框Text1中输入30,文本框Text2中输入45,点击“提取”按钮后,标签Label5中显示的内容为。
答案: 【1】Command1
【1】L+9【2】i=L【3】Mid(Text3, i, 1)
【1】ds