网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索

 
 
 
日一二三四五六
       
       
       
       
       
       

签到排名:今日本吧第个签到,

本吧因你更精彩,明天继续来努力!

本吧签到人数:0

一键签到
成为超级会员,使用一键签到
一键签到
本月漏签0次!
0
成为超级会员,赠送8张补签卡
如何使用?
点击日历上漏签日期,即可进行补签。
连续签到:天  累计签到:天
0
超级会员单次开通12个月以上,赠送连续签到卡3张
使用连续签到卡
08月25日漏签0天
vb.net吧 关注:7,017贴子:37,209
  • 看贴

  • 图片

  • 吧主推荐

  • 视频

  • 游戏

  • 0回复贴,共1页
<<返回vb.net吧
>0< 加载中...

拜师!求交流!

  • 只看楼主
  • 收藏

  • 回复
  • ╱╳灬x影子
  • 有点会
    4
该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
最近在自学VB.NET的基础,有些东西没人指引确实不好入门,希望能寻个明师,只需要在我不懂的时候可以请教一下就可以了,另外初入门的新手也可以加我,一起交流学习。
我扣扣68203121
另附我学习3天的成果,秒表的代码,但是不知道怎么控制秒表的转速和实际转速一致,请指教。
Public Class Form1
     Dim minutes, seconds As Integer
     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
         If Me.Button1.Visible = True Then
             Me.Timer1.Enabled = True
             Me.Button2.Visible = True
         Else : Me.Timer1.Enabled = False
         End If
         Me.Button1.Visible = False
     End Sub
     Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
         If Me.Button2.Visible = True Then
             Me.Timer1.Enabled = False
             Me.Button1.Visible = True
             Me.Button2.Visible = False
         Else : Me.Timer1.Enabled = False
         End If
     End Sub
     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
         Me.Button2.Visible = True
         Me.Label1.Text = minutes & "分" & seconds & "秒"
     End Sub
     Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
         If seconds >= 60 Then
             seconds = 0
             minutes += 1
         Else
             seconds += 1
         End If
         If minutes >= 60 Then
             minutes = 0
         End If
         Label1.Text = minutes & "分" & seconds & "秒"
     End Sub
End Class



登录百度账号

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频!
  • 贴吧页面意见反馈
  • 违规贴吧举报反馈通道
  • 贴吧违规信息处理公示
  • 0回复贴,共1页
<<返回vb.net吧
分享到:
©2025 Baidu贴吧协议|隐私政策|吧主制度|意见反馈|网络谣言警示