Member Avatar for zalen17

Can you give me some codes of how to make a Online Grading Enquiry System using visual basic. i need your help sir beacause this is uour project.

hope can you help me

  • 3 Contributors
  • 3 Replies
  • 128 Views
  • 2 Hours Discussion Span
  • Latest Post Latest Post by zalen17

Dani AI

Generated

This thread requests a starter plan for an Online Grading Enquiry System in VB.NET. correctly noted that handing in a finished homework project defeats learning, and asked for any existing code. Below is a compact, practical starting slice that keeps the work educational while giving concrete building blocks.

Start small and iterate:

  • Database: Students, Courses, Enrollments (StudentID, CourseID, Semester, Grade).
  • Data access: a single function to return grades for a StudentID (use parameterized queries or an ORM).
  • UI: a simple web page or form with a search box and a grid to display results.
  • Admin: separate pages for entering/updating grades with authentication and role checks.

Minimal schema example:

CREATE TABLE Students (
  StudentID INT PRIMARY KEY,
  FirstName NVARCHAR(50),
  LastName NVARCHAR(50)
);

CREATE TABLE Courses (
  CourseID INT PRIMARY KEY,
  CourseCode NVARCHAR(10),
  Title NVARCHAR(100)
);

CREATE TABLE Enrollments (
  EnrollmentID INT IDENTITY(1,1) PRIMARY KEY,
  StudentID INT REFERENCES Students(StudentID),
  CourseID INT REFERENCES Courses(CourseID),
  Semester NVARCHAR(10),
  Grade NVARCHAR(5)
);

A compact VB.NET data-access pattern (safe, disposable):

Imports System.Data.SqlClient

Public Function GetGrades(studentId As Integer) As DataTable
    Dim dt As New DataTable()
    Dim sql As String = "SELECT s.StudentID, s.LastName, c.CourseCode, e.Grade, e.Semester
                         FROM Students s
                         JOIN Enrollments e ON s.StudentID = e.StudentID
                         JOIN Courses c ON e.CourseID = c.CourseID
                         WHERE s.StudentID = @StudentID"
    Using cn As New SqlConnection("Data Source=.;Initial Catalog=SchoolDB;Integrated Security=True")
        Using cmd As New SqlCommand(sql, cn)
            cmd.Parameters.Add("@StudentID", SqlDbType.Int).Value = studentId
            Using da As New SqlDataAdapter(cmd)
                da.Fill(dt)
            End Using
        End Using
    End Using
    Return dt
End Function

Notes and cautions: always use parameterized queries/ORM to avoid SQL injection, protect student data with HTTPS and authentication, and log admin actions. As suggested, posting partial code or specific errors in this thread will make it possible for members to provide targeted fixes and guidance without supplying a complete thesis solution.

Recommended Answers

All 3 Replies

Member Avatar for Begginnerdev

We are not here for home work help.

If you have some code of your own that you are needing help with- post it.

Other than that, we are NOT going to do your homework for you.

How are you going to learn when someone does it for you?

Member Avatar for Pgmer

please show your code what you have so far.

Edited by Pgmer
Member Avatar for zalen17

i know some code but this is our thesis project and iwant only to explore it not to copy all. and i want also to learn i just want to have some so that i can make my own version in making, because it hard for me to start. help me

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.