“如果a，b，c相等，那么y＝a＋b＋c”，能实现该功能的VB语句是A．Ifa=bAndb=cTheny=a+b+cB．Ifa=b=cTheny=a+b+cC．_刷题宝

题干

“如果a，b，c相等，那么y＝a＋b＋c”，能实现该功能的VB语句是

A．If a=b And b=c Then y=a+b+c

B．If a=b=c Then y=a+b+c

C．If a＝b Or b=c Or a=c Then y=a+b+c

D．Ifa－b＝b－c Then y=a+b+c

上一题下一题 0.99难度选择题更新时间:2019-11-20 12:47:26

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

同类题1

下列语句中的等于“=”作用与其他选项不同的是（）

A．if a ="0" then	B． do while x=0
C． for x=0 to 5	D． if n mod 3="0" then

同类题2

以下表达式中，是关系表达式的有（）

A．int(457/100) *10)	B．213 mod 10
C．if not(4<>4)	D．5>3

同类题3

在VB中，设x=389，能得到其百位数字“3”的正确表达式是_______。

A．Int(x/10)*10

B．Int(x/100)*100

D．x-Int(x/10)*10

同类题4

有如下VB程序段：

数组a各元素的初值为0，执行上述程序段后，文本框Text 1中输出的内容为

同类题5

下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是（1），文本框Text2中显示的内容是____（2）。
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0:" n = 10
For i =" 1" To n
If n Mod i =" 0" Then c =" c" + 1
Next i
Text1.Text = Str(n)
Text2.Text = Str(c)
End Sub

相关知识点