Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
Time span の使い方
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=30166#CommentId82527
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
RJ
 (社会人)
投稿日時
2016/9/30 15:56:02
魔界の仮面弁士 様
さっそくやってみました!できました
ありがとうございます
何もしてない時間はクリアーにするにはこれでよろしいでしょうか??
ちょうど15:40からでスタートしています
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Dim dt As Date = Now
Dim hm As Integer = dt.Hour * 100 + dt.Minute
If 1540 <= hm AndAlso hm < 1550 Then
TextBox1.Text = "テスト"
TextBox1.ReadOnly = True
Else
TextBox1.ReadOnly = False
End If
If 1550<= hm AndAlso hm < 1600 Then
TextBox1.Text = ""
TextBox1.ReadOnly = True
Else
TextBox1.ReadOnly = False
End If
If 1600 <= hm And hm < 1610 Then
TextBox2.Text = "テスト②"
TextBox2.ReadOnly = True
Else
TextBox2.ReadOnly = False
End If
End Sub
End Class
他の時間帯になると
textboxは表示されてるままになりますよね?
もし表示したくなければ
あとの時間の処理に""をすれば
よろしいでしょうか??
Timespanでも試してみて
できました
非常にわかりやすくてすごく助かります
ありがとうございます。