在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim num As Integer
num = 1
Do Until num > 9
Print num;
num = num + 3.4
Loop
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是
A)1 3.4 5.8 B)1 3 5
C)1 4 7 D)无数据输出
16.在窗体上画1个名称为Command1的命令按钮,然后编写如下事件过程:
首先看中间代码: If j Mod 2<>0 Then a=a-1 End If a=a+1 这段代码的意思是当j为偶数时,a值增加1,否则不变。j从1到4共有两个偶数,所以a的值增加2 由于i值从1到2,所以上面的代码将运行两遍,a的值共增加4,因为一开始...
2008年4月全国计算机等级考试vb笔试真题
(33)在窗体上画1个名称为Command1的命令按钮,然后编写如下事件过程 Option Base 1 Pribate Sub Command1_Click() Dim a(5,5) As Integer For i=1 To 5 For j=1 To 5 a(i,j)=(i+j)*5\\10 Next j Next i s=0 For i=1 To 5 s=s+a(i,i) Next i Print s End Sub ...
...其名称为 Command1,然后编写如下事件过程:Private Sub Command1_Cli...
【答案】:(7)【答案】4 【解析】此题实际上是从左自右逐个提取a$中的字符,判断是不是等于“n”,统计其中“n”的个数。
在窗体上画个命令按钮名为command1,然后编写如下代码
s=s+1*j=1234
(7) 在窗体上画一个命令按钮,名称为Command1。单击命令按钮时,执行如 ...
a$="software and hardware"b$=Right(a$,8)c$=Mid(a$,1,8)MsgBox a$,,b$,c$,1
在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码
private sub command1_click()a=0:b=5:c=6 a=b+c msgbox a end sub 这个的结果是11,a=b+c是算术表达式,把b+c的结果赋给a,然后msgbox时显示出a private sub command1_click()a=0:b=5:c=6 msgbox a=b+c end sub 这个的结果是false,a=b+c在这里是逻辑表达式,返回布尔值,如果...
在窗体上画一个名称为Command1的命令按钮,事件过程如下:
Private Sub Command1_Click()Dim sum As Integer sum=1 Do While sum<=5 Print sum;sum = sum + 1 Loop Print sum;'VB6.0要分号吗?End Sub
在窗体中添加一个命令按钮,名称为Command1,然后编写程序如下:
空格加四个字符正好5个
在窗体上画一个名称为Command1的按钮,并有下面程序
vb中有2个概念:byval byref byval按值传送,只把变量的值传送到子程序,实际上是传递1个副本,子程序运行不能改变原参数的值 byref按地址传送,把变量的真实地址传送到子程序,子程序运行会改变原参数的值 PrivateSub Swap(ByVal x%, y%)等同于PrivateSub Swap(ByVal x%, byref y%)byref可...
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private...
As Integer x = x + 20 End Sub 这段代码的第二行去掉,在s2中定义的x,其作用范围仅限s2