网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
（ 7 ） 设窗体上有一个名称为 HScroIII 的水平滚动条 ， 要求当滚动块移动位置后 ， 能够在窗体上输出移动的距离 （ 即新位置与原位置的刻度值之差 ， 向右移动为正数 ， 向左移动为负数 ） 。 下面是可实现此功能的程序，请填写。
Dim [7] As Integer
Private Sub Form_Load()
pos=HScroIII.Value
End Sub
Private Sub HScroIII_Change()
Print [8] -pos
pos=HScroIII.Value
End Sub
参考答案
更多 “ （ 7 ） 设窗体上有一个名称为 HScroIII 的水平滚动条 ， 要求当滚动块移动位置后 ， 能够在窗体上输出移动的距离 （ 即新位置与原位置的刻度值之差 ， 向右移动为正数 ， 向左移动为负数 ） 。 下面是可实现此功能的程序，请填写。Dim [7] As IntegerPrivate Sub Form_Load()pos=HScroIII.ValueEnd SubPrivate Sub HScroIII_Change()Print [8] -pospos=HScroIII.ValueEnd Sub ” 相关考题
考题
设窗体上有一个滚动条，要求单击滚动条右端的(图片)按钮一次，滚动块移动一定的刻度值，决定此刻度值的属性是______。A．MaxB．MinC．SmallChangeD．LargeChange
考题
窗体上有一个名称为HScroll 1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是( )。A． Private Sub HScroll 1_Change() Print HScroll1.Value End SubB．Private Sub HScroll 1_Change() Print HScroll1.SmallChange End SubC．Private Sub HScroll1 Scroll() Print HScroll1.Value End SubD．Private Sub HScroll1_Scroll() Print HScroll1.SmallChange End Sub
考题
设窗体上有一个名称为HSl的水平滚动条，如果执行了语句：HSI．Value=(HSl．Max—HSI．Min)／2+HSl．Min则：A．滚动块处于最左端B．滚动块处于最右端C．滚动块处于中间位置D．滚动块可能处于任何位置，具体位置取决于Max、Min属性的值
考题
设窗体有上一个名称为HScroll1的水平滚动条，要求当滚动块移动位置后，能够在窗体上输出移动的距离(即新位置与原位置的刻度值之差，向右移动为正数，向左移动为负数)。下面是可实现此功能的程序，请填空。 Dim 【7】 AsInteger Private Sub Form_Load Pos＝HScrol1．Value End Sub Private Sub HScroll1_Change Print 【8】 - pos Pos＝HScrolll．Value End Sub
考题
在名为Form1的窗体上绘制一个垂直滚动条(名称为VS1)和一个水平滚动条(名称为HS1)。在属性窗口中对两个滚动条设置如下属性：Min 2000Max 8000LargeChange 500SmallChange 50编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小窗体。运行后的窗体如下图所示。注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise22.vbp，窗体文件名为exeeise22.frm。
考题
设窗体上有一个名称为HSI的水平滚动条，如果执行了语句：HS1．Value=(HS1．Max·HS1．Min)2+HS1．Min，则（ ）。A.滚动块处于最左端B.滚动块处于最右端C.滚动块处于中间位置D.滚动块可能处于任何位置。具体位置取决于Max、Min属性的值
考题
（15）设窗体上有一个名称为HS1的水平滚动条，如果执行了语句：HS 1．Value=(HS 1．Max-HS l .Min）／2＋HS1．Min则：A）滚动块处于最左端B）滚动块处于最右端C) 滚动块处于中间位置D) 滚动块可能处于任何位置，具体位置取决于Max、Min属性的值
热门标签
最新试卷
