在事件过程中,Private表示______ 。A.此过程可以被任何其它过程调用B.此过程只可以被本窗体模块中
在事件过程中,Private表示______ 。
A.此过程可以被任何其它过程调用
B.此过程只可以被本窗体模块中的其它过程调用
C.此过程不可以被任何其它过程调用
D.此过程只可以被本工程中的其它过程调用 Private Sub 1blAbc_ Change() …… End Sub
在事件过程中,Private表示______ 。
A.此过程可以被任何其它过程调用
B.此过程只可以被本窗体模块中的其它过程调用
C.此过程不可以被任何其它过程调用
D.此过程只可以被本工程中的其它过程调用 Private Sub 1blAbc_ Change() …… End Sub
A.此过程可以被任何其它过程调用
B.此过程只可以被本窗体模块中的其它过程调用
C.此过程不可以被任何其它过程调用
D.此过程是一个不可用过程
在以下事件中,Private表示 Private Sub sub1(x As Integer,y As Integer) ...End Sub
A.此过程可以被其他过程调用
B.此过程只可以被本窗体模块中的其他过程调用
C.此过程不可以被任何其他过程调用
D.此过程只可以被本工程中的其他过程调用
假定有如下事件过程:
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,x As Single)
If Button=2 Then
PopupMenu popForm.
End If
End Sub
则以下描述中错误的是
A.该过程的功能是弹出一个菜单
B.popForm是在菜单编辑器中定义的弹出式菜单的名称
C.参数x、y指明鼠标的当前位置
D.Button=2表示按下的是鼠标左键
A.X、Y参数表示的是Command1左上角在窗体中的位置
B.Button参数用于确定按下的鼠标键
C.Shift参数用于确定是否按下了Alt、Ctrl或Shift键
D.MouseUp表示抬起鼠标按键时触发的事件
假定有如下事件过程: Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Sinsle,Y As Single) If Button=2 then PopupMenu popForm End If End Sub 则以下描述中错误的是
A.该过程的功能是弹出一个菜单
B.popForm是在菜单编辑器中定义的弹出式菜单的名称
C.参数X、Y指明鼠标的当前位置
D.Button=2表示按下的是鼠标左键
假定有如下事件过程: Private Sub Form_MouseDown(Buaon As Integer,Shift As Integer,x As Single,y_As Single) If Button=2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是
A.该过程的功能是弹出一个菜单
B.popForm是在菜单编辑器中定义的弹出式菜单的名称
C.参数x、y指明鼠标的当前位置
D.Button=2表示按下的是鼠标左键
假定有如下事件过程: Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是
A.该过程的功能是弹出一个菜单
B.PopForm是在菜单编辑器中定义的弹出式菜单的名称
C.参数X、Y指明鼠标的当前位置
D.BuRon=2表示按下的是鼠标左键
以下是窗体的Click事件过程Form1_Click 的程序代码: Private Sub Form1_Click(…) Handles Me.Click Dim a%() = {345, -54, 200, 356, 65, 23} Dim i As Integer, m As Integer, intIndex As Integer m = a(intIndex) For i = a.GetLowerBound(0) To a.GetUpperBound(0) If a(i) > m Then m = a(i) intIndex = i End If Next MsgBox(m & " " & intIndex) End Sub 在程序运行过程中,单击窗体时,程序的输出结果为()。
A、-24 2
B、356 4
C、345 1
D、356 3
在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程: Dim Str1 As String,str2 As String Private Sub form_load() Text1.Text=" " Text2.Text=" " Text1.Enabled=False Text2.Enabled=False End Sub Private Sub Form_KeyPress(KeyAscii As Integer) str1=str1&Chr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) str2=str2 & Chr(KeyCode) End Sub Private Sub Command1_Click() Text1.Text=str1 Text2.Text=str2 str1=" " str2=" " End Sub 当在设计阶段的窗体的KeyPreview属性设置为True时,程序运行过程中,在键盘上输入小写字母abc,然后单击命令按钮,则文本框Text1中显示的内容为
A.abc
B.不显示任何信息
C.ABC
D.出错
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!