写出下列程序的输出结果PrivateSubCommand1_Click()DimaAsStringDimcAsStringa="zhejiangxiaoshi"_刷题宝

题干

写出下列程序的输出结果
Private Sub Command1_Click()
Dim a As String
Dim c As String
a = "zhejiangxiaoshi"
c =" Mid(a," Len(a) \ 2 + 2, 7)
Text1.Text = c
End Sub
该程序段运行后，在文本框Text1上显示的是( )

A．"xiaoshi"

B．"zhejiang"

C．zhejiang

D．xiaoshi

上一题下一题 0.99难度选择题更新时间:2016-01-21 08:12:20

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

同类题1

为了给x,y,z三个变量赋初值1，下面正确的赋值语句是( )

B．x=1,y=1,z=1

D．x=1∶y=1∶z=1

同类题2

已知t=55.8，s=64，m=-81，则下列Visual Basic表达式的值为False的是（）

A．t < abs（m）and int（t）+8 >= s	B．int（m）> s or t < abs（m）
C．sqr（s）+ t < abs（m）	D．t > s + m

同类题3

Sub test2()
a = 12：b = 12：c = 5
Label1.Caption = ""
Label2.Caption = ""
If a > b Or Not b<c Then
Label1.Caption = "monday"
Else
Label2.Caption = "tiger"
End If
Label3.Caption =" Label1.Caption+" Label2.Caption
End sub
该程序段运行后，在标签Label3的Caption属性值是( )

C．"mondaytiger"

同类题4

在VB语言中，除了赋值语句具有计算功能外，（）也具有计算功能。

A．inputbox（）

同类题5

窗体上有标签LABEL1,有两个命令按钮，COMMAND1的标题是“变大”，COMMAND2的标题是“变小”。单击“变大”按钮，LABEL1中的字变大一倍，单击“变小”按钮，LABEL1中的字变小一倍。
PRIVATE   SUB   COMMAND1-CLICK(   )
________
END   SUB
PRIVATE   SUB   COMMAND2-CLICK(   )
________
END SUB

相关知识点