有如下程序： Private Sub Command1_Click() as='A WORKER IS HERE' x = Len(a$) For i=1 To x - 1 b$ =Mid$(a$, i,3) If b$ ='WOR' Then S=S+ 1 Next Print S End Sub 单击命令按钮，程序运行结果为
D.5

未分类题窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End SubD.120

未分类题在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为M1。Form1标题为“myform1”, 双击控件数组中的第3个按钮，打开代码编辑器，写下如下代码： Private Sub M1_Click(Index As Integer) Form1.Caption ='myform. 2' End Sub 运行时，单击按钮数组中的第1个按钮，窗体标题为A.Form1B.M1C.myform1D.myform2

未分类题在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) c='ABCD' For n = 1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在 ______ 处应填入的内容为D.Mid(c,n,n)

单项选择题若串s1=“hello”，s2=“ world”，那么执行 strlen(strcat(s1,s2))后的结果是（ ）。 A、0 B、10 C、11 D、不确定

单项选择题线弹性材料拉杆,在截面B、C上分别作用有集中力F和2F。下列关于该杆应变能的说法正确的是( ) A、先加2F再加F时,杆的应变能最大 B、先加F再加2F时,杆的应变能最大 C、同时按比例加F和2F时,杆的应变能最大 D、按不同次序加F和2F时,杆的应变能一样大