问题

设窗体有上一个名称为HScroll1的水平滚动条要求当滚动块移动位置后能够在窗体上输出移动的距离

设窗体有上一个名称为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

参考答案

您可能感兴趣的试题

在窗体上画一个名称为Label1的标签,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100.程序运行后,如果移动滚动框,则在标签中显示滚动条的当前值.以下能实现上述操作的程序段是（）

答案解析
（15）设窗体上有一个名称为HS1的水平滚动条，如果执行了语句：HS 1．Value=（HS 1．Max－HS l .Min）／2＋H

答案解析
设窗体有上一个名称为HScroll1的水平滚动条，要求当滚动块移动位置后，能够在窗体上输出移动的距离

答案解析
设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为Commandl的命令按钮。

答案解析
在窗体上画一个名称为Text1的文本框.然后画一个名称为HScroll1的滚动条其Min和Max属性分别为0和

答案解析
窗体上有一个名称为HScroll 1的滚动条程序运行后当单击滚动条两端的箭头时立即在窗体上显示滚

答案解析

设窗体有上一个名称为HScroll1的水平滚动条 要求当滚动块移动位置后 能够在窗体上输出移动的距离

设窗体有上一个名称为HScroll1的水平滚动条要求当滚动块移动位置后能够在窗体上输出移动的距离