浙江信息技术学考VB部分
在Visual Basic中,赋值语句busno=”浙DV6882”中的”浙DV6882”是( )
下列能表示“x与y都小于5”的Visual Basic逻辑表达式是( )
某Visual Basic程序如下: Private Sub Command1_Click() Dim a as single, b as single, c as single A=1 B=5 C=sqr(a-b) Text1.text=str( c ) End sub
运行程序,单击命令按钮Command1后弹出如图2-1-23所示的出错信息提示,此时程序正执行的语句是( )
下列VB程序运行时,单击命令按钮Command1后,文本框Text1中显示的内容是 _______,文本框Text2中显示的内容是_________。 Private Sub Command1_Click( ) Dim a(1 To 5) As Long,I As Integer a(1)=1 For i=2 To 5 a(i)=a(i-1)*i Next i Text1.Text=Str(a(2)) Text2.Text=Str(a(5)) End Sub
下列VB程序运行时,单击命令按钮Command1后,文本框Text1中显示的内容是 ( ),文本框Text2中显示的内容是 ( ) 。 Private Sub Command1_Click( ) Dim a(1 To 10) As Integer, i As Integer,s As Integer For i=1 To 10 a(i)=2*i Next i Text1.Text=Str(a(10)) s=0 For i=1 To 5 s=s+a(i) Next i Text2.Text=Str(s) End Sub
购买评价 (6.0)分