2016年11月 VB大版内专家分月排行榜第二2016年1月 MS-SQL Server大版内专家分月排行榜第二2015年12月 MS-SQL Server大版内专家分月排行榜第二2015年11月 MS-SQL Server大版内专家分月排行榜第二2015年5月 MS-SQL Server大版内专家分月排行榜第二2015年4月 MS-SQL Server大版内专家分月排行榜第二2015年1月 VB大版内专家分月排行榜第二2015年1月 MS-SQL Server大版内专家分月排行榜第二2014年12月 VB大版内专家分月排行榜第二2014年11月 MS-SQL Server大版内专家分月排行榜第二2014年9月 MS-SQL Server大版内专家分月排行榜第二2013年8月 VB大版内专家分月排行榜第二2013年6月 VB大版内专家分月排行榜第二2013年5月 VB大版内专家分月排行榜第二2010年4月 VB大版内专家分月排行榜第二2010年3月 VB大版内专家分月排行榜第二2008年12月 VB大版内专家分月排行榜第二2008年8月 VB大版内专家分月排行榜第二2008年7月 VB大版内专家分月排行榜第二2007年11月 VB大版内专家分月排行榜第二
2017年1月 MS-SQL Server大版内专家分月排行榜第三2015年6月 MS-SQL Server大版内专家分月排行榜第三2015年3月 MS-SQL Server大版内专家分月排行榜第三2015年2月 MS-SQL Server大版内专家分月排行榜第三2014年12月 MS-SQL Server大版内专家分月排行榜第三2014年10月 VB大版内专家分月排行榜第三2014年10月 MS-SQL Server大版内专家分月排行榜第三2014年8月 MS-SQL Server大版内专家分月排行榜第三2013年9月 VB大版内专家分月排行榜第三2013年3月 VB大版内专家分月排行榜第三2012年5月 VB大版内专家分月排行榜第三2012年4月 VB大版内专家分月排行榜第三2010年10月 VB大版内专家分月排行榜第三2010年8月 VB大版内专家分月排行榜第三2010年7月 VB大版内专家分月排行榜第三2009年5月 VB大版内专家分月排行榜第三2008年9月 VB大版内专家分月排行榜第三2008年4月 VB大版内专家分月排行榜第三2008年2月 VB大版内专家分月排行榜第三
2009年4月 VB大版内专家分月排行榜第三2007年10月 VB大版内专家分月排行榜第三
2004年6月 VB大版内专家分月排行榜第二2004年5月 VB大版内专家分月排行榜第二
本帖子已过去太久远了，不再提供回复功能。以下试题来自：
单项选择题要获得垂直滚动条Vscrollbar控件所能表示的最大值，可通过调用该控件的（）属性来实现。
D.LargeChange
为您推荐的考试题库
您可能感兴趣的试卷
你可能感兴趣的试题
D.LargeChange
A.FontBold
B.BackItalic
C.FontName
D.FontSize
A.ForeColor
B.BackColor
C.BackStyle
D.BorderStyle
A.ForeColor
B.BackColor
C.BackStyle
D.BorderStyle
A.ForeColor
B.BackColor
C.BackStyle
D.BorderStyle您当前的位置：&&&&&正文
2012年计算机二级VB知识点汇总：滚动条控件_计算机二级考试
本网考试频道小编应广大考生的需要，特为参加考试的考生策划了&2012年计算机二级VB知识点汇总：滚动条控件&专题等有关资料，供考生参考!
滚动条控件
滚动条是windows应用程序中界面上的常见的元素。有了滚动条，就可在应用程序或控件中做垂直滚动，能方便地巡视一长列项目或大量信息。
水平、垂直滚动条控件不同于文本框、列表框和组合框中的滚动条。无论何时，只要这些控件所包含的信息超过其所能显示的信息，滚动条就会自动出现，而不需要用户自己设计。对于其他一下控件，如图片框控件，当它所包含的图形超过控件范围时，控件不能自动添加滚动条，因此无法浏览到整个图形，此时，就可以使用滚动条控件来实现在图片框中滚动图片。另外，滚动条控件也常常用来进行数据的输入，特别是在输入不需要精确的数值时，使用滚动条就显得很直观，也很方便。
水平滚动条与垂直滚动条除方向不同外，其功能和操作完全相同。这里以水平滚动条为例来介绍滚动条的结构。一个标准的水平滚动条，它的两端各有一个滚动箭头，在两个滚动箭头之间有一个滚动块。每单击一次滚动箭头，滚动块就向滚动箭头的方向移动一定的距离。滚动块的位置代表值的大小。对于垂直滚动条，最上端代表最小值，最下端代表最大值;对于水平滚动条，最左端代表最小值，最右端代表最大值。
可通过设置滚动条的有关属性，来确定滚动条的一些参数，如值的范围以及每单击一次滚动箭头滚动块移动的距离等。表5.32中列出了滚动条控件的一些重要属性。
在程序运行时，用户可通过3种方法来改变滚动条的值，分别是单击滚动箭头、单击滚动箭头与滚动块之间的滚动条和直接拖动滚动块。
滚动条控件用Scroll和Change事件监视滚动块沿滚动条的移动。Change事件在滚动块移动后发生;Scroll事件在拖动滚动块时发生而在单击滚动箭头或滚动条时不发生。只要拖动滚动框的动作继续，就会不断产生Scroll事件，当停止拖动时，如果滚动块的位置发生了变化，则又产生一个Change事件。
实例5.21计算打折小程序。
这是一个自动计算物品打折后价格的小程序。在该程序中，用户输入物品的原价，通过滚动条来设置打折的多少，则窗体上会自动显示出当前的打折情况以及物品在当前打折下的价格。
更多内容进入：
下页更精彩：
点击排行榜
微信查看最新信息微信扫一扫或用微信搜索微信号：hbrc-com
安卓手机客户端更省流量手机扫描下载或者直接
猜你还喜欢的文章
热点文章排行榜
• 版权所有 Copyright 2011 All rights reserved.I feel like this should be something simple, but I can't seem to find out how to do this.
I have a list view control, and I would just like to be able to determine if the vertical scroll bar is displayed to the user.
I have tried the solutions from the following links:
I didn't have any luck with those. I am using VB.NET
If anybody has any idea I would greatly appreciate it.
解决方案 This is a NET update of the MSDN answer (if you look, that is VB6 related):
'Pinvokes - these are usually Shared methods in a
' Win32NativeMethods class you accumulate
Private Const GWL_STYLE As Integer = -16
Private Const WS_HSCROLL = &H100000
Private Const WS_VSCROLL = &H200000
&DllImport("user32.dll", SetLastError:=True)& _
private Shared Function GetWindowLong(ByVal hWnd As IntPtr,
ByVal nIndex As Integer) As Integer
End Function
' sometimes you use wrappers since many, many, many things could call
' SendMessage and so that your code doesnt need to know all the MSG params
Friend Shared Function IsVScrollVisible(ByVal ctl As Control) As Boolean
Dim wndStyle As Integer = GetWindowLong(ctl.Handle, GWL_STYLE)
Return ((wndStyle And WS_VSCROLL) && 0)
End Function
' to be complete:
Friend Shared Function IsHScrollVisible(ByVal ctl As Control) As Boolean
Dim wndStyle As Integer = GetWindowLong(ctl.Handle, GWL_STYLE)
Return ((wndStyle And WS_HSCROLL) && 0)
End Function
Elsewhere, subscribe to the ClientSizeChanged event:
Private VScrollVis As Boolean = False
Private Sub lv_ClientSizeChanged(sender As Object, e As EventArgs)
Handles myListView.ClientSizeChanged
VScrollVis = IsVScrollVisible(Me)
MyBase.OnClientSizeChanged(e)
You did not indicate what you wanted to do about it.
You could raise a new event whenever VScrollVis changes or you can write code to "fix" the control if the HScroll shows up simply because the VScroll is now Visible.
I just want to to call a function and have it return true if the scrollbar is visible
' expose PInvoke if needed, convert to non-Shared
Public Function IsVerticalScrollVisible(ctl As Control)
Return IsVScrollVisible(ctl)
End Function
Public Function IsHorizontalScrollVisible(ctl As Control)
Return IsHScrollVisible(ctl)
End Function
本文地址： &
我觉得这应该是简单，但我似乎无法找出如何做到这一点。我有一个列表视图控件，而我只是想，如果垂直滚动条显示给用户能够确定。 我从以下几个环节尝试了解决方案：的
我没有与任何运气。我使用VB.NET 如果任何人有任何想法，我将不胜AP preciate它。解决方案 这是MSDN答案的净更新（如果你看一下，这是VB6有关）： 'Pinvokes
- 在这些通常共享方法“Win32NativeMethods类，你积累私人常量GWL_STYLE为整数= -16私人常量WS_HSCROLL =安培; H100000私人常量WS_VSCROLL =安培; H200000＆LT;的DllImport（“user32.dll中”，SetLastError：= TRUE）＆GT; _私人共享功能GetWindowLong（BYVAL的hWnd作为IntPtr的，
BYVAL参数nIndex作为整数）作为整数结束功能“有时候你使用包装，因为很多，很多，很多事情可以打电话“SendMessage函数，以便让code犯规需要知道所有的味精PARAMS朋友共享功能IsVScrollVisible（BYVAL CTL作为控制）为布尔
昏暗wndStyle作为整数= GetWindowLong（ctl.Handle，GWL_STYLE）
返程（（wndStyle和WS_VSCROLL）LT;＆GT; 0）结束功能“是完整的：朋友共享功能IsHScrollVisible（BYVAL CTL作为控制）为布尔
昏暗wndStyle作为整数= GetWindowLong（ctl.Handle，GWL_STYLE）
返程（（wndStyle和WS_HSCROLL）LT;＆GT; 0）结束功能 在其他地方，订阅ClientSizeChanged事件： 私人VScrollVis由于布尔=假私人小组lv_ClientSizeChanged（发送者为对象，E作为EventArgs的）
处理myListView.ClientSizeChanged
VScrollVis = IsVScrollVisible（ME）
MyBase.OnClientSizeChanged（五）结束小组 您没有表明你想做些什么的。你可以提出一个新的事件时VScrollVis变化，或者你可以写code“修理”的控制，如果只是HSCROLL显示出来，因为VSCROLL现在是可见的。的我只是想调用一个函数，并有如果滚动条是可见它返回true 的 “如果需要的话暴露的PInvoke，转换为非共享公共职能IsVerticalScrollVisible（CTL作为对照）
返回IsVScrollVisible（CTL）结束功能公共职能IsHorizontalScrollVisible（CTL作为对照）
返回IsHScrollVisible（CTL）结束功能
本文地址： &
扫一扫关注官方微信VB中Listbox控件添加水平垂直滚动条问题解；(1)VB中Listbox控件若条目足够多，则自；(2)若仅仅需要水平滚动条，且每向右滚动一下移动；(3)如果需要两种滚动条，则仅仅考虑水平滚动条即；vb为listbox添加水平滚动条；PrivateDeclareFunctionSe；PrivateConstLB_SETHORIZO；PrivateSubse
VB中Listbox控件添加水平垂直滚动条问题解决
(1) VB中Listbox控件若条目足够多，则自动会显示垂直滚动条
(2) 若仅仅需要水平滚动条，且每向右滚动一下移动一个条目，则将控件的columns 属性设为1
(3) 如果需要两种滚动条，则仅仅考虑水平滚动条即可，这时需要引入API函数，先判断是否超出条目范围，如果超出，则调用API生成水平滚动条，具体代码如下： 代码：
vb 为listbox添加水平滚动条
Private Declare Function SendMessage Lib &user32 & Alias &SendMessageA& (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const LB_SETHORIZONTALEXTENT = &H194
Private Sub setListWidth()
'如果列表框不够宽，则增加水平滚动条
As Integer
As Integer
'获得选项内容的最大长度
For i = 0 To demo_lbox.ListCount - 1
'&让list_maxl中保存最长的一条字串
If Len(demo_lbox.List(i)) & List_MaxL Then
List_MaxL = Len(demo_lbox.List(i)) + 2
'判断是否内容显示不完全，如果是则添加水平滚动条
If Me.TextWidth(&AA &) * List_MaxL & demo_lbox.Width Then
SendMessage demo_lbox.hwnd, LB_SETHORIZONTALEXTENT, Me.TextWidth(&a&) * List_MaxL, ByVal 0&
Private Sub Form_Load()
As Integer
'为ListBox控件添加选项
For i = 0 To 100
demo_lbox.AddItem (&这是，最据jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj：（第
& + CStr(i)) & &行） &
'demo_lbox.AddItem
' 设置窗体坐标尺度模式和字体大小
Me.ScaleMode = vbPixels
Me.FontSize = demo_lbox.FontSize
'设置列表框的水平滚动条
Call setListWidth
三亿文库包含各类专业文献、文学作品欣赏、幼儿教育、小学教育、各类资格考试、专业论文、行业资料、外语学习资料、VB中Listbox控件添加水平垂直滚动条问题解决63等内容。　
　故选A。 3.VB中有这样一类文件:该文件不属于任何...A) 列表框(ListBox) B) 标签(Label) C) 文本框...11. 为了使文本框只具有垂直滚动条,应先把MultiLine... 　ListBox控件始终都有滚动条 D. ListBox控 件不能设置字体 249.在VB中,工程...设计解决问题步骤→分析问题→编写程序→调试程序 256.可视化编程的基本过程主要有... 　39 VB 规定窗体文件的扩展名是 .vbp。 40 VB 若...当定时器控件的 Interval 属性值设置为 0 时,会...滚动条控件不可作为用户输入数据的方法。 滚动条控件... 　VB 程序设计的主要特点是 可视化设计 和 事件编程 ...6.列表框(ListBox 控件)显示 (8) 项目列表 ,用户...A.文本框 B 垂直滚动条 C.框架 D 命令按钮 3.... 　个名称Shape1的形状控件,在属性窗口中将其 设置为...在文本框中显示垂直滚动条 3)文本框中显示的初始...点 击工具箱中的ListBox和TextBox控件图标,然后在... 　6.列表框(ListBox 控件)显示 选择一个或多个项目。 7.框架(Frame 控件)可以...垂直滚动条 3.滚动条控件(如图所示)的 Largechange 属性所设置的是( A. 变量... 　《程序设计基础 VB》期中考试卷―分析一、选择题〖...(水平滚动条) 、Image(图像框) 、 Frame(框架) ...常用控件中,TextBox、PictureBox、Image、ListBox、... 　在窗体上绘制CommonDialog控件时,控件的大小、位置可由用户自己加以设定。 在“...Visual Basic会自动给列表框加上垂直滚动条 对对对对对对对对对对对对对对对... 　第一题: 在 VB 集成环境下,按照以下要求编写程序,存盘并运行。 (1)在工程中...(2)在窗体中添加一个文本框 Text1 和一个垂直滚动条 VScroll1。 (3)设置...