Private Sub Command1_Click（）

相似题目

• 有如下VB程序段： Private Sub Command1_Click（） Dim a As Long a=Val（Text1.Text） Print a End Sub 其中"Private Sub Command1_Click（）"的作用是（）。

  A . 定义一个数据处理方法 B . 定义一个数据输入方法 C . 定义一个事件过程 D . 定义一个数据类型

  查看最佳答案

• 下面程序： Private Sub Command1_Click（） m$="ABC" n$="abc" k$=Lcase$（m$） j$=Ucase$（n$） Print Asc（k$） End Sub 运行后输出结果为（）

  A . 96 B . 97 C . 65 D . 64

  查看最佳答案

• 有如下程序： Private Sub Command1_Click（） Fo rj=1 To 10 a=a+j\7 Next j Print a End Sub 在运行时输出a的值是（）

  A . 5 B . 4 C . 3 D . 2

  查看最佳答案

• 下列程序输出结果为（ ）。 Private Sub Command1_Click() a%=10 b%=5 Change a,b Print a,b End Sub Private Sub Change(ByVal a As Integer,b As Integer) Tmp=a a=b b=tmp End Sub

  查看最佳答案

• 设有以下程序片段 ： Public x% Private y$ Private Sub Command1_Click() Dim a …… End Sub Private Sub Command2_Click() Static b …… End Sub 在 Command1_Click 过程中无法访问的变量是 ________ 。

  查看最佳答案

• 以下程序的运行结果是( )。Private Sub Command1_Click()a = 1: b = 2Print \A=

  查看最佳答案

• 以下程序的循环次数是（ ）。Private Sub Command1_Click()For j=8 To 35 Step 3Print j;Next jEnd Sub

  查看最佳答案

• Private Sub Command1_Click() m = -5.4 If Sgn(m) Then n = Int(m) Else n = Abs(m) End If Print n End Sub

  查看最佳答案

• 以下程序的循环次数是（ ）。 Private Sub Command1_Click() For j=8 To 35 Step 3 Print j; Next j End Sub

  查看最佳答案

• 在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)X=0Do Until x=-1 a

  在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() X=0 Do Until x=-1 a=InputBox("请输入A的值") a=Val(A)b=InputBox("请输入B的值") b=Val(B)x=InputBox("请输入x的值") x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 ______。 A．2 B．3 C．14 D．15

  查看最佳答案

• 在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click（

  在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() s= "ABBACDDCAB" For i=6 To 2 Step -2 x=Mid(s,i,i) y=Left(s,i) z=x&y Next i MsgBox z End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是()。 A．AABA B．ABBA C．BABBA D．BBAB

  查看最佳答案

• 执行以下程序后输出的是_________。Private Sub Command1_Click)Ch$="AABCDEFGH"Print MidRightch$,6),Lenleftch$,4)),2)End Sub

  A．A.CDEFGH B．B.ABCD C．C.FG D．D.AB

  查看最佳答案

• 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程；Private Sub Command1_Click（)a $

  在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程； Private Sub Command1_Click() a $="software and hardware" b $=Right(a$, 8) c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。 A．software and hardware B．software C．hardware D．1

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程: Private Sub Command1_Click（)

  在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程: Private Sub Command1_Click() c = 1234 c1 = Trim(Str(C)) For i = 1 To 4 Print_____ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容 1 12 123 1234 则在下划线处应填入的内容为 A．Right(c1,i) B．Left(c1,i) C．Mid(c1,i,1) D．Mid(c1,i,i)

  查看最佳答案

• 有如下代码: Private Sub Command1_Click（）

  A．1 B．2 C．3 D．4

  查看最佳答案

• 在窗体中添加一个名称为COMMAND1的命令按钮，然后编写如下事件代码： PRIVATE SUB COMMAND1_CLICK（

  在窗体中添加一个名称为COMMAND1的命令按钮，然后编写如下事件代码： PRIVATE SUB COMMAND1_CLICK() A =75 IF A ＞60 THEN K=1 ELSEIF A ＞ 70 THEN K=2 ELSEIF A ＞ 80 THEN K=3 ELSEIF A ＞90 THEN K=4 ENDIF MSGBOX K END SUB 窗体打开运行后，单击命令按钮，则消息框的输出结果是()。 A．1 B．2 C．3 D．4

  查看最佳答案

• 在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码：Private Sub Command1_Click（)

  在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() A=75 If A＞60 Then I=1 If A＞70 Then 1=2 If A＞80 Then 1=3 If A＞90 Then 1=4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是()。 A．1 B．2 C．3 D．4

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)

  在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞0 Then in=m+n/3 Next Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 A．15 B．18 C．21 D．24

  查看最佳答案

• 在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_click（) Di

  在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s；a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容，是 ______。 A．79 B．340 C．97 D．死循环

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)c=

  在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=“ABCD” For n=l to 4 Print______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在______处应填入的内容为 A．Left(c，n) B．Right(c，n) C．Mid(c，n，1) D．Mid(c，n，n)

  查看最佳答案

• 有如下程序：Private Sub Command1_Click（）Fo rj=1 To 10a=a+j\7Next jPrint aEnd Sub在运行时输出a的值是（）

  A．5 B．4 C．3 D．2

  查看最佳答案

• 以下的输出结果是 Option Base 1 Private Sub Command1_Click（）Dim a（）,p（3）

  A．s Integer k=5 For I=1 To 10 A（I）=I Next I For I=1 To 3 p（I）=a（I＊I） Next I For I=1 To 3 k=k＋p（I）＊2 Next I Print k End sub A．33 B．28 C．35 D．37

  查看最佳答案

• 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click（）

  A．Right B．Left C．Val D．Mid

  查看最佳答案

• 窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并有下面事件过程： Private Sub Command1_Click（) Timer1.Enabled=True End Sub Private Sub Form_Load（) Timer1.Interval=5 Timer1.Enabled=False End Sub Private Sub Timer1_Timer（

  A．命令按钮每5毫秒向左移动一次 B． 命令按钮每5毫秒向右移动一次 C． 命令按钮每5秒向左移动一次 D． 命令按钮每5秒向右移动一次

  查看最佳答案