若在某窗体模块中有如下事件过程:
Private Sub Co mmand1_Click(Index As Integer)
……
End Sub
则以下叙述中正确的是( )。
发布于 2022-05-11 09:59:21
登录后免费查看答案
关注者
0
被浏览
11
1 个回答
推荐阅读
-
若在某窗体模块中有如下事件过程( )Private Sub Command1_Click(Index AS Integer)……End Sub则以下叙述中正确的是
2022-05-11 关注 0 浏览10 1答案
-
设工程文件包含两个窗体文件Form1.frm、Form2.frm 及一个标准模块文件Module1.bas ,两个窗体上分别只有一个名称Co mmand1的命令按钮。Form1的代码如下:Public X As IntegerPrivate Sub Form_load()x=1y =5End SubPrivate Sub Co mmand1_Click()Form2.ShowEnd SubForm2的代码如下:Private Sub Co mmand1_Click()Print Form1.x,yEnd SubModule1的代码如下:Public y As Integer运行以上程序,单击Form1的命令按钮Co mmand1,则显示Form2;再单击Form2上的命令按钮Co mmand1,则窗体上显示的是( )。
2022-05-11 关注 0 浏览13 1答案
-
在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下事件过程:Private Sub Co mmand1_Click()Di ma As Integer ,s As Integera=8s =1Dos =s +aa=a-1Loop While a <=0Print s ;aEnd Sub程序运行后,单击命令按钮,则窗体上显示的内容是( )。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下程序:Public Enumsa=4b =3End EnumPrivate Sub Co mmand1_Click()Di mx As Integerx=aIf x>=3ThenMsgBox "Pass !"End Sub运行程序,其结果是( )。
2022-05-11 关注 0 浏览8 1答案
-
窗体上有一个名称为Co mmand1的命令按钮,其单击事件过程及有关函数过程如下:Private Sub Co mmand1_Click()Di mn As Integern =add(5,10)Print nEnd SubFunction add(v1As Integer ,v2As Integer ,Optionalv3)As IntegerIf Not Is Missi ng(v3)Thenadd =v1+v2+v3Elseadd =v1+v2End IfEnd Function运行程序,单击命令按钮,以下叙述中正确的是( )。
2022-05-11 关注 0 浏览15 1答案
-
设有如下通用过程:Public Function f(x As Integer)Di my As Integerx=20y =2f =x*yEnd Function在窗体上画一个名称为Co mmand1的命令按钮,然后编写如下事件过程:Private Sub Co mmand1_Click()Static x As Integerx=10y =5y =f(x)Print x;yEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
2022-05-11 关注 0 浏览11 1答案
-
在窗体上有1个名称为Co mmonDialog1的通用对话框和1个名称为Co mmand1的命令按钮,以及其他一些控件。要求在程序运行时,单击Co mmand1按钮,则显示打开文件对话框,并在选择或输入了1个文件名后,就可以打开该文件。下列是Co mmand1_Click 事件过程的两种算法。算法1:Private Sub Co mmand1_Click()Co mmonDialogl .ShowOpenOpen Co mmonDialogl .File Name For Input As #1End Sub算法2:Private Sub Co mmand1_Click()Co mmonDialogl .ShowOpenIf Co mmonDialogl .File Name <>""ThenOpen Co mmonDialogl .File Name For Input As #1EndIfEnd Sub下列关于这两种算法的叙述中正确的是( )。
2022-05-11 关注 0 浏览8 1答案
-
标准模块中有如下程序代码:Public x As Integer,y As IntegerSub var_pub()x=10:y=20End Sub在窗体上有1个命令按钮,并有如下事件过程:Private Sub Command1_Click()Dim x As IntegerCall var_pubx=x+100y=y+100Print x;yEnd Sub运行程序后单击命令按钮,窗体上显示的是
2022-05-11 关注 0 浏览14 1答案
-
一个工程中包含两个名称分别为Form1、Form2的窗体,一个名称为mdlFunc的标准模块。假定在Form1、Form2和mdlFunc中分别建立了自定义过程,其定义格式为:Form1中定义的过程:Private Sub frmFunction1()……End SubForm2中定义的过程:Public Sub frmFunction2()……End SubmdlFunc中定义的过程:Public Sub mdlFunction()……End Sub在调用上述过程的程序中,如果不指明窗体或模块的名称,则以下叙述中正确的是
2022-05-11 关注 0 浏览14 1答案
-
下列程序的执行结果为( )。Private Sub Co mmand1_Click()Di mx As Integer ,y As Integerx=12:y =20Call Value(x,y)Print x;yEnd SubPrivate Sub Value(ByVal m As Integer ,ByVal n AsInteger)m=m*2:n =n -5Print m;nEnd Sub
2022-05-11 关注 0 浏览12 1答案