填空题:设有如下程序Private Sub Form Click()Dim a As Integer,b As Integera

  • 题目分类:VB
  • 题目类型:填空题
  • 查看权限:VIP
题目内容:
设有如下程序
Private Sub Form Click()
Dim a As Integer,b As Integer
a=20:b=50
P1 a.b
p2 a.b
p3 a,b
Print“a=”;a,“b=”;b
End Sub
Sub pl(x As Integer,ByVal Y As Integer)
x=x+10
y=y+20
End Sub
Sub p2(ByVal x As Integer,Y As Integer)
x=x+10
y=y+20
End Sub
Sub p3(ByVal x As Integer,ByVal Y As Integer)
x=x+lO
y=y+20
End Sub
该程序运行后,单击窗体,则在窗体上显示的内容是:a=【1】和b=【2】。
参考答案:
答案解析:

在窗体上画1个名称为Command1的命令按钮,并编写以下程序Private Sub Command1_Click()P

在窗体上画1个名称为Command1的命令按钮,并编写以下程序Private Sub Command1_Click()Print fun(“ABCDEFG”)E

查看答案

为达到把a、b中的值交换后输出的目的,某人编程如下:Private Sub Command1_ Click()a%=1

为达到把a、b中的值交换后输出的目的,某人编程如下:Private Sub Command1_ Click()a%=1 0:b%=20Call swap(a,B

查看答案

以下程序的功能是:用户输入一个代表学生人数的正整数,程序以学生学号为下标创建一个数组(学号从1开始),然后依次输入每个学

以下程序的功能是:用户输入一个代表学生人数的正整数,程序以学生学号为下标创建一个数组(学号从1开始),然后依次输入每个学生的姓名、语文成绩、英语成绩和数学成绩,

查看答案

用如下语句定义了一个数组: Dim Art(3,-2 to 6,10)则UBound(Arr,2);LBound(Arr

用如下语句定义了一个数组: Dim Art(3,-2 to 6,10)则UBound(Arr,2);LBound(Arr,3)的值分别为【1】和【2】。

查看答案

在窗体上先画1个名为Text1的文本框和1个名为Label1的标签,再画1个名为Opl的有4个单选按钮的单选按钮数组,其

在窗体上先画1个名为Text1的文本框和1个名为Label1的标签,再画1个名为Opl的有4个单选按钮的单选按钮数组,其Index属性按季度顺序为0—3(见图1

查看答案