Hey, thanks :)

Hi,
Can you give us more details about it?

Hi,
Use the Replace function.
The syntax is Replace(string, find, replace)
Doing it in your code:

Private Sub Command1_Click()

Dim dText As String, dNextLine As String, lLineCount As Long...

Hi,
Try this code:

Private Function SeparateString(str As String) As String
Dim x As Integer
Dim retStr As String

retStr = ""
For x = 1 To Len(str)
retStr =...

I see. I'll change it. Thanks.
If you think that your problem is solved, please, mark as solved this thread.

Regards

HI,
I see your point. But what he need is to separate some bits from a word. To do this, the easy way is to use masks. The mask thing is not an invention of mine.

Take a look here:...

And it is nice too, but as he say, he don't have string binary values. All that I know is the existence of two bytes. I've coded taking account of these.
As you said... Have fun ;)

Sorry,
But it is not VB code.
And please, use the [ CODE][/CODE ] tags.

Hi,
Well, I guess you have to shift right the variable fourBits 12 positions.
Try this (I am not really sure it will work, because I have not VB here)

Dim byteA As Long
Dim byteB As...

Hi,
Try this

Dim byteA As Long
Dim byteB As Long
Dim sumBytes As Long
Dim fourBits As Long
Dim twelveBits As Long

byteA = 32 ' 00100000b = 32d

Hi,
Is your problem solved?

Hi,
Think of a property just as if it were a regular variable. You can get or assign only one value at once.
If you need to pass more than one parameter to a property, instead use a regular Sub...

Hi,
First, this is not VB6 code. It is VB.Net.
To load an image, you must code:
Dim coinImage As Image
Dim imagePath As String = ""

If choice = 0 Then
...

I think so!
Come on boy, sit and code by yourself! :icon_cheesygrin:

Thanks!
I was using something like this:
If TypeOf (ctl) Is TextBox Then
...
End If
The problem is with "(" and ")". It doesnt work in VB6.

Hi,

I am working in an application that uses Drag & Drop in VB6, and I need to determine which type of control is the user dragging.
I have in the form several controls: PictureBox, TextBox and...

Veena, you must be joking! :lol:
Don't you? :-|

Try this with your code "Hello world" and please post how many words your program find.

CountWords is the function coded inside the module "mdlWordCount.bas".

Did you open de prjWordCount.vbp file to load the project in the VB6 IDE or just the frm file?

Hi!
Have you tried to press F4 key (or going to View > Property window) inside VB6?

Hi! Tell me why my program doesnt work so I can fix it.

I have uploaded a sample VB6 project to demonstrate the use of this function.

I hope it could help.
Private Function CountWords(strText As String) As Long
Dim x As Long
Dim words As Long
Dim lenStr As Long
Dim lenPrevWord As Long
Dim currentAscii As...

Hi!

Before we get started, take a look on the picture below:

http://img524.imageshack.us/img524/5440/mapms1.gif

If you use your imagination, you could see there a road map with two points:...

Ok Comatose, but dont put yourself in such trouble. I can live by now with the bmp format file. :)

I will post here about the places where I get some information on this.

Do you want to know...

Thanks Comatose!

The need to store the pixel data in arrays is to do some processing. Not for the save stuff. Once I have procesed the "input image", I need to save the modified result image in a...

Thanks for reply.

I have found a diamond!!! Try this: http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=65964&lngWId=1

He uses a PictureBox to load the JPEG file and then,...

Hi
First I want to say sorry for my bad english (I speak and write spanish)

I am working in a program written by me in VB6, which load a image file (JPEG) and looks in every pixel of it to take...