SOFTWARE AND PROGRAMMING TUTORIALS
Would you like to react to this message? Create an account in a few clicks or log in to continue.

Go down
Admin
Admin
Admin
Posts : 24
Join date : 2023-06-28
https://alexia-im.forumotion.asia

REUSCOREBOARD DLL FILE Empty REUSCOREBOARD DLL FILE

Mon Jul 24, 2023 11:03 pm
HI GUYS,HAVE A GOOD DAY,TODAY I WILL SHARED MY NEW PROGRAM THAT CAN HELP SOMEONE WHO WANT TO BUILD HIS OWN BOT GAMER AND NEED TO ADD SCORE ON HIS PROGRAM,NOW I BUILD THE DLL FILE FOR SCOREBOARD THAT AUTOMATICALLY SAVE PLAYERS LIST AND HIS DATA SCORE,ALSO ON THIS FILE,YOU CAN RETRIEVE USERS DATA AND SHOW WINNER.

I DECIDE TO BUILD THIS TO REDUCE THE CODES,THE ORIGINAL CODES HAVE A 2 MODULES AND SOME CODES IN THE WINDOWS FORM,SO THATS WHY I BUILD DLL FILE.

NOW YOU CAN USE THIS AS FREE,AND ADD A LITTLE CODES TO WORK.

[You must be registered and logged in to see this link.]




NOW,HOW ITS WORK?
FIRST,DOWNLOAD THIS REUSCOREBOARD.DLL


[You must be registered and logged in to see this link.]

AFTER YOU DOWNLOAD MAKE IT EXTRACT THE FILE.
NOW MAKE A NEW PROJECT IN YOUR VISUAL STUDIO

ADD 6 TEXTBOX IN YOU FORM
FOR
- CATEGORY
- PLAYER NAME
- SCORE
- TOTAL SCORE
- PARTICIPANT LIST
- WINNER

ADD 3 BUTTON
FOR
- SAVE
- SHOW PARTICIPANT LIST
- SHOW WINNER

AFTER THAT,ADD THIS CODES



FULL CODES:


Code:
Imports REUSCOREBOARD.REUSCOREBOARD.REUscoreBoard
Imports System.IO
Imports System.Threading
Public Class Form1
    Private dlltest As REUSCOREBOARD.REUscoreBoard
    Private reg As REUSCOREBOARD.ModifyRegistry
    Private cbot As REUSCOREBOARD.ScoreMod
    Public Sub New()
        InitializeComponent()
        dlltest = New REUSCOREBOARD.REUscoreBoard
        cbot = New REUSCOREBOARD.ScoreMod
        reg = New REUSCOREBOARD.ModifyRegistry
        ' dlltest.uwin()
    End Sub
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        dlltest.quiz = txtcategory.Text
        dlltest.user = txtplayer.Text
        dlltest.score = txtscore.Text
        dlltest.addscore()
        Thread.Sleep(1000)
        If dlltest.ttotal Is Nothing Then
            Return
        Else
            txttotal.Text = dlltest.ttotal.ToString()
        End If
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        dlltest.parti()
        txtparticipant.Text = dlltest.partiresult.ToString
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        dlltest.uwin()
        txtwinner.Text = dlltest.userwin.ToString
    End Sub
End Class



IF YOU LIKE VTHIS TOPIC,PLEASE
SUPPORT MY YOUTUBE CHANNEL
BY SUBSCRIBE,AND CLICK ANY
ADVERTISE LINK HERE IN MY WEBSITE.
THANKS!
Back to top
Permissions in this forum:
You cannot reply to topics in this forum