Traditional Culture Encyclopedia - Traditional stories - VB time calculation, expert help look at the program
VB time calculation, expert help look at the program
Private Sub Command1_Click()
Dim D1 As Date, D2 As Date
D1 = CDate(Text1.Text) 'Start Date Time
D2 = CDate(Text2.Text) 'Date to be displayed
Do
If D1 - D2 >= 0 And D1 - D2 < 1 Then
Print D1
End If
D1 = D1 - 1 / 48
Loop While D1 >= D2
End Sub
Date(Text2.
- Related articles
- The top ten most profitable things
- What does the zodiac in China mean?
- Football history
- Difference between Statement of All Recognized Gains and Losses and Traditional Performance Statements
- Chinese etiquette, about holding a bowl, please help me! ~
- How to remove wrinkles
- Hakka Marriage Customs in Huidong
- Present situation of folk custom development in Jinggangshan
- Introduce the commander's office.
- The practice of ancestral millet rice wine