|
First of all, this isn't a question but a statement. This looks like an order.
To answer your question: I don't know if this is the same in VB6, but a timer has a Tick event. The timer also has an interval that can be set. In VB6, if the interval is 0, the timer is disabled. Showing animations with a timer isn't a very good idea, because it uses a lot of CPU, but it can be done. Also, I have no idea where you are storing the pictures used in this animations. I will use images in a folder in this example.
Public ImgIndex as Integer = 0
Private Sub Timer1_Tick(...) Handles Timer1.Tick
ImageBox1.LoadPicture(Folder & "\Image" & ImgIndex.ToString & ".gif") 'LoadPicture is no longer being supported in higher versions of VB
ImgIndex+=1
End Sub
Yet, this code is far from perfect. When the animation is at it's final image, it will request an image that does not exist. In my example, you could solve this by counting the number of files in a folder, but it's risky.
Hope this helped you,
Zaegra
Motivation is the key to software development.
|
|
|
|
|
I Format datagridview column as currency but when I add data with this code
reader = OleDbCommand1.ExecuteReader()
Dim arr(6) As String
flag = False
DataGridView1.Rows.Clear()
'DataGridView1.ClearSelection()
While reader.Read()
arr(0) = reader.Item("obekt_name")
arr(1) = reader.Item("material")
arr(2) = reader.Item("edin_cena")
arr(3) = reader.Item("kolichestvo")
arr(4) = reader.Item("data_zakup")
arr(5) = reader.Item("cena")
DataGridView1.Rows.Add(arr)
flag = True
End While
not see currency sign, I want see $10000, but see only number 10000. I add data in MS access database using OLE cennection
|
|
|
|
|
um...
arr(n) = Format(reader.Item("myItem"),"$0.00")
I don't speak Idiot - please talk slowly and clearly
I don't know what all the fuss is about with America getting it's first black president. Zimbabwe's had one for years and he's sh*t. - Percy Drake , Shrewsbury
|
|
|
|
|
Thank You very much that work
|
|
|
|
|
I know in vb.net the TYPE is changed to Structure in vb.net
If you need to create new Structure in design time, you should add a module to your project and start building the structure you want.
Suppose you have this Structure
Public Structure strut_Employee
Public ID as Integer
Public FullName as string
End Structure
If you want to get reference to this type, you should code Dim Mytype as struct_Employee
I want to create structure dynamically.
RetStruct = CreateStruct("ID","Integer","FullName","String")
' The parameter are structure components
' CreateStruct should create the structure and return the created structure to RetStruct variable which is defined as structure
' Then I want the ability to use the below
RetStruct.ID = 1000
RerStruct.FullName = "Samir"
Can that be done? Either in vb6 or vb.net
TIA
Samir R. Ibrahim
|
|
|
|
|
In VB6, no, not at all.
In VB.NET, it's possible, but very rarely ever used. I suggest creating a DataTable instead.
Creating a structure at runtime is FAR more difficult that it sounds. You actually have to create the structure using CodeDom, treating it as if you were writing a VB.NET compiler, emitting MSIL code. A structure would be inefficient in this case because you can't reference it anywhere in your code, nor use any of it's members without further using Reflection, which is notoriously slow. Why? Because your structure doesn't exist at compile-time!
|
|
|
|
|
I Understand.
Let me ask the question in other way.
In VFP suppose you have function
Function Myfunc
A = 10
Return A
EndFunc
I can create this function at run time by a command called ExecScript
B = ExecScript("A = 10"+Chr(13)+Chr(10)+"Return A")
? B ' Return 10
Is there is similar function in vb.net?
Samir R. Ibrahim
|
|
|
|
|
Hi,
That is quite different from your original question, and I don't know of a way to do it easily.
Maybe you should tell more about your functional needs without focusing on technical details, and someone will suggest a way to tackle the functional problem.
Luc Pattyn [Forum Guidelines] [My Articles]
- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets
|
|
|
|
|
Hi Luc
Sonce Dave reply to my original question seems like "mission impossible 2" so thought if I can Wrap Around
Dim StrScript as String
StrScript = "Dim MyStruct as strut_Employee"
StrScript = StrScript & "Public Structure strut_Employee" & vbvrlf
StrScript = StrScript & "Public ID as Integer" & vbvrlf
StrScript = StrScript & "Public FullName as string" & vbcrlf
StrScript = StrScript & "End Structure"
MyVar = VBExecScript(StrScript)
Myvar should handle structure same as strut_Employee
Can that be done?
Samir R. Ibrahim
|
|
|
|
|
It is still not clear what you want to achieve at a higher level.
Yes in .NET you could have an app that writes source code to a file or stream, calls the compiler, which then creates a DLL, and then dynamically creates instances from the types in that DLL. It would use reflection.
Of course you can also write a utility program that creates some source files; then build the app including both your normal source files and these autogenerated files.
Luc Pattyn [Forum Guidelines] [My Articles]
- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets
|
|
|
|
|
OK, you've just stayed focused on the technical details, but haven't said anything about WHY you think you need to do this.
My answer doesn't change. Youre still trying to emit code and execute it. This is a very rare situation, and frankly, not one I've ever seen in a database app.
|
|
|
|
|
This Reply to both Luc & Dave
Thanks to both of you for your time in this post.
I don't have a problem I want to solve.
I am just somehow comparing command from VFP if exist in vb.net
I know that VB6 is not Scripting Language.
I thought that changed in vb.net
as Both of you ask "WHY", I agree with both of you with no good reason
or real problem behind my question.
I am just a little disappointed from vb.net for not having easy command for doing what I want.
Thank you very much.
Samir R. Ibrahim
|
|
|
|
|
The real question is why you would do this. I've been writing code for 23 years and never have had the need to do so.
|
|
|
|
|
I am special case that you HAVE to deal with. 
btw: I did not start asking hard question yet 
As you said twice, and as I confirm twice, I don't have a problem which I want to solve.
Asking "Why" is good question, because it may eliminate the need.
I learn something from you and Luc, the "Thinking/Technique" itself to solve a problem in VB.Net is totally different from thinking when creating in VFP. And I thought I will face trouble just in finding the right language command changing.
Each language has it is limit and capabilities, and I am discovering vb.net possibilities.
I can solve my problem by simple declare all the TYPES I want in a single module and return the TYPE I need by sending the TYPE name as parameter.
I don't know if VB.Net support the creation of FLAT dll. where I can declare a function in a FLAT dll i create as I declare win32 API Function and send the TYPE to it without the need of create a TYPE as constant.
I am organized in my programming approach, I had 1 month started with VB.Net and I am already collecting vb.net code and API not just save them as html in a folder, I am creating a classes in order to make the working with any project more easier.
My next approach after butting the code I collect in a class, is to learn how to create FLAT dll, not COM dll. If I will face a trouble in creating FLAT dll, I will simply go to COM DLL.
That is the real reason why I am asking this question.
The Second reason, is the ability to create DLL(FLAT or COM) created by vb.net and use it in VFP if possible. since VFP does not support TYPE or Construct I would like to know if that is possible.
Thank you for your time and attention regarding my question.
Samir R. Ibrahim
|
|
|
|
|
First, the FLAT dll you're talking about is really a Library DLL. There are two types - normal and .NET. A .NET library DLL is not usable by Win32 functions as is because the managed code compilers in .NET don't support the proper exports required by Win32.
Samir Ibrahim wrote: I can solve my problem by simple declare all the TYPES I want in a single module and return the TYPE I need by sending the TYPE name as parameter.
Bad idea. You normally organize the data model in individual classes or groups of classes that deal with specific parts of your data model. The concept is called encapsulation. You don't put everything in a single module and then tell some creator which type you want. Though that has its uses, it's called the Factory pattern, the way you describe it, you're violating OOP rules.
Samir Ibrahim wrote: The Second reason, is the ability to create DLL(FLAT or COM) created by vb.net and use it in VFP if possible.
It's possible, but not as a library DLL. VB.NET and C# don't support the old Win32 exports you're inferring. You have to attribute the classes you want to expose properly so they're exposed through COM.
|
|
|
|
|
Dave Kreskowiak wrote: The concept is called encapsulation.
That concept is one of the reason of me taking 4 kind of medicine
I had gone through a lot of discussion regarding encapsulation in OOP rule. And I read to much about it. I hope that you don't mind I ask you about this later on.
Dave Kreskowiak wrote: you're violating OOP rules
That is a big assumption to say it so early before you see the code.
As saying "Public variable will break the Encapsulation", which is totally wrong if you mean it as abstract sentence.
Dave Kreskowiak wrote: It's possible, but not as a library DLL. VB.NET and C# don't support the old Win32 exports you're inferring.
Thank you for the information.
I learn new thing from you with every post 
Samir R. Ibrahim
|
|
|
|
|
Hi again
It seem I miss-understand your question.
The point is, create a structure on the fly that can be passed to API calls when the API needs TYPE declaration.
Samir R. Ibrahim
|
|
|
|
|
Hi,
It all depends. What API?
.NET supports dynamic stuff but it is not simple to use it.
If the number of required types is limited (say a subset of the Win32 types) it would be much easier
to predefine those types, that is what everyone is doing when calling native functions from
kernel32.dll, user32.dll, and the like. As an example, look at www.pinvoke.org
If the types are yours, and you are in charge of the code on both sides, then you may consider replacing all those structs by key-value collections, where both keys and values are strings. As far as the interface goes, that could boil down to an array of strings (holding an even number of them),
or even one big string with a separator char as in
"key1=value1;key2=value2;...;keyN=valueN"
Hope this helps.
Luc Pattyn [Forum Guidelines] [My Articles]
- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets
|
|
|
|
|
Luc Pattyn wrote: It all depends. What API?
So far the requirement is Win32 API
Luc Pattyn wrote: www.pinvoke.org
This site is down?
Luc Pattyn wrote: consider replacing all those structs by key-value collections, where both keys and values are strings
I had test all what you said except array.
The String with "," works fine with me
Yup, It was very helpful
Thanks 
Samir R. Ibrahim
|
|
|
|
|
Sorry, it is PInvoke.net[^]
Luc Pattyn [Forum Guidelines] [My Articles]
- before you ask a question here, search CodeProject, then Google
- the quality and detail of your question reflects on the effectiveness of the help you are likely to get
- use the code block button (PRE tags) to preserve formatting when showing multi-line code snippets
|
|
|
|
|
Hello friends,
I am struck with a bug in my code and find it difficult to debug.
In my MS access application, I am creating some reports using SQL queries to fetch data from Access Table and SQL table. Some time the code works fine, creating the report fine. Some time its not creating the report fully, skipping some queries and conditions.
If I try to run the code using 'Step in', the report always creating as expected. if it run otherwise report fails. I tried using with delays, then its working fine. But I have to use min 5 sec delay for that. So its effecting the performance.
I dont have much experience in VBA and SQL queries. IS it due to some error in my code or something else?
Thanks and regards
Jishith
|
|
|
|
|
Without seeing the code, it's impossible to say. Even then, with it may be difficult. If sections of code are being skipped, it sounds like you have a design problem or you're catching and eating errors with On Error Resumt Next, without checking the Err object at various stages to see if an error occured before continuing.
|
|
|
|
|
The code works always fine with single steppings. When at full running , the problem occurs.. If i putting any break point inside the code, 80% times run properly...
And i am not using On Error Resume Next in this function.
|
|
|
|
|
Then you're going to have to put some tracing code in there to see what variables have what values at various points in your code. Log this information to a file and review it when the problem occurs.
|
|
|
|
|
Hi All,
I am working in a project "send and receive message using PC/mobile(GSM)". Sending and receiving messages are working properly. But while reading/sending messages, If any interruption(like SMS/CALL) comes to mobile, my process has to be stopped/waiting long time for network answer/returns "+CMS:Error".
I have changed my code that one thread do sending messages and another thread will do read messages. So I used backgrounworker thread for sending messages. But it also doesn't works.
still am getting same error(stopped/waiting long time/returns "+CMS:Error").
Give some idea to do this correctly..... send related links to read
Thanks in Advance
modified on Saturday, February 14, 2009 1:13 AM
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
