单选题

Command1_Click()事件代码如下: Private Sub Command1_Click()Dim x As Integer, Y As Integerx = 6 : Y : 8Call ABC(X, Y)Print X; Y End Sub Private Sub ABC(ByVal X As Integer,Y As Integer)X = X + 4Y = Y = 2 End S

A. 6, 8
B. 10, 10
C. 10, 8
D. 6, 10

查看答案
该试题由用户517****16提供 查看答案人数:39938 如遇到问题请 联系客服
正确答案
该试题由用户517****16提供 查看答案人数:39939 如遇到问题请联系客服

相关试题

换一换
单选题
设有如下程序代码:运行Command1—Click过程所产生的输出是()
A.13 B.20 C.30 D.6
答案
单选题
在窗体中有一个名为Command1的命令按钮,Click事件代码如下:单击命令按钮后,标签显示结果是()
A.16 B.14 C.26 D.25
答案
单选题
Command1_Click()事件代码如下: Private Sub Command1_Click()Dim x As Integer, Y As Integerx = 6 : Y : 8Call ABC(X, Y)Print X; Y End Sub Private Sub ABC(ByVal X As Integer,Y As Integer)X = X + 4Y = Y = 2 End S
A.6, 8 B.10, 10 C.10, 8 D.6, 10
答案
主观题
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下。 Sub Command1_Click() Dim student As studtype Dim record_no As Integerrecord n=1With student .ino=12 .strname="Smith" .strsex=“男” .smark=89 End With ______
答案
主观题
有如下事件过程: Private Sub Command1_Click() b=10 Do Until b =-1a = InputBox("请输入a的值")a = Val(
答案
单选题
Command1_Click()事件代码如下: Private Sub Command1_Click()Dim x As Integer, Y As Integerx = 6 : Y : 8Call ABC(X, Y)Print X; Y End Sub Private Sub ABC(ByVal X As Integer,Y As Integer)X = X + 4Y = Y = 2 End Sub 事件发生后,X和Y的值分别为 ______。
A.6, 8 B.10, 10 C.10, 8 D.6, 10
答案
单选题
有下面程序代码:运行Command1_Click过程产生的输出是()
A.123123 B.149123 C.149149 D.123149
答案
单选题
设有命令按钮 Command1 的单击事件过程,代码如下:Private Sub Command1_Click() Dim a(30) As IntegerFor i=1 To 30a(i)=Int(Rnd*100) NextFor Each arrItem In aIf arrItem Mod 7=0 Then Print arrItemIf arrItem>90 Then Exit ForNextEnd Sub 对于该事件过程,以下叙述中错误的是______。
A.a数组中的数据是30个100以内的整数 B.语句For Each arrItem In a有语法错误 C.If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数 D.If arrItem>90……语句的作用是当数组元素的值大于90时退出For循环
答案
主观题
在窗口中有一个标签 Label0 和一个命令按钮 Command1,Command1 的事件代码如下: Private Sub Command1_Click() Label0.Top = Label0.Top + 20 End Sub 打开窗口后,单击命令按钮,结果是
答案
单选题
在窗体中有一个命令按钮Command1,编写事件代码如下:Private Sub Command1_Click()Dim s As Integers = P(1)+ P(2)+ P(3)+ P(4)debug.Print sEnd SubPublic Function P(N As Integer)Dim Sum As IntegerSum = 0For i = 1 To NSum = Sum +
A.15 B.20 C.25 D.35
答案
热门试题
程序段如下:Private Sub Command1_ Click() a = 0 for 1=15 To 15 Step- 2a = a +1 Next I Print a, IEnd Sub发生Command 1的单击事件后,程序的输出结果是 ______。 有如下VB程序段: Private Sub Command1_Click() Dim a As Long a=Val(Text1.Text) Print a End Sub 其中"Private Sub Command1_Click()"的作用是()。 在窗体上画一个命令按钮,其名称为command1然后编写如下事件过程: private sub command1_ _click a=12345 print format$(a,"000.00") end sub . 输出结果 执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1_Click( ) Dim a a=Array("a" ,"b","c","d","e","f","g") Print a(1);a(3);a(5) End Sub 若在某窗体模块中有如下事件过程: Private Sub Command1_Click(Index As Integer) …… End Sub 则以下叙述中正确的是() 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click() Dim i As Integer, x As Integer For i = 1 To 6If i = 1 Then x = i If i 在窗体上画三个命令按钮,其名称分别为Command1、Command2和Command3,然后编写如下事件过程: Private Sub Command1 Click()Command2.Enabled = FalseCommand3.Visible = False End Sub程序运行后,单击命令按钮Command1,则执行的操作是______。 窗体上有三个按钮Command1、Command2和Command3,如以下代码所示,该程序的功能是______。Private Sub Command1_ Click() Command2. Enabled=False Command3. Visible =FalseEnd Sub 窗体上有一个名称为Command1的命令按钮,其单击事件过程代码如下:运行程序,单击命令按钮Command1,窗体上显示的是() 在窗体上画了两个按钮控件Command1和Command2,有如下程序: Private Sub Command1_Click()Print "Visual";End Sub Private Sub Command2_Click()Print "Basic"; End Sub Private Sub Form_Load()Command2.Cancel=TrueCommand1.Cancel=Tr 窗体中有一个命令按钮Command1。其Click事件过程如下。 Private Sub Command1_Click() A=75 IF A>70 THEN i=2 IF A>80 THEN i=3 IF A>90 THEN i=4 MsgBox i End Sub 窗体运行后,单击命令按钮,消息框输出的结果是(   ) 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivatSuCommand1_Click()。程序运行时,单击Command1,则在窗体上输出的结果是() 在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Private Sub fun()Static a As Integera=a+2Print a; End Sub Private Sub Command1_Click()Dim m As IntegerFor m=1 To 3 Call funNext m End Sub 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() x=1 Result=1 While x<=10 Result=______ x=x+1 Wend Print Result End Sub 上述事件过程用来计算10的阶乘。请填空。 单击命令按钮Command1必将调用已写在()事件中的代码 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:  Private Sub Command1_Click()  a = 12345  Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是( )。 在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()a = 12345Print Format$()End Sub运行后,单击命令按钮,窗体上显示的是 在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串: Microsoft Sub Command1_Click() 然后编写如下事件过程: Private Sub Command1_Click() Open "d:empoutf.txt" For Output As 1 For i=1 To Len(Text1.Text)c=Mid(Text1 在窗体上画1个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click() Dim arr(1 To 100) As Integer For i = 1 To 100arr(i) = Int(Rnd * 1000) Next i Max = arr(1) Min = arr(1)For i = 1 To 100If _________ Then 命令按钮Command1的单击事件过程如下: Private Sub Command1_Click() Dim a(10, 10)As Integer x=0 For i = 1 To 3 For j = 1 To 3 a(i, j) =i * 2 Mod j If x<a(i, j)Then x=a(i, j) Next Next Print x End Sub 执行上述事件过程后,窗体上显
购买搜题卡 会员须知 | 联系客服
会员须知 | 联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于E考试网网站及系列App

    只用于搜题看答案,不支持试卷、题库练习 ,下载APP还可体验拍照搜题和语音搜索

    支付方式

     

     

     
    首次登录享
    免费查看答案20
    微信扫码登录 账号登录 短信登录
    使用微信扫一扫登录
    登录成功
    首次登录已为您完成账号注册,
    可在【个人中心】修改密码或在登录时选择忘记密码
    账号登录默认密码:手机号后六位