[RESOLVED] Mod Help

[homer5677]

Hi,
I'm still fairly new to vb so I'm a bit of a noob!


I'm making a something that will display the number of months,weeks and remainding days if a user inputs a certain amount of days.
e.g. user input: 45 Days

Displays: 1 Month, 2 weeks, 1 day.

I am using MOD for this but i'm a bit stuck for what code.
So far:

input MOD 7 = lbldays

And yeah. SO how do i get it to display x no. of week once it gets to 7 days.
I have the days going fine... I think. Because every 7 clicks of a scroll bar it resets.
Thanks

[seenu_1st]

what abt this?

Private Sub Command1_Click()
Dim m As Integer, w As Integer, d As Integer
Dim days As Integer
days = 45
m = Int(days / 30)
w = Int((days - (m * 30)) / 7)
d = days - (m * 30) - (w * 7)
MsgBox m & "," & w & "," & d
End Sub

[homer5677]

Thanks seenu but I NEED TO USE MOD-Its for a school project!

AND
I want it to be able to use for any day amount put in. Not just 45-I was just using as an example.
So a user selects a number of days on a scroll bar and then it displays it in week,days etc.

[seenu_1st]

it's not only for 45 days, anyway try this with a label and scroll bar

Private Sub Form_Load()
With HScroll1
    .Min = 1
    .Max = 100
End With
End Sub

Private Sub HScroll1_Change()
Dim m As Integer, w As Integer, d As Integer, Temp As Integer
Dim days As Integer
days = HScroll1.Value
m = Int(days / 30)
Temp = days Mod 30 'temp = balance days
w = Int(Temp / 7)
Temp = Temp Mod 7 'temp = balance days
d = Temp

Label1.Caption = "Month = " & m & " Week = " & w & " Day = " & d

End Sub

[MartinLiss]

Hi,
I'm still fairly new to vb so I'm a bit of a noob!


I'm making a something that will display the number of months,weeks and remainding days if a user inputs a certain amount of days.
e.g. user input: 45 Days

Displays: 1 Month, 2 weeks, 1 day.

I am using MOD for this but i'm a bit stuck for what code.
So far:

input MOD 7 = lbldays

And yeah. SO how do i get it to display x no. of week once it gets to 7 days.
I have the days going fine... I think. Because every 7 clicks of a scroll bar it resets.
Thanks

What does 'Because every 7 clicks of a scroll bar it resets" mean?

BTW you might want to mention to your teacher that the answer is more reasonably 1 Month, 2 weeks because more moths have 31 days, than 30 unless he/she specifically said to assume that a month has 30 days.

[CDRIVE]

Thanks seenu but I NEED TO USE MOD-Its for a school project!

AND
I want it to be able to use for any day amount put in. Not just 45-I was just using as an example.
So a user selects a number of days on a scroll bar and then it displays it in week,days etc.

This reply could possibly be the quintessential example of why this forum does not and should not do other peoples homework.

[homer5677]

Its not homework as such... Cause we are only doing like very basic stuff. By this i mean VERY BASIC -i.e--the rest of the class is still having problems changeing colours of labels with cmd buttons. I'm doing a extension thing!

Thanks Seenu... I worked it out with some of your code. I wanted 3 labels
Thanks