I am alive
Member
- Local time
- Today, 13:04
- Joined
- Aug 29, 2020
- Messages
- 139
Hahahahaaaaaa. You are really funny. @arnelgp has done good work so far and he is not complaining. God will bless him so much. I have learned a lot from him. By the way happy holidays.@I am alive - You are not asking for assistance, you are asking us to do your work for you for free. Perhaps you need to hire someone to do your work for you. You are learning nothing from arnel doing stuff for you for free. So, if you are not interested in putting in the work to learn, at least offer to pay him.
Public Sub set_controls()
Dim i As Integer
For i = 0 To UBound(arr)
With Me.Controls("l" & Format$(i + 1, "00"))
.Caption = lbl(i)
.BackStyle = 1
.BorderStyle = 1
End With
With Me.Controls("t" & Format$(i + 1, "00"))
.ControlSource = arr(i) 'DLookup("Description", "Subjects", "[Subject ID] = '" & lbl(i) & "'") & ""
.BorderStyle = 1
End With
Next
End Sub
Thank you so much @arnelgp. God will bless you so much. You have really helped me learn a lot on Microsoft Access. Once again thank you so much. Be blessed abundantly. God bless you.replace your code with this:
Code:Public Sub set_controls() Dim i As Integer For i = 0 To UBound(arr) With Me.Controls("l" & Format$(i + 1, "00")) .Caption = lbl(i) .BackStyle = 1 .BorderStyle = 1 End With With Me.Controls("t" & Format$(i + 1, "00")) .ControlSource = arr(i) 'DLookup("Description", "Subjects", "[Subject ID] = '" & lbl(i) & "'") & "" .BorderStyle = 1 End With Next End Sub
@arnelgp how are you once again. Kindly assist me with mean scores for the subjects entered. Like if if Students who do English are 10, then access should calculation for subjects taken at the bottom of the last Studentreplace your code with this:
Code:Public Sub set_controls() Dim i As Integer For i = 0 To UBound(arr) With Me.Controls("l" & Format$(i + 1, "00")) .Caption = lbl(i) .BackStyle = 1 .BorderStyle = 1 End With With Me.Controls("t" & Format$(i + 1, "00")) .ControlSource = arr(i) 'DLookup("Description", "Subjects", "[Subject ID] = '" & lbl(i) & "'") & "" .BorderStyle = 1 End With Next End Sub
I think this previous post proves my point?I not think you have learnt anything from @arnelgp except that he will give you what you ask for time and time again.
Sadly you end up learning nothing, other than to ask repeatedly.
Surely, what you are doing goes against rules of this forum. Why comment negatively if you don't want to assist people. Who told you to comment on what I have posted. @arnelgp has been of great help to so many people.I think this previous post proves my point?
check if this is what you meant (see the report).Like if if Students who do English are 10, then access should calculation for subjects taken at the bottom of the last Student
This one gives total students who did exams. I would like for the marks got divided by the total Students who did exam. E.g in English you sum all marks which the Students scored divided by the number of students who did that examscheck if this is what you meant (see the report).
Thank God we have people like @arnelgp and @CJ_London who assist people without asking alot of questions. They have really helped us novices a great deal. God will bless them so much.Arnelgp gives his time and effort very freely and I applaud him for it, but sometimes it doesn't help someone learn.
What have you tried? Show us some tiny bit of effort?
What will happen if @arnelgp is on holiday?
I will not bother you anymore, I've put you on my list.Surely, what you are doing goes against rules of this forum. Why comment negatively if you don't want to assist people. Who told you to comment on what I have posted. @arnelgp has been of great help to so many people.