Click here to Skip to main content
11,640,297 members (62,773 online)

Visual Basic

 
GeneralRe: Listbox String to RichTextbox. Help Please! Pin
Gray_Ang3l24-Feb-13 13:29
memberGray_Ang3l24-Feb-13 13:29 
QuestionActive Directory Users OU Pin
dsj4122-Feb-13 8:14
memberdsj4122-Feb-13 8:14 
AnswerRe: Active Directory Users OU Pin
Dave Kreskowiak22-Feb-13 8:45
mvpDave Kreskowiak22-Feb-13 8:45 
GeneralRe: Active Directory Users OU Pin
dsj4124-Feb-13 11:20
memberdsj4124-Feb-13 11:20 
GeneralRe: Active Directory Users OU Pin
Dave Kreskowiak25-Feb-13 10:31
mvpDave Kreskowiak25-Feb-13 10:31 
GeneralRe: Active Directory Users OU Pin
dsj4126-Feb-13 0:14
memberdsj4126-Feb-13 0:14 
GeneralRe: Active Directory Users OU Pin
dsj415-Mar-13 1:43
memberdsj415-Mar-13 1:43 
QuestionVolume Button in Text to Speech Convertor Pin
sanju_na21-Feb-13 22:05
membersanju_na21-Feb-13 22:05 
I am making text to speech converter in vb.net. I want a sliding volume button for the volume adjustment, I have tried it but its not working and I want one button which works for both pause/resume together with a timer that shows how much the time is taken in reading text. Please help me with simple and easy codes it would solve my problem because its my project and here is my code for tts:
Public Class FormTTS
Public SAPI = CreateObject("SAPI.spVoice")
Public Paused As Boolean = False
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Integer, ByVal dwExtraInfo As Integer)
Const KEYEVENTF_KEYUP As Long = &H2

Private Sub btnread_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnread.Click
SAPI.Speak(TextBox1.Text, 3)
TextBox2.Text = "0"
Timer1.Interval = 500
Timer1.Enabled = True
If TextBox1.Text = "" Then
MessageBox.Show("You didn't fill in the fields!")
End If
End Sub

Private Sub btnpause_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnpause.Click
If Paused = False Then
SAPI.Pause()
Paused = True
ElseIf Paused = True Then
SAPI.Pause()
Paused = False
End If
Timer1.Enabled = False
End Sub

Private Sub btnstop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnstop.Click
SAPI.Speak(vbNullString, 2)
End Sub

Private Sub btnresume_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnresume.Click
SAPI.Resume()
Timer1.Enabled = True
End Sub

Private Sub btnexit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnexit.Click
Dim Response As Integer
Response = MsgBox("Are You Sure You Want To Close The Program", vbYesNo, "Exit")
If Response = vbYes Then
Close()
Else
Me.Show()
End If
End Sub

Private Sub btnvol_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnvol.Click
Call keybd_event(System.Windows.Forms.Keys.R, 0, 0, 0) 'R down
Call keybd_event(System.Windows.Forms.Keys.R, 0, KEYEVENTF_KEYUP, 0) 'R up
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
TextBox2.Text = CInt(TextBox2 .Text) + 1
End Sub

End Class
QuestionHttpwebrequest + Socks5 Pin
mathisderaltefuchs20-Feb-13 21:49
membermathisderaltefuchs20-Feb-13 21:49 
AnswerRe: Httpwebrequest + Socks5 Pin
Richard MacCutchan20-Feb-13 23:00
mvpRichard MacCutchan20-Feb-13 23:00 
QuestionHow can we read lengthy datas in Win Forms - more height than 780 in single page by scroll? Pin
Paramu197320-Feb-13 6:19
memberParamu197320-Feb-13 6:19 
AnswerRe: How can we read lengthy datas in Win Forms - more height than 780 in single page by scroll? Pin
Eddy Vluggen20-Feb-13 6:39
mvpEddy Vluggen20-Feb-13 6:39 
GeneralRe: How can we read lengthy datas in Win Forms - more height than 780 in single page by scroll? Pin
Paramu197320-Feb-13 18:50
memberParamu197320-Feb-13 18:50 
GeneralRe: How can we read lengthy datas in Win Forms - more height than 780 in single page by scroll? Pin
Eddy Vluggen21-Feb-13 7:03
mvpEddy Vluggen21-Feb-13 7:03 
QuestionMaximize MDIParent and MDIChild control Pin
kurja-kurdoh19-Feb-13 6:41
memberkurja-kurdoh19-Feb-13 6:41 
AnswerRe: Maximize MDIParent and MDIChild control Pin
Simon_Whale19-Feb-13 21:58
memberSimon_Whale19-Feb-13 21:58 
QuestionDisable local accounts Pin
douglas.s.johnson@l-3com.com19-Feb-13 5:57
memberdouglas.s.johnson@l-3com.com19-Feb-13 5:57 
AnswerRe: Disable local accounts Pin
Eddy Vluggen20-Feb-13 0:32
mvpEddy Vluggen20-Feb-13 0:32 
GeneralRe: Disable local accounts Pin
dsj4120-Feb-13 11:22
memberdsj4120-Feb-13 11:22 
QuestionMenuId saved in Mysql DB and how to set Enable Pin
palur198118-Feb-13 1:31
memberpalur198118-Feb-13 1:31 
AnswerRe: MenuId saved in Mysql DB and how to set Enable Pin
Eddy Vluggen18-Feb-13 22:31
mvpEddy Vluggen18-Feb-13 22:31 
QuestionAnyone have a program where I can enter a username and have it provide info from Active Directory? Pin
anoble115-Feb-13 5:45
memberanoble115-Feb-13 5:45 
AnswerRe: Anyone have a program where I can enter a username and have it provide info from Active Directory? Pin
Dave Kreskowiak15-Feb-13 6:40
mvpDave Kreskowiak15-Feb-13 6:40 
AnswerRe: Anyone have a program where I can enter a username and have it provide info from Active Directory? Pin
Simon_Whale15-Feb-13 14:17
memberSimon_Whale15-Feb-13 14:17 
Questionmathematical expression with custom user input operand separately Pin
arave052114-Feb-13 6:12
memberarave052114-Feb-13 6:12 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.


Advertise | Privacy | Mobile
Web02 | 2.8.150731.1 | Last Updated 1 Aug 2015
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid