题目

找英文单词并统计每个单词的字母数量设计一个VB程序,程序实现功能如下:在文本框Text1中输入文章信息,点击“统计”按钮Command1,依次在列表框List1 中显示连续的字符,最后一行显示每个连续字母的数量,数字之间用“,”隔开。 程序界面如图所示,实现上述功能的VB代码如下,请回答下列问题: (1) 代码中的AddItem属于( 单选,填字母:A .属性名/B .方法名/C .对象名)。 (2) 请在划线处填上合适的代码。 Private Sub Command1_Click()     Dim s As String, ans As String     Dim ch As String, n As Integer     Dim i As Integer     s= Text1.Text     ans =““: n=0     For i=1 To Len(s)                 If ch>= "A" And ch<= "Z" Or ch>>="a" And ch<=" z" Then             n=n+1         ElseIf n > 0 Then             ans=ans+Str(n) + ","             List1.AddItem             n=0         End If     Next i     List1.AddItem"连续字母的数量依次为:"+ans End Sub (3) 若在文本框Text1中输入的内容为“Summer vacation is comming”(不带双引号),运行程序后,ans的值为。 答案: 【1】B 【1】ch= Mid(s, i, 1)【2】Mid(s, i- n, n) 【1】6,8,2
信息技术 试题推荐
最近更新