vb.net消息循环 vb循环语句

vb.net do循环

你确信只循环一次吗？我看不像，在最后添加上一句msgbox jishu1，多半显示3。

站在用户的角度思考问题，与客户深入沟通，找到松山网站设计与松山网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：做网站、网站设计、企业官网、英文网站、手机端网站、网站推广、空间域名、虚拟主机、企业邮箱。业务覆盖松山地区。

是在第二块代码中有问题，你应该把chaxun4 = xlsheet.Range("l1").Value + 2分别放到两个条件句中初始chaxun4变量。

因为上一个Do Until atmbianhaop = xlsheet.Range("B" chaxun4).Value 循环退出后，下一个循环一开始就符合退出条件了，所以循环没有进行了。

您可以调用Me.Hide()方法隐藏Login窗体。

另外，如果您使用新建工程后的那个默认窗体作为Login窗体，那么您只能隐藏这个窗体或修改程序的启动对象。因为VB.net默认将创建工程时的那个默认窗体作为程序的主窗体，应用程序的主消息循环就建立在这个窗体上，如果您关闭这个窗体，那么所有的消息泵都会停止，应用程序就会退出。

我比较推荐您将Main窗体设为应用程序的主窗体，这样可以减小资源的占用，当Login完成后就可以释放Login窗体了。

另外，vb.net中的me变量相当于C语言中的this指针，它指向当前类。

推荐一个网站，这个网站有很多的教程，而且基本都是附部分代码，可能有一些对您有用的信息。

一般多开线程写无限循环行为。

//定义线程

Dim th As New Threading.Thread(New Threading.ParameterizedThreadStart(AddressOf test))

th.Start("aaa")//开始线程，可以传参

//线程执行函数

Public Sub test(ob As Object)

While True

Console.WriteLine("线程正在运行中" ob)

Threading.Thread.Sleep(1000)

End While

End Sub

文字写在label的caption属性中，调用timer()函数

附上我写的左右往复运动代码，实现image1在picture1中左右往复运动

Private

Sub

Timer1_Timer()

Image1.Left

Picture1.ScaleWidth

Image1.Width

Then

Image1.Left

Else

Image1.Left

End

Image1.Left

Then

End

Sub

分享题目：vb.net消息循环 vb循环语句
文章起源：http://ybzwz.com/article/dohidoi.html