锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net控件说明 vbnet ui( 三 )

IT技术EAP


TextBox Clear ( ) 清除TextBox 组件的显示内容MsgBox ( 失去焦点！ ) 弹出提示框
至此【TextBox组件】项目的全部工作就完成了 图 是程序编译后运行界面
图 【TextBox项目】的运行界面
lishixinzhi/Article/program/net/201311/12721
VB.net中窗体上控件太多，运行时在桌面上显示不全 ， 怎样用滚动条来解决？请详细说明，最好给个小例子 。思路：
利用几个可以作为容器的控件vb.net控件说明，添加滚动条就可以vb.net控件说明了：
我举个例子：（这个问题我记得回答过的?。?
添加1个PicTureBox1 ， 作为容器
在PicTureBox1里添加PicTureBox2 ， 在窗体上添加一个垂直滚动条 。
把你所谓的许多控件放到PicTureBox2里，滚动条改变的是PicTureBox2在PicTureBox1里的Top属性，我想你通过一定的空间想象力 ， 可以想到效果了吧？
注意：默认状态设置PicTureBox2的Top属性为0 ， 当该属性为负值的时候，PicTureBox2显示的效果是向上移动，即下面原来隐藏的内容为可见了 。
要设置PicTureBox2的AutoRedraw 属性为True 。
若要左右移动效果 ， 那么改变其 Left 属性，原理不再赘述了 。
VB.NET中使用AspNetPager控件的详细用法AspNetPager简单使用方法 AspNetPager作为分页工具,常常用于绑定数据控件,如DataGrid , Repeater等
在这里,简单讲解下 绑定 Repeater 控件vb.net控件说明的方法,其余控件绑定方法类似:
'全局变量 i 用于 读取 数据集记录vb.net控件说明的条数(注意:读取一次就够vb.net控件说明了)
Dim i As New Integer
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If i = 0 Then
con = New SqlConnection(ConfigurationManager.ConnectionStrings("NEWS_ConnectionString").ConnectionString)
con.Open()
cmd = New SqlCommand()
cmd.Connection = con
cmd.CommandText = "select count(*) from XWNRB "
'AspNetPager控件 可见
Me.AspNetPager1.Visible = True
'AspNetPager控件 每页显示大小为10条记录
Me.AspNetPager1.PageSize = 10
'AspNetPager控件 记录总vb.net控件说明的记录条数
Me.AspNetPager1.RecordCount = Convert.ToInt32(cmd.ExecuteScalar())
'AspNetPager控件 数据绑定
Me.SHOW_DATA_LIST()
i = i + 1
con.Close()
End If
End Sub
Protected Sub SHOW_DATA_LIST()
con = New SqlConnection(ConfigurationManager.ConnectionStrings("NEWS_ConnectionString").ConnectionString)
sql_Text = "select * from XWNRB where "
da = New SqlDataAdapter(sql_Text, con)
Dim ds As New Data.DataSet
'第一个参数为存储入的数据集为ds
'第二个参数为存储的起始记录序号
'第三个参数为存储的记录每页条数
'第四个参数为存储入的数据集ds中的具体某个表
da.Fill(ds, Me.AspNetPager1.PageSize * (Me.AspNetPager1.CurrentPageIndex - 1), Me.AspNetPager1.PageSize, "NEWS_LIST")
'真正绑定
Me.Repeater2.DataSource = ds.Tables("NEWS_LIST").DefaultView
Me.Repeater2.DataBind()
End Sub
'即每次点击新的页面,或者点击 Pre,Next,Last.....时候都会触发这个事件
Protected Sub AspNetPager1_PageChanged(ByVal src As Object, ByVal e As Wuqi.Webdiyer.PageChangedEventArgs) Handles AspNetPager1.PageChanged
'更新当前所在的页数序列
Me.AspNetPager1.CurrentPageIndex = e.NewPageIndex
'更新完后绑定
Me.SHOW_DATA_LIST()
End Sub
VB.NET里面用什么控件做指示灯比较好？请说明为优点 。VB.NET里用GDI+画指示灯其实很简单，稍微查一点资料就能找到gdi+语句的用法的 。用GDI+可以画很多种图形，圆形半圆形自然不在话下 。如果有很多指示灯在一起的话，改起来也很方便 。

推荐阅读


上一篇：李子柒去什么城市直播，李子柒哪里直播

下一篇：我手机没有照片怎么回事，手机没有图片怎么回事