从品牌网站建设到网络营销策划,从策略到执行的一站式服务
1、首先,点击保存按钮后应检查文本框内容。
成都创新互联公司是一家专注于做网站、网站建设与策划设计,屯留网站建设哪家好?成都创新互联公司做网站,专注于网站建设10年,网设计领域的专业建站公司;建站业务涵盖:屯留等地区。屯留做网站价格咨询:028-86922220
2其次,如果在文本框4中输入的值以400开头则保存反之更改为400。
3、最后,再次检查文本框5如果文本框5中的值为29或31则保存反之则更改即可。
Dim mycon As New SqlConnection(connstrs)
Dim sqlStr As String = "SELECT * FROM [Column] FROM [Table]"
Dim cmd As New SqlCommand(sqlStr, mycon)
Dim reader = cmd.ExecuteReader()
Dim i As Integer = 1
While reader.Read()
Dim txt As New TextBox()
txt.Name = "txt" + i
txt.Size = New Size(100, 20) '文本框大小
txt.Location = New Point(50, i * 20 + 20)'left:50 top:随便写的,自己看着调
txt.Text = reader.GetValue(0).ToString()
Me.Controls.Add(txt) 'Me 可以改为你要添加上去的对象
End While
'未经过运行,自己调试看看能否OK
是这个办法的,只是要加一句:
TextBox1.SelectionLength = 0
TextBox1.SelectionStart = TextBox1.Text.Length
TextBox1.ScrollToCaret()
另外,文本框的内容修改后要再次执行上面的三句代码
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图