从品牌网站建设到网络营销策划,从策略到执行的一站式服务
TextBox6.Text 的值只能是数字才能用 CInt() 强转成 Integer,你啥也没输入当然强转出错。
成都创新互联公司始终坚持【策划先行,效果至上】的经营理念,通过多达十余年累计超上千家客户的网站建设总结了一套系统有效的推广解决方案,现已广泛运用于各行各业的客户,其中包括:纱窗等企业,备受客户称赞。
要不你就捕捉这个异常,要不你就换 Val() 方法,这个方法当不是数字的就直接转成 0 了。
比如在一个窗体中的代码如下,在另一个线程中显示,隐藏窗口线程中的进度条:
Public Delegate Sub VoidDelegate() '定义委托类型
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Dim th1 As New System.Threading.Thread(AddressOf MyThreadProc) '声明线程
th1.Start() '启动线程运行 MyThreadProc过程
End Sub
Public Sub MyThreadProc()
Me.Invoke(New VoidDelegate(AddressOf StartProgress)) '这个是在另一个线程里调用StartProgress过程,并在创建窗口的那个线程里运行。参数是委托类型。me也可以改成控件名。如果直接调用 StartProgress,那该过程就在与MyThreadProc同一线程中运行,那么StartProgress过程中修改的控件不是在本线程创建的,就会出错。
'。。。。。。。。。
Me.Invoke(New VoidDelegate(AddressOf ShutProgress))
End Sub
Public Sub ShutProgress()
ProgressBar1.Visible = False
End Sub
Public Sub StartProgress()
ProgressBar1.Visible = True
End Sub
'不是还有个Process控件吗,好像也是用来多线程操作的,还没研究,
只能这样 不能在load中
Private Sub Form1_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
Me.Visible = False
End Sub
或者
Private Sub Form1_VisibleChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.VisibleChanged
Me.hide()
End Sub
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图