Visual Basic

29-Aug-05 4:36

You're not seeing a wingding. You're seeing a character that Excel doesn't use and the font Excel is using doesn't have any image for that character.

You're also assuming that the NewLine character sequence in VB is the same as Excel's. VB's default NewLine sequence is Carriage Return, move cursor to the beginning of the line, follow by a Line Feed, advance the paper up one line. Excel doesn't use this sequence in its worksheets. You're sending an extra character that Excel doesn't have a use for.

Before you send the textbox data to the Excel sheet, you need to replace either the CR or LF characters in your string with either just CR (vbCr) or just LF (vbLf). I can't remember which one Excel uses. You just have to try it.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: VBA Excel 2003

PHDENG8129-Aug-05 5:02

PHDENG81

29-Aug-05 5:02

This is the only line of code I have to move the data to the appropriate cell:

ws.Cells(iRow, 4).Value = Me.TextBox1.Value

In the TextBox1 properties I have simply set it to multiline and allowed the user to step to each line by hitting "enter."

I understand what you are suggesting. However, I tried it when I was using A listbox. It did not work then either. I had to do what I am "trying" to do with a textbox. The difference is, the textbox "items" are not seperated by "selection." They are seperated by the user hitting "enter" and stepping to the next line. When I use vbNewLine or vbCrLf it displays the same character.

Thanks a lot for your suggestions. However, do you have any other ideas?

Dizzle

Re: VBA Excel 2003

Dave Kreskowiak29-Aug-05 9:49

ImageList with too many items

29-Aug-05 9:49

Like I said, you can't use CrLf! You can only use Cr OR Lf between lines. I don't know which one Excel uses off the top of my head.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

MohammadAmiry29-Aug-05 2:14

29-Aug-05 2:14

Hi I had recently posted this, but I did not get the answer. Because I DO really need this problem to solve, I repeat it.
In vb6 I have an ImageList that a ListView is bound to it. It works quite fine when dealing with small (up to 1000) number of images. but when the number of images becomes larger, my program suddenly crashes: "This program has performed an illegal operation."
The code I used, is here:

<br />
It's in vb6.<br />
It is in a function that gets FilePath and adds it's icon to the ImageList.<br />
<pre><code><br />
hIcon = ExtractAssociatedIcon(0, LCase(FilePath), 1)<br />
If IsNull(hIcon) Then<br />
'Error <br />
Else<br />
Set Pic.Picture = Nothing<br />
DrawIcon Pic.hdc, 0, 0, hIcon<br />
Pic.Picture = Pic.Image<br />
End If<br />
ImageList1.ListImages.Add , , Pic.Picture<br />
GetImageLisIconIndex = ImageList1.ListImages.Count<br />

It is in a function that gets the FilePath and adds its icon to the ImageList.

Thanks in advance.

Dave Kreskowiak29-Aug-05 4:29

29-Aug-05 4:29

MohammadAmiry wrote:
I had recently posted this, but I did not get the answer.

Perhaps because you have no patience? I just got the email that said you replied to my post today!

Looking at your code, your calling ExtractAssociatedIcon, but I don't see any code that destroys the Icon handle when you're done adding it. DestroyIcon[^]

This COULD be the cause of your problem.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

MohammadAmiry29-Aug-05 11:55

29-Aug-05 11:55

Hi Sorry for not being so patient. This is because I am in really shortage of time. D'Oh! | :doh:

And thanks for the reply. Dead | X|

I had totally missed to destroy the Icons.:->
I tried what you said but still got my app crashed when the number of files gets a little up 1000!(This time 1032) Cry | :((

Is there anything else I should do?

-- modified at 17:55 Monday 29th August, 2005

Dave Kreskowiak29-Aug-05 13:05

29-Aug-05 13:05

Make sure there's nothing else you missed pairing up elsewhere in the app. I've never put that many items in an ImageList before, so I can't really speak from experience.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

MohammadAmiry30-Aug-05 8:42

30-Aug-05 8:42

Hi I tried more. now that I destroy the Icons, an Overflow error occurs when the number gets more than (about 1800) on the ImageList1.Add ... line.
I was interested to see if this problem happens for all applications using an imagelist to lead to an overflow. So i used a windows search with * criteria to check that when there is large number of files in a listview (which is for the case of windows search) and the fact that icons in a listview should be in an imagelist, to see if the oveflow occurs. But it didn't!
I checked my code so many times. I don't think I have missed anything else.
Is it the end and I cannot do anything with the overflow problem? Cry | :((

Dave Kreskowiak30-Aug-05 11:50

30-Aug-05 11:50

MohammadAmiry wrote:
and the fact that icons in a listview should be in an imagelist,

WHOA! Stop right there! This is not a fact! This is an assumption. You're assuming that the images are kept in am Imagelist. I personally hate the ImageList control and avoid using it whenever possible. If I were to keep that many images, I'd write my own class and ownerdraw each line of a ListView to show them.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

MohammadAmiry30-Aug-05 20:31

30-Aug-05 20:31

Oh! I guess I have to write my own class! D'Oh! | :doh:

But if you'd read my other note here, I checked the ImageList, really why it can't hold that much of items?
Or you want to insist that Listviews used in windows ARE all ownerdrawn?

MohammadAmiry30-Aug-05 9:24

Farsi Language Support in Visual Basic

30-Aug-05 9:24

I finally used the following code to see if the problem is really with the ImageList control or not:

<br />
Do<br />
ImageList1.ListImages.Add , , LoadPicture("f:\1.ICO")<br />
i = i + 1<br />
Loop<br />

And it raised an overflow error when adding i=2800 Cry | :((

WHY is so?
I checked that windows, can have a listview containing more than 5000 items (each icon should exist in an imagelist, shouldn't it?).
So if that is possible, what about my app?

alex120529-Aug-05 0:45

alex1205

29-Aug-05 0:45

Hi, I am investigating on how Visual Basic 6 could fully support Farsi Characters. I have heard that there are some characters which are not supported. Although I dont know which ones they are. Could anyone help me?

SDE

MohammadAmiry29-Aug-05 2:09

29-Aug-05 2:09

If your OS supports Fasi language, it hase no problem with that. I had used vb6 to write a Farsi Language program. It worked under windows XP quite well and also under windows 98 with right-to-left and Farsi language support.
But you may have a little problem when dealing with some controls that do not support right-to-left.

alex120529-Aug-05 14:31

alex1205

29-Aug-05 14:31

Hi. Thanks for the response. MOst of the controls I'm using supports Arabic Right-To-Left. However, I am wondering whether there is a difference with Arabic and Farsi support. I guess there are some characters in Farsi which are not supported by Visual Basic 6. Have you heard of this issue? Thank you.

SDE

MohammadAmiry30-Aug-05 8:51

30-Aug-05 8:51

Hi As you may know, there are only 4 characters in Farsi that are not included in Arabic and the other characters are identical. And as I previously mentioned, VB has got nothing to the characters.
What you have heard may be because of Arabic fonts used. Yes, there are some Arabic fonts (that do not support the characters related to letters گ چ پ ژ)
so it is just related to the fonts you use, and not a matter of VB.