05 2014 档案

VB随笔3
摘要：1 读取文件内容 必须现在程序目录下（vb98文件夹下）建一个hero.txtPrivate Sub Command1_Click()Dim strfilename As String '文件名Dim nfilenum As Long '文件句柄Dim strall As String '所读... 阅读全文
posted @ 2014-05-11 11:11 姗山来迟 阅读(168) 评论(0) 推荐(0)
VB随笔2
摘要：1 显示进度条先弄一个label标签，capation属性设为空白，背景色设为深蓝色然后弄一个timer控件,同时时间间隔为（Interval）：100Private Sub Timer1_Timer()Label1.Width = Label1.Width + 20End Sub2 设置如何调用鼠... 阅读全文
posted @ 2014-05-06 23:50 姗山来迟 阅读(170) 评论(0) 推荐(0)
VB随笔 -基本语句之循环语句
摘要：1.模式窗体和非模式窗体Private Sub Form1_Click()Form2.show 1 '设置为1就是模式窗体，form2关闭前不能操作Form1，设置为0则为非模式窗体2 两个整数之间的所有整数之和（包括这两个整数）（1）Private Sub Command1_Click()Dim... 阅读全文
posted @ 2014-05-02 15:31 姗山来迟 阅读(370) 评论(0) 推荐(0)