当前位置:首页 > 编写如下事件过程和函数过程: Private Sub Form_Chck() DimBum(1 To 6)As Single num(1)=103:num(2)=190:num(3)=0 Bum(4)=32:num(5)=-56:num(6)=100 Print Pdnt p2(6,hum()) End Sub Private Function p2(ByVal n As Integer,number()As Single)As Integer p2= > 题目详情
问题详情
编写如下事件过程和函数过程: Private Sub Form_Chck() DimBum(1 To 6)As Single num(1)=103:num(2)=190:num(3)=0 Bum(4)=32:num(5)=-56:num(6)=100 Print Pdnt p2(6,hum()) End Sub Private Function p2(ByVal n As Integer,number()As Single)As Integer p2=
时间:2022-01-03 23:05
关键词:
答案解析
设有如下通用过程: Public Sub Fun(a(),ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程 Private Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) Text1.Text = n End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是_____
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 a = 1 Do s = s + a a = a - 1 Loop While a
在窗体上画一个文本框,然后编写如下事件过程:Private Sub Form_Click()Dim x As Integerx = Val(InputBox("请输入一个整数"))Print x + Text1TextEnd Sub程序运行时,在文本框中输入12,然后单击窗体,在输入对话框中输入34,单击"确定"按钮后,在窗体上显示的内容为______。
在窗体上画1个命令按钮,并编写如下事件过程:Private Sub Command1_Click()For i=5 to 1 step -08Print Int(i);Next iEnd Sub运行程序,单击命令按钮,窗体上显示的内容为________。
在代码窗口中,有如下事件过程,以下叙述正确的是______。Private Sub Option1_Click(Index As Integer)……End Sub