|
Tried that too, doesn't work.
|
|
|
|
|
Shouldn't you set the TextBox Width relative to the ToolStrip Width?
I don't speak Idiot - please talk slowly and clearly
'This space for rent'
Driven to the arms of Heineken by the wife
|
|
|
|
|
|
I did some tests this morning, and found the same thing as you. Resize or ResizeEnd etc don't fire when using maximise.
But i have found that the SizeChanged event of the form does. using this you can set the width of the text box in relation to the form size.
|
|
|
|
|
Damn! I'm just getting around to this question again and you stole my thunder!
|
|
|
|
|
Sorry!
It doesn't happen often....you are waaaaaay to smart and I know about 0.000001% of what you do!
|
|
|
|
|
Hi There
I am making a text to speech application which says a word from a text file on load and contains a button to repeat the word. The voice says the text from the file on load but crashes when I click the repeat button. My code is below.
Any and all help is appreciated.
Dim open As StreamReader
Dim word as String
Dim voice As New SpeechLib.SpVoice
Public Sub TTS_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
open = New StreamReader(path)
word = getword()
voice.Voice = voice.GetVoices("Name=Cepstral David").Item(0)
voice.Rate = -1
voice.Speak(word)
End Sub
Public Function getword()
Return open.ReadLine()
End Function
Public Sub btnrepeat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnrepeat.Click
voice.Speak(word)
End Sub
modified on Saturday, October 24, 2009 11:46 PM
|
|
|
|
|
Standard Question #1: What does the error message say, exactly?
|
|
|
|
|
Thanks for your reply. There was no error message. The form loads but when i click the repeat button the from freezes and stops responding.
|
|
|
|
|
Are you calling from the text file again? Was is closed after the initial operation?
I don't speak Idiot - please talk slowly and clearly
'This space for rent'
Driven to the arms of Heineken by the wife
|
|
|
|
|
Thanks for your reply.
Just fixed problem by creating new subroutine called read which reads the word and replacing all "voice.speak(word)
statements with "read()".
Final, working code is below.
Thank you Dave Kreskowiak and Andy_L_J For helping.
Dim open As StreamReader
Dim word as String
Dim voice As New SpeechLib.SpVoice
Public Sub TTS_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
open = New StreamReader(path)
word = getword()
voice.Voice = voice.GetVoices("Name=Cepstral David").Item(0)
voice.Rate = -1
read()
End Sub
Public Function getword()
Return open.ReadLine()
End Function
Public Sub btnrepeat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnrepeat.Click
read()
End Sub
public sub read()
voice.speak(word)
end sub
|
|
|
|
|
All -
I have an application that was written in VB 6 back in the mid-90's. I want to rewrite this app in ASP.Net, but I cannot open the project files with VS 2008. When I try to convert the files it gives me a error about an .ocx file missing that I can see in the directory?
If any body could open this project and send me the forms and code that would be great or if you could point in a direction to get VB 6 since it is no longer support by MS.
Thanks!
sk
|
|
|
|
|
The OCX file isn't registered on your dev machine.
All you have to do is open the .VBP file to convert the project. Except for the .FRX files (I think!), the rest is all text files. You can open them in Notepad if you had to.
|
|
|
|
|
VB6 -> ASP.NET is basically a rewrite anyhow. However, I reckon you could find VB6 on ebay.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
hello,i have a database.mdb and i want all the fields of the database to be showed in the datagrid.i have an adodb connection and i do not want to use a flexgrid.how can i do this?
Private Sub Form_Load()
Dim sDate As Date
Dim eDate As Date
sDate = #6/15/2009 6:00:00 PM#
eDate = #6/15/2009 8:00:00 PM#
createDummyBase sDate, eDate, 20, "P1--01"
End Sub
all the code is in the createDummyBase
the connection,the recordsets and the database are in the createDummyBase
the datagrid is in the form load
Public Sub createDummyBase(ByVal sDate As Date, ByVal eDate As Date, ByVal period As Integer, ByVal nodeId As String)
Dim cn As adodb.Connection 'opc
Dim rs As adodb.Recordset
Dim sqlstr As String
Dim dbFilename As String
Dim orig_path, new_path As String
Dim RunDate As Date
Dim delDate As Date
Dim DataGrid As DataGrid
Dim rs1 As adodb.Recordset
dbFilename = "Report_" & Format(Now, "MM_YY") & ".mdb"
If Dir(App.Path & "\data\Report_" & Format(Now, "MM_YY") & ".mdb") <> "" Then
Else
orig_path = App.Path & "\data\Report_mm_yy.mdb"
new_path = App.Path & "\data\Report_" & Format(Now, "MM_YY") & ".mdb"
FileCopy orig_path, new_path
End If
Set cn = New adodb.Connection
cn.ConnectionString = BuildConnectionString(dbFilename)
Set rs = New adodb.Recordset
cn.Open
rs.LockType = adLockOptimistic
Set rs.ActiveConnection = cn
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Open "Report", cn
RunDate = sDate
Do
rs.AddNew
rs!RecDate = RunDate
rs!nodeId = nodeId
rs!BatteryVoltage = findLastValue(RunDate, "BatteryVoltage", nodeId)
rs!i1 = findLastValue(RunDate, "I1", nodeId)
rs!i2 = findLastValue(RunDate, "I2", nodeId)
rs!I3 = findLastValue(RunDate, "I3", nodeId)
rs!MotorRun = findLastValue(RunDate, "MotorRun", nodeId)
rs!PowerFactor = findLastValue(RunDate, "PowerFactor", nodeId)
rs!WaterLevelOK = findLastValue(RunDate, "WaterLevelOK", nodeId)
RunDate = RunDate + TimeSerial(0, period, 0)
Loop Until RunDate > eDate + TimeSerial(0, 0, 1)
rs.Update
cn.Close
End Sub
the report is the table of the database which has been created.
the fields of the report we want to show in the datagrid
|
|
|
|
|
Why are you still using VB6 ? If I was stuck with maintaining a VB6 project, I'd probably use COM to add to it using C# or C++.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
hi,
expert i have create one simple application.
i selected one groupbox control in form and i want to change its appeance in diffrent from.
my groupbox apprerance is default just like square etc.
but want a groupbox Appearance is rectangle,Ellipse.
i hope u uderstand my querry.
Thanks.
|
|
|
|
|
The GroupBox control doesn't support this "out of the box". You'll have to create your own control to do this, or find a third party control. I don't know of any off the top of my head. But, if you Google for ".NET container controls" and do a little research, you might find something that fits your needs.
|
|
|
|
|
I am trying to add items entered into a textbox into a listbox after a user clicks a button.
But the only thing i want to do is format the way the list displays the input entered in the text box, so for example
a user enters into a text box: 12 23 3 48 10
each seperated by a space i want the listbox to display the data like this:
12
23
3
48
10
but I dont know how to format the listbox to display this way, please help thanks
|
|
|
|
|
You want to split the string using the split method to get the numbers as seperate strings and enter them seperately.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
I have writen a PSSnapin in Visual Basic but can find no information on the
following points:
1. How can the variables VerbosePreference and DebugPreference be changed during runtime?
2. How can the settings from PSCmdlet.vb be accessed from the console? (Using Get-PsSnapin MyDll only returns Name,Description & PSVersion).
3. How can one Exit the cmdlet at any point (without throwing an exception)?
4. What needs to be done to make Get-Help Get-MyCmdlet to work?
5. How can I access the equivalant of PowerShell MyInvocation.MyCommand during runtime, ie the commandline the user entered?
Any advice please?
|
|
|
|
|
1. Depending on what you mean by "during runtime", either through command parameters -verbose and -debug, by setting the $VerbosePreference or $DebugPreference, or by using the SessionState.PSVariable.Get/Set on the PSCmdlet.
2. Not sure what you are looking for here
3. You can use ThrowTerminatingError
4. Put an XML file with the name <libraryname>.dll-Help.xml with the appropriate schema in the same folder. You can get a program to help create these files here
5. You can get this from the aptly named MyInvocation property. This will only be available from a PSCmdlet.
|
|
|
|
|
Thank you, Sir. I have found a reference for making the required helpfile, .dll-Help.xml, so that one is fixed.By "During Runtime" I mean once the cmdlet is invoked by the user.
SessionState.PSVariable.Get/Set is a new one so I will investigate that; and likewise the MyInvocation property. I think I just retrieved "Powershell" from "My.Application.Info.CommandLine", which was not what I wanted.
I am still trying to set the -Verbose switch within a (Visual Basic) PS Cmdlet and can not get it to work:
Imports System.Management.Automation.PSCmdlet
Imports System.Management.Automation.SwitchParameter
Imports System.Management.Automation.Internal.CommonParameters
Dim setting As System.Management.Automation.Internal.CommonParameters
setting.Verbose = True 'Verbose is a SwitchParameter so should be settable.
(ERROR):variable 'setting' is used before it has been assigned a value...
modified on Friday, November 6, 2009 11:18 PM
|
|
|
|
|
Hi Friends,
I am trying to create dynamic Excel sheet with some kind of Pivot graphs in excel.Its working fine in mylocal system.But when i deployed in the server machine.Its saying Cannot create ActiveX component.
I tried with oexcel = New Excel.Application()
oexcel = CreateObject("Excel.Application")
Its working fine in local but not in server.
Please suggest me if any solution for this .
Regards
Ravi
|
|
|
|
|
Do you have the same version of Office installed on the server?
|
|
|
|