|
VB6 is no longer supported.
|
|
|
|
|
When debugging user control, having Subclass handler, put your mouse on the user control not clicking, Sub zSubclass_Proc has promptly run, how to troubleshoot? is there a way that I can right-click on an object then run to? anyone knows please help.
|
|
|
|
|
If the user control code is within your project (not an OCX included), why not open it and set break points where required? The code execution will be interrupted at the break point even during design mode, if I am not mistaken...
HTH
Happiness will never come to those who fail to appreciate what they already have. -Anon
|
|
|
|
|
Welcome. Could someone help me in making Downloader?.
I'd like to pretend downloads. I do not want to download only to show, revealing the action "progress bar" and increase kb / s or mb / s ?
Regards.
|
|
|
|
|
Have a look at an article I wrote -> Application Auto-update via Online Files in C#[^].
It is in C# but you should be able to understand it and convert it to VB fairly easily.
There is a progress bar within the application that shows the progress of the download.
Regards
Guy
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
modified 9-Jan-13 6:40am.
|
|
|
|
|
You could do a downloader and send me a project and I would be opened in the Visual Basic?
|
|
|
|
|
Give the article and project a look and get back to me if you have specific questions about it 
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
|
|
|
|
|
Hello,
Im stock at this problem i got an error "The I/O operation has been aborted because of either a thread exit or an application request."
i got an error on this line
mySerialPort.WriteLine("SUCCESS!" & vbCrLf )
and here is my code.
Public Sub CommPortSetup()
If mySerialPort.IsOpen Then
mySerialPort.Close()
End If
Try
With mySerialPort
.PortName = "COM1"
.BaudRate = 115200
.DataBits = 8
.Parity = Parity.None
.StopBits = StopBits.One
.Handshake = Handshake.None
.DtrEnable = True
.RtsEnable = True
.NewLine = vbCrLf
End With
mySerialPort.Open()
MessageBox.Show("Connected to COMMPORT1")
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
mySerialPort.WriteLine("AT+CMGF=1" & vbCrLf)
System.Threading.Thread.Sleep(200)
mySerialPort.WriteLine("AT+CMGS=+6390720831187" & vbCrLf)
System.Threading.Thread.Sleep(200)
mySerialPort.WriteLine("SUCCESS!" & vbCrLf )
System.Threading.Thread.Sleep(200)
End Sub
End Module
|
|
|
|
|
What's with all the Thread.Sleep garbage?
|
|
|
|
|
I get rid of the "thread.sleep" for now,
but I got these error "An unhandled exception of type 'System.ExecutionEngineException' occured in Unknown Module.
Please help me.
|
|
|
|
|
Put the problem code inside your try block so you can capture some useful exception information.
One of these days I'm going to think of a really clever signature.
|
|
|
|
|
i only got these error
"The I/O operation has been aborted because of either a thread exit or an application request."
|
|
|
|
|
Unsurprising since you are trying to write to the port then immediately exiting from the subroutine, and possibly even the program. Put all your writing code inside the try block and check all the information that you get if an exception occurs.
One of these days I'm going to think of a really clever signature.
|
|
|
|
|
After a little reading of the .NET Framework documentation for the SerialPort Class, it looks like all you need to do is add the following line of code after your last MySerialPort.WriteLine and before the End Sub so that the transmit buffer is emptied before your program exits the Sub CommPortSetup procedure. See the underlined and bolded area in the information below.
MySerialPort.Close
According to the .NET Framework documentation:
SerialPort.Close Method
Remarks
Calling this method closes the SerialPort object and clears both the receive and transmit buffers. This method calls the Component.Dispose method, which invokes the protected SerialPort.Dispose(Boolean) method with thedisposing parameter set to true.
The best practice for any application is to wait for some amount of time after calling the Close method before attempting to call the Open method, as the port may not be closed instantly.
|
|
|
|
|
Hi Friend's, I am using excel 2007. In my file 6 sheets. 4 sheets is data record & 1 sheet is recorder sheet & monthly.
Data record sheet name is : FY_2009, FY_2010, FY_2011, FY_2012 & FY_2013.
In all above sheet :
Part numbers mentioned in column "C2:C60000"
Quantity in column "D2:D60000"
Branch in column "G2:G60000"
Month in column "H2:H60000"
Year in column "I2:I60000"
In some sheet record range in differ. Some sheet upto row 50000 & some sheet upto 38000 but field name partnumber quantity, branch, month & year in same column.
1st case : In recorder sheet i have calculate how many quantity sold part number wise as well as in particular year & branch wise. (Location of part number in A2:A10000 column & Year mention in column F2:J2 (i.e. 2009, 2010,2011,2012, 2013)
2nd case : In column L2 mentioned year (i.e. 2012) & L2:Q2 mentioned branch.(i.e. "HGN", "NGP", "AKL", "AMRT", "CHN", "YTMAL")
How many quantity sold branch wise in 2012 year.
3rd case : In column R2 mentioned branch (i.e. "HGN", & R2:W2 mentioned years 2009, 2010, 2011, 2012, 2013)
How many quantity sold from one branch in year wise.
In monthly sheet i have calculate how many quantity sold part number wise as well as in particular month & year wise.
In monthly sheet location of :
Part number in : "B1" cell.
Months : 1,2,3 ... so on upto 12 in location is B2:M2.
Years : "A4:A8
Presently, i have calculate through excel formula but calculation is slow due to thousand of data records
& thousand of formula. And it will take very long time.
Now i required to calculate through vba micro to speed up our work.
In view of the above kindly let me know.
Note: I am not familiar with VBA.
|
|
|
|
|
atulkhandekar wrote:
Presently, i have calculate through excel formula but calculation is slow due to thousand of data records
& thousand of formula. And it will take very long time.
Now i required to calculate through vba micro to speed up our work.
Using VBA to perform the calculations isn't going to speed up things much. Excel is not meant as a datastore, I suggest you put the records in a Database and work from there.
atulkhandekar wrote: Note: I am not familiar with VBA.
Try VB.NET; find a good book, and convert the formula's to code.
|
|
|
|
|
Sorry i don't have any idea regarding vba micro. And learning through VB.NET it will take time for learning.
If you have any ready made or example program for calculate excel 2007 summing data between column by vba.Post. Thanks for your suggestion.
|
|
|
|
|
Excel is not the right environment for manipulation of large datasets. Your problem is too specific to come up with a ready-made solution.
If you need to speed it up, VB.NET would be the easiest route.
|
|
|
|
|
atulkhandekar wrote: Presently, i have calculate through excel formula but calculation is slow due to thousand of data records & thousand of formula. And it will take very long time.
Not much you can do about that, other than reducing the number of records. You should check that your formula(s) is the most efficient way of doing it.
atulkhandekar wrote: Now i required to calculate through vba micro to speed up our work.
It is unlikely that doing this with a VBA macro will make it any faster, more likely the reverse.
One of these days I'm going to think of a really clever signature.
|
|
|
|
|
You can try pivot table. See more in inbuilt help.
|
|
|
|
|
Hi guys I have little bit Complex Algorithm to solve my little application using IF function.
I'm working on a little game using VB for that.
I have 12 buttons 3*4 three column and four rows. imagine these buttons as river and in the left or on the right side of the river there is a man would like to cross the river using these buttons as bridge.
the basic idea is if user presses the button there is message will show a question Yes or NO. if the answer is correct button turned to green otherwise will be blue if the answer incorrect.
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x = MsgBox("moon is biger than Sun", MsgBoxStyle.YesNo)
If x = DialogResult.Yes Then
Button1.BackColor = Color.Blue
Else
Button1.BackColor = Color.Green
End If
End Sub
End
[Button 1] [Button 2] [Button 3]
[Button 4] [Button 5] [Button 6]
[Button 7] [Button 8] [Button 9]
[Button10] [Button11] [Button12]
case 1:
the player can go from 1 to 3 horizontal
also allowed to go diametrical or free direction like : 10 and then 7 and then 8 and then 9 OR
Case 2:
from 7 and then 9 and then back to 8 .
Case 3:
or 10 to 8 to 5 to 3
case 4:
9 to 5 to 7
a lot if cases players can goes with to win
Finally
a message will show up ( the player win if he answers correctly )
this is my Big problem I have to study all the case and using IF
not the correct method also I cant go with Switch method
then I found out I have to use math Algorithm ..
each button has value like button1 take 10 value if the answer correct and button2 takes 20 and button3 takes 30 value.
by this way I can use IF function or switch ...
because if the total comes to 60 the player will win
but still Complex Algorithm for me
what I should do if the player has free directions to win .
Player has random choosing
I got headache to just think how can I solve probabilities that user may use it to win.
I know that to make my life easy just I have to make rules but I try to challenge my self with open direction how can I solve this problem
|
|
|
|
|
..typically, there's a function that returns whether a particular move (based on startpos and desired endpos as arguments) is valid. Then you call that in loop.
|
|
|
|
|
I am developing a simple programe in vb6 with ms access database, currently this programe run in a computer , now we go to work this programe in 4 computer , how can i share the access data base ... now i am using following codes
Public CnCargo As ADODB.Connection
CnCargo.Open "Provider =Microsoft.ACE.OLEDB.12.0;Data Source=F:\Invoice\Invoice.accdb;"
**** if the database path is working based on ip address it is very good ....
**** how can we configure INI file database path
please advice , if know
regards
mano
|
|
|
|
|
If I understand it correctly, you want to place the access MDB on one computer, make sure that folder where the MDB exists is shared, then you configure the connection string to reference the MDB something like "...Data Source=\\yourServerComputer\YourShareName\Invoice.accdb"
|
|
|
|
|
yes u correctly understood , but we are not maintaing server computer , and then it is not mdb file it is accdb file
please help
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
