单项选择题

对下列程序段，说法正确的是　　Text1．Top=2000　　Text1．Left=800

A．Text1对象的左边界距窗体的左边界是800twip，上边界距窗体的上边界为2000twip
B．Text1对象的左边界距屏幕的左边界为800twip，上边界距屏幕的上边界为2000twip
C．Text1对象的宽度为2000twip，高度为800twip
D．Text1对象的高度为800点，宽度为2000点
<上一题 目录 下一题>
热门 试题

单项选择题
在以下事件过程中，可以在用户按下鼠标右键时，显示一个上边框，以鼠标当前位置为心的弹出式菜单，而且这个弹出式菜单还可以识别右键对菜单命令的选择，相应的选项；
A．Private Sub Form _ Mouse Up(Button As Integer，Shift AS Integer，_　　　　　　　　　　　　　　　　　X As Single，Y As Singl　　　　If Button=2 Then　　　　　　PopupMenu mnuEdit，vbPopupMenuCenterAlign Or_　　　　　　　　vbPopupMenuRightButton，X，Y，mnuEditOpen　　　　End If　　End Sub
B．Private Sub Form _ MouseUp(Button AS Integer，Shift AS Integer，_　　　　　　　　　　　　　　　　X As Single，Y As Singl　　　　If Button=2 Then　　　　　　PopupMenu mnuEdit，　　　　End If　　End Sub
C．Private Sub Form _ MouseUp(Button AS Integer，Shift AS Integer，_　　　　　　　　　　　　　　　　X As Single，Y As Singl　　　　PopupMenu mnuEdit，vbPopupMenuCenterAlign Or_　　　　　　　　　　　vbPopupMenuRightButton　　End Sub
D．Private SUb Form _ MouseUp(Button AS Integer，_　　　　　　　　　　　　　　　　Shift As Integer，X As Single，Y As Singl　　　　If Button=2 Then　　　　　　　　　PopupMenu mnuEdit，2　　　　End If　　End Sub
单项选择题
如下事件过程： Function Feed(x) If x ＜10 Then Feed=X Else Feed=10+x End If End Function Private Sub Command1_Click( ) x=Val(Input Box( ，0)) pay=Feed(x) Print pay End Sub 运行时在输入框内输入变量x的值为15，输出结果为
A．0
B．15
C．25
D．30
相关试题