如下图所示,在Visual Basic工程设计中,要在命令按钮command1中显示“确定”,则下列操作正确的是( )


A.在Text属性值中输入“确定” |
B.在Caption属性值中输入“确定” |
C.在Font属性值中输入“确定” |
D.在Name属性值中输入“确定” |
能得到一个大于等于20且小于50随机整数的VB表达式是( )
A.Int(rnd*50)-20 |
B.Int(rnd*30+20) |
C.Int(rnd*31+20) |
D.Int(rnd*30)+1 |
在VB中,表示代数式
的表达式是

A.2*a+4*b^2/a+b | B.2*a+4*b^2/(a+b) |
C.(2*a+4*b^2)/a+b | D.(2*a+4*b^2)/(a十b) |
编写VB程序,实现如下功能:在文本框Text1中输入某一年份,单击“天干地支与生肖”按钮Command1,在列表框List1中输出该年份开始的12个年份及对应的“天干地支”与“生肖”,运行界面如图所示,程序代码如下。

(1)代码“Private Sub Command1_Click()”中的Click是 (单选,填字母:A、对象名 B、属性名 C、事件名)
(2)为实现上述功能,请在划线处填入合适代码。
Private Sub Command1_Click()
Dim a As Integer, b As Integer
Dim i As Integer, n As Integer
Dim c1 As String, s1 As String
Dim c2 As String, s2 As String
Dim c3 As String, s3 As String
List1.Clear
s1 = "甲乙丙丁戊己庚辛任癸"
s2 = "子丑寅卯辰巳午未申酉戌亥"
s3 = "鼠牛虎兔龙蛇马羊猴鸡狗猪"
n = Val(Text1.Text)
For i =" n" To
a =" (i" + 6) Mod 10
b =" (i" + 8) Mod 10
c1 =" Mid(s1," a + 1, 1)
c2 =" Mid(s2," b + 1, 1)
c3 =" Mid(s3," b + 1, 1)
List1.AddItem + "年 " + c1 + c2 + " " + c3
Next i
End Sub
(3)由上述算法可知,2024年对应的“天干地支”为 ,“生肖”是 。

(1)代码“Private Sub Command1_Click()”中的Click是 (单选,填字母:A、对象名 B、属性名 C、事件名)
(2)为实现上述功能,请在划线处填入合适代码。
Private Sub Command1_Click()
Dim a As Integer, b As Integer
Dim i As Integer, n As Integer
Dim c1 As String, s1 As String
Dim c2 As String, s2 As String
Dim c3 As String, s3 As String
List1.Clear
s1 = "甲乙丙丁戊己庚辛任癸"
s2 = "子丑寅卯辰巳午未申酉戌亥"
s3 = "鼠牛虎兔龙蛇马羊猴鸡狗猪"
n = Val(Text1.Text)
For i =" n" To
a =" (i" + 6) Mod 10
b =" (i" + 8) Mod 10
c1 =" Mid(s1," a + 1, 1)
c2 =" Mid(s2," b + 1, 1)
c3 =" Mid(s3," b + 1, 1)
List1.AddItem + "年 " + c1 + c2 + " " + c3
Next i
End Sub
(3)由上述算法可知,2024年对应的“天干地支”为 ,“生肖”是 。
下列表达式中值最大的是()
A.Abs( -5) +Len("ABCDE") |
B.val((Mid("SHANG2016HAI",6,2)) |
C.Int(2*sqr(36) +0.5)/3 |
D.5^2 Mod 25 \ 2^2 |
在Visual Basic代码中,语句 Mytxt1.Text="kaikai" 中的 Text 是()。
A.对象名 | B.事件名 | C.属性名 | D.属性值 |
在Visual Basic中,下列属于字符串的是()。
A.Val("100") | B."int(100)" | C.sqr(100) | D.1/2^3 |