|
Maffyx wrote: I want to put it all into a function or a sub. I'm not sure what the difference is but I want it to have an input, use the code, and then return what the code says. Is something like this possible? H
Ahhh...one of the things I really disliked about VB/VB.NET was that it makes such a distinction between a "sub" and a "function". This difference is really just a syntax difference that the language exposes, not a real difference in the runtime itself.
A "sub" and a "function" are both part of a concept generally known as methods. A method can have a "return type" or can return nothing, in which case it is said to have a "void" return type. The return type is the output of the method. In all cases a method can have one or more parameters specified, which are the inputs to the method.
Most languages do not make a distinction between a method that has a real return type or a void return type. VB/VB.NET, however, does. A "sub" in VB/VB.NET is simply a method that has a void return type while a "function" is a method that has a real return type.
You actually answered your own question when you asked it...you specifically stated that you "want it to have an input...and then return..." so you are looking for a "function" that has a real return type.
As far as taking your code and wrapping it in a function, you need to decide what your inputs should be and what your return type should be. Looking at your sample code it looks like you are setting Label11.Text so you probably want to return a String value and you probably want a String return type as well.
Your code should end up looking something like this:
Public Function F1 (filePath as String) As String
Begin
' Your code goes here...
' This is how you actually return a value from a function. In this
' case the function returns a String, so you set the name of the
' function equal to the value you want returned.
F1 = "text"
End
Scott Dorman Microsoft® MVP - Visual C# | MCPD
President - Tampa Bay IASA
[ Blog][ Articles][ Forum Guidelines]
Hey, hey, hey. Don't be mean. We don't have to be mean because, remember, no matter where you go, there you are. - Buckaroo Banzai
|
|
|
|
|
Awesome thanks for the help, this worked out well for me!
|
|
|
|
|
You're welcome. Glad you got it worked out.
Scott Dorman Microsoft® MVP - Visual C# | MCPD
President - Tampa Bay IASA
[ Blog][ Articles][ Forum Guidelines]
Hey, hey, hey. Don't be mean. We don't have to be mean because, remember, no matter where you go, there you are. - Buckaroo Banzai
|
|
|
|
|
Anyone here know how to get the number of items currently in the user's Recycle Bin? Oh, and just to let you know, i'm using .NET 3.0, so it will have to work in that.
Edit: almost forgot. If you know how, i would also like something that can return the path to the user's recycle bin, or a function that will empty it. Thanks.
modified on Saturday, September 13, 2008 8:06 PM
|
|
|
|
|
|
lol, Didn't mean it had to be .NET, just had to work in it. Thanks.
|
|
|
|
|
I am trying to import data using xml file into Tally. For that i am using below code in vb.net.
Dim strXml As XmlTextReader
myLink = New RTSlink()
strXml = New XmlTextReader("Test.xml")
strXml.MoveToContent()
Dim n As Long = myLink.Send(strXml.ReadOuterXml(), TallyServer)
Thanks
Regards,
Pinakin
|
|
|
|
|
... and? I take it there's a question in there somewhere... Maybe if you explained what you're trying to do, what Tally is, and and error messages your getting, we might be able to help.
|
|
|
|
|
I assume something is not working, so I suggest you contact Tally - whoever they are.
Bob
Ashfield Consultants Ltd
|
|
|
|
|
My system gives the following "An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll
what does it mean?
Can someone help me please?
|
|
|
|
|
dereck wrote: Can someone help me please?
of course - first go and read the topmost post in the forum about how to get an answer to your question ..
then, you're going to need to debug/trace through your source code to the line(s) you think are throwing the exception
then you're going to need to post some source-code ie the lines surrounding the line where the error occurs, so people can maybe look at it
... else its a bit like expecting us to be mind-readers
|
|
|
|
|
Garth J Lancaster wrote: to be mind-readers
Sorry, my mind reading department is closed for the weekend 
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
"Not only do you continue to babble nonsense, you can't even correctly remember the nonsense you babbled just minutes ago." - Rob Graham
|
|
|
|
|
yeah well, its 1:19am on a Sunday am here, a colleague and I are in the office for perhaps another hour ... so if they read my mind it'll be
------------------------------------------ (flatline)
|
|
|
|
|
Garth J Lancaster wrote: so if they read my mind it'll be
------------------------------------------ (flatline)
Yep 
My mom once had a license plate frame on her car that said:
I read your mind, but it was blank
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
"Not only do you continue to babble nonsense, you can't even correctly remember the nonsense you babbled just minutes ago." - Rob Graham
|
|
|
|
|
What else can I say? 
Blog link to be reinstated at a later date.
|
|
|
|
|
 .. hope you're well and safe over there 'lls'
|
|
|
|
|
Sure. It means the code you wrote that does some access to a database created a situation that caused an error. With what you've posted, that's about the best explaination anyone can give you.
|
|
|
|
|
How to copy a DAT file from one machine to another within a workgroup with using code in vb6
I am using the below code:
Private Declare Function CopyFile Lib "kernel32" _
Alias "CopyFileA" (ByVal lpExistingFileName As String, _
ByVal lpNewFileName As String, ByVal bFailIfExists As Long) _
As Long
Public Function APIFileCopy(src As String, dest As String, _
Optional FailIfDestExists As Boolean) As Boolean
'PURPOSE: COPY FILES
'PARAMETERS: src: Source File (FullPath)
'dest: Destination File (FullPath)
'FailIfDestExists (Optional):
'Set to true if you don't want to
'overwrite the destination file if
'it exists
'Returns (True if Successful, false otherwise)
'EXAMPLE:
'dim bSuccess as boolean
'bSuccess = APIFileCopy ("C:\MyFile.txt", "D:\MyFile.txt")
Dim lRet As Long
lRet = CopyFile(src, dest, FailIfDestExists)
APIFileCopy = (lRet > 0)
End Function
Private Sub Command1_Click()
Dim Str
Str = APIFileCopy("c:\FeatherTexture.bmp", "\\sim3\D$\FTP\FeatherTexture.bmp", False)
End Sub
The Problem is that whenever I try to copy the file to any of the machine in the woprkgroup, it is not copying. After I open the other computer in the workgroup from my computer using "Run" command and type username and password and got connected to the other computer, it allows me to copy the file. But I dont want to select "Run" command and type username and password, because I want to copy the file to multiple machines in the work group. I doesn't make sense typing user name and password for all the computers in the workgroup in order to copy the file.
Pls provide me some solution to copy the file only by using the code without using the Windows "Run" command
|
|
|
|
|
hmmm.. why dont you look at using wnetaddconnection first to create a connection to each other machine in turn (for which you'll need the userid and password on each machine) and then copy to/thru that ... then use wnetcancelconnection when done
although this is c#, you can use the same idea :-
http://www.codeproject.com/KB/system/Map_Network_folder_UNC_.aspx[^]
(else, you could permanently map a connection from each machine to your source machine, but thats a bit inflexible)
oh, if you go along the first route, maybe you want to store each machine's credentials in encrypted form (and maybe have a common userid/password on each for this task)
hth
'g'
|
|
|
|
|
Since you're using workgroup mode to do your networking, each machine maintains its own user/password database and does NOT trust the ID's in any other machines user database. This means you have no choice but to specify a username and password for each machine your going to copy files to. If these machines were setup in a domain environment, this wouldn't be a problem at all since all the machines in the domain trust the same user database.
There is no code that will solve this problem for you.
|
|
|
|
|
Thanks Lloyd Atkinson for your suggestion but it is not a proper answer for me.
I want to open a text file by right clicking on it,choosing 'open with' option,and selecting my program.
I want to open text file as 'open with' my program instead of executing my program and then opening texe file.
Plz help me...
|
|
|
|
|
|
Oh I see what you mean now, you will just have to register your file type in the registry like Eslam Afifi said.
Lloyd J. Atkinson
"Logic will get you from A to B, but imagination will take you everywhere" - ALbert Einstein
I look at Microsoft, and turn to my poster on the wall saying: "Bang head here in case of stress".
|
|
|
|
|
|
Well, what do you mean? Are you incapable of reading the comments in the code?
"The clue train passed his station without stopping." - John Simmons / outlaw programmer
"Real programmers just throw a bunch of 1s and 0s at the computer to see what sticks" - Pete O'Hanlon
"Not only do you continue to babble nonsense, you can't even correctly remember the nonsense you babbled just minutes ago." - Rob Graham
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
