battle programminga forum for elite programmerswith extreme will powerto sharpen theire skills
 
HomeCalendarFAQSearchMemberlistUsergroupsRegisterLog in
Share | 
 

 VS2017 confirmed working codes

Go down 
AuthorMessage
Moti Barski

avatar

Posts : 238
Join date : 2011-08-02

PostSubject: VS2017 confirmed working codes   Tue Mar 21, 2017 9:43 pm

screen capture :
Code:
Public Class Form1
    'Dim bmp1 As Bitmap
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim bounds As Rectangle
        Dim screenshot As System.Drawing.Bitmap
        Dim graph As Graphics
        bounds = Screen.PrimaryScreen.Bounds
        screenshot = New System.Drawing.Bitmap(bounds.Width, bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppRgb)
        graph = Graphics.FromImage(screenshot)
        graph.CopyFromScreen(bounds.X, bounds.Y, 0, 0, bounds.Size, CopyPixelOperation.SourceCopy)
        PictureBox1.Image = screenshot.Clone()
        screenshot.Dispose()
    End Sub
End Class

_________________
MB over and out _______________________     
Back to top Go down
View user profile
Moti Barski

avatar

Posts : 238
Join date : 2011-08-02

PostSubject: Re: VS2017 confirmed working codes   Tue Mar 21, 2017 10:17 pm

see Re: vb.net volume meter   Fri Mar 17, 2017 2:45 am

http://yotamarker.forumotion.com/t10-vb-net-volume-meter

_________________
MB over and out _______________________     
Back to top Go down
View user profile
Moti Barski

avatar

Posts : 238
Join date : 2011-08-02

PostSubject: visual studio 2017 break point   Tue Apr 11, 2017 9:55 pm

to insert a break point stand on the code line and type f9
then you can also right click the point to add conditions such as I = 3
with I being some var you declared

_________________
MB over and out _______________________     
Back to top Go down
View user profile
Moti Barski

avatar

Posts : 238
Join date : 2011-08-02

PostSubject: text to speech   Sun Apr 23, 2017 1:38 am

tools, add reference (type)speechlib
Code:

Imports System.Speech.Synthesis
'https://www.youtube.com/watch?v=sC2kQ-vx42M
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim synth As New SpeechSynthesizer
        synth.SelectVoiceByHints(VoiceGender.Female, VoiceAge.Child)
        synth.Speak(TextBox1.Text)
        TextBox1.Clear()

        'Dim SAPI
        'SAPI = CreateObject("SAPI.spvoice")

        'SAPI.Speak("Welcome to the 13th visual basic .net tutorial")

    End Sub
End Class

_________________
MB over and out _______________________     
Back to top Go down
View user profile
 
VS2017 confirmed working codes
Back to top 
Page 1 of 1
 Similar topics
-
» Query - web driver element click is not working
» A list of CSS codes i need
» Migraines and Working Out Fear
» Nothing is working to stop these migraines :(
» Make sure you have surge protection working the next few days

Permissions in this forum:You cannot reply to topics in this forum
battle programmers alliance :: battle programming alliance :: battle programming-
Jump to: