Free Program

Comments

Post a Comment

Popular posts from this blog

QR CODE SCANNER (Emgu CV ) VB.NET

Image
QR CODE SCANNER VB.NET Emgu CV Download :  http://www.emgu.com/wiki/index.php/Download_And_Installation Imports Emgu.CV Imports Emgu.CV.UI Imports Emgu.CV.Structure Imports MessagingToolkit.QRCode.Codec Public Class Form1     Dim Reader As QRCodeDecoder     Dim Cap As New Capture     Dim hash As String     Dim access As Boolean = False     Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick         Reader = New QRCodeDecoder         PictureBox1.Image = Cap.QueryFrame.ToBitmap()         Try             If access = True Then                 hash = Reader.decode(New Data.QRCodeBitmapImage(PictureBox1.Image))                 access = False                 If ...
Read more

Simple Lottery Game (Guna UI) VB.NET

Image
Simple Lottery Game (Guna UI) VB.NET Guna UI Download :  https://gunaframework.com/ FORM 1 Public Class Form2     Dim R1, R2, R3 As New Random     Dim PHP As Double = R1.Next(1, 999)     Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load         Dim formattedValue As String = String.Format("{0:C}", PHP)         Label5.Text = formattedValue     End Sub     Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick         'Random Generator         Label1.Text = R1.Next(1, 3)     End Sub     Private Sub Timer2_Tick(sender As Object, e As EventArgs) Handles Timer2.Tick         'Random Generator         Label2.Text = R2.Next(1, 5)     End Sub     Private Sub Timer3_Tick(sende...
Read more

PIN Password Tester (Bunifu UI) VB.NET

Image
PIN Password Tester (Bunifu UI) Public Class Form1     Dim password As Integer     Dim crackpass1 As Integer     Dim crackpass2 As Integer     Dim crackpass3 As Integer     Dim crackpass4 As Integer     Dim crackpass5 As Integer     Dim crackpass6 As Integer     Dim crackpass7 As Integer     Dim crackpass8 As Integer     Dim crackpass9 As Integer     Dim crackpass10 As Integer     Dim checker As New Random     Private Sub BunifuButton1_Click(sender As Object, e As EventArgs) Handles BunifuButton1.Click         Try             If Timer1.Interval = 0 Then                 MsgBox("Speed must not be ZERO")             Else                 Timer1.Interval = Me.Bun...
Read more