Visual Basic

Re: how to create custom controls

2-Jan-07 5:25

ReDim Preserve still exists, but you've used the old VB6 syntax. All arrays in the .NET Framework start with index 0, or 0-based, so it's unnecessary to specify it in the new dimension parameter. Just use:

ReDim Preserve marr(count)

ReDim docs on MSDN[^]

Dave Kreskowiak
Microsoft MVP - Visual Basic

Christian Graus2-Jan-07 0:03

Christian Graus

2-Jan-07 0:03

Please don't cross post. Choose the forum for the language you're using, and ask there.

Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog

Form Autosize

WestSideRailways1-Jan-07 21:06

WestSideRailways

1-Jan-07 21:06

If i have the following properties enabled....

Form autosize = True
Form maxsize = True
Form minsize = True

Does this mean that my Form will goto the maxsize of the users screensize and not beyond.?

MatrixCoder1-Jan-07 21:38

1-Jan-07 21:38

No, you have to set the WindowState to Full.

Trinity: Neo... nobody has ever done this before.
Neo: That's why it's going to work.

Dave Kreskowiak2-Jan-07 5:22

2-Jan-07 5:22

WindowState has no Full enumeration member, it's WindowState.Maximized.

Dave Kreskowiak
Microsoft MVP - Visual Basic

MatrixCoder2-Jan-07 9:59

2-Jan-07 9:59

Sorry, I'm thinking of the WMP WindowState.

Trinity: Neo... nobody has ever done this before.
Neo: That's why it's going to work.

Dave Kreskowiak2-Jan-07 5:21

How to load photoshop tool using vb.net

2-Jan-07 5:21

The Form.MaximumSize and Form.MinimumSize properties do not accept a Boolean value, so that code has no meaning.

If you want your form to fill the screen all you have to do is set its WindowState property to Maximized:

myForm.WindowState = WindowState.Maximized

Docs on Form.WindowState[^].

Dave Kreskowiak
Microsoft MVP - Visual Basic

kamalraaja1-Jan-07 20:30

kamalraaja

1-Jan-07 20:30

Hi all,

In vb.net given code(http://www.codeproject.com/vb/net/AutomatePhotoshop.asp) for incorporating photo shop application is very cool. In our project we required is the one to load the image adjust tools from toolbox ---crop tool,brush tools , magic wand tool etc... . Can any body help me in this area will be very help ful for us to proceed forward in the project. Thanks in advance.

Regards,
Kamal.

Automating powerpoint

Badhris1-Jan-07 18:48

Badhris

1-Jan-07 18:48

Hi,
I would like to automate powerpoint using visual basic. So for that i have created an add-in and that add-in will keep track of the events that is happening in the slide show. But when a click a slide i could able to keep track of the slide change only. Even an animation can occur when the user clicks. So an animation can occur either automatically or through events. If it is through events it can be either mouse or keyboard events. If it is using mouse event then the user can click to go to next animation or either choose next or previous my right clicking the during the slide show. If it is through key board then user may press any key key to change or previous slide. One thing is very clear that if the user choses any of the way the event that is going to appear is same. So how to keep track of this event? Or Which event will occur when the user does either? And how to the get the information about that event?

In otherwords which event will be posted when the user right clicks and choses next or previous? PLz someone help me in this.............................. If i could get the animation change then i have reflect the change in the client side. So that i wil take care. First i would like to know which event will occur or how to capture the mouse and aeyboard event?

Note : i am using visual basic

Badhris

Please Help ListBox Contains Very Urgent

somagunasekaran1-Jan-07 16:45

somagunasekaran

1-Jan-07 16:45

I want to store the MSAccessDatabase from ListBox's contains

Actually fileName is displaying in ListBox1 contains that is

FileName is Displayed in ListBox1 :Sundar-.Net-Bangalore-3yrs-sundar@yahoo.com

and parsed the fileName in Listbox2 contains:

sundar
.Net
Bangalore
3yrs
sundar@yahoo.com

i've parsed the fileName.and also displayed in the Listbox2.but i want to store in MS AccessDataBase.so how to store the Seperate field in DataBase MS Access.. Using VB.Net...

Pls Very Urgent Pls someone Help me..

Thanking You,
somasundaram

I want to join in the website

Re: Please Help ListBox Contains Very Urgent

Dave Kreskowiak2-Jan-07 5:15

2-Jan-07 5:15

First, have you done any database work at all from VB.NET?

You'd have to create a table in the database, if you don't already have one to put this information, with, at a minimum, a column defined as Text with a specific length, say 50 characters. In your code you have to create an OleDbConnection object and a OleDbCommand object. This command object needs an SQL statement to add things to the column in your table. Then you create a OleDbParameter object:

Dim conn As New OleDbConnection(connectionString)
Dim comm As New OleDbCommand("INSERT INTO tableName (columnName) VALUES (?)", conn)
comm.Parameters.Add("@p1", OleDbType.VarChar, 50).Value = stringValueToAdd
conn.Open()
comm.ExecuteNonQuery()
conn.Dispose()

This is a very simplified example of one way to do this. I, in no way, imply that this will work with your code.

Dave Kreskowiak
Microsoft MVP - Visual Basic

RegisterHotKey

acidice3331-Jan-07 14:55

acidice333

1-Jan-07 14:55

I'm using RegisterHotKey, but how do I register multiple keys and make them do different operations?

    Public Declare Function RegisterHotKey Lib "user32" (ByVal hWnd As IntPtr, ByVal id As Integer, _<br />
                                                          ByVal fsModifiers As Integer, ByVal vk As Integer) _<br />
                                                          As Integer<br />
    Public Declare Function UnregisterHotKey Lib "user32" (ByVal hWnd As IntPtr, ByVal id As Integer) As Integer<br />
<br />
    Public Const WM_HOTKEY As Integer = &H312<br />
<br />
    Public Enum Modifiers<br />
        MOD_ALT = &H1<br />
        MOD_CONTROL = &H2<br />
        MOD_SHIFT = &H4<br />
        MOD_WIN = &H8<br />
    End Enum<br />

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)<br />
<br />
        If m.Msg = WM_HOTKEY Then<br />
            MsgBox("Hot key pressed")<br />
        End If<br />
<br />
        MyBase.WndProc(m)<br />
    End Sub

Then I register the key with something like RegisterHotKey(Me.Handle, 101, Modifiers.MOD_CONTROL, Keys.L)

Re: RegisterHotKey

Dave Kreskowiak2-Jan-07 4:56

online translater for my program: how do I ?

2-Jan-07 4:56

As described in the docs for WM_HOTKEY[^], you look at the LPARAM of the message to see which keys were pressed. You can then branch based that to each routine you wanted to do.

Dave Kreskowiak
Microsoft MVP - Visual Basic

JustmeNick1-Jan-07 7:55

JustmeNick

1-Jan-07 7:55

does any one know how to use the internet to translate for me..

I am writing a program to translate from english to spanish and vise versa..can anyone suggest how i start and how to do something like this..

Nab

Re: online translater for my program: how do I ?

MatrixCoder1-Jan-07 22:22

alter excel-table via sql

1-Jan-07 22:22

You could start by finding a English and Spanish dictionary class. Then pick each word out of (whatever you want to translate) and compare them to each word in the English/Spanish dictionary by using an identification method (not really sure how to do so).

That's pretty much it.

Trinity: Neo... nobody has ever done this before.
Neo: That's why it's going to work.

Card Game ?

Bso_Cool1-Jan-07 6:19

Bso_Cool

1-Jan-07 6:19

What I am trying to do is make a card game but in the hand there is not always a set amount of cards I am using labels for this I got it to create the labels as needed but what I am trying to do now is get it to where if the click on the card it moves up a little to signify that it has been selected but I can't figure that part out on how to do it. Here is an ex. of the code I am using to create the first part of the hand.

For N = 1 To 13
Label(N) = New Label
Label(N).BorderStyle = BorderStyle.Fixed3D
Label(N).BackColor = Color.Maroon
'PlayersHand is an Array with all the Card Numbers in them.
Label(N).Text = Player1Hand(N)
Label(N).Size = New Size(Label1.Width, Label1.Height)
Label(N).Font = Label1.Font
Label(N).TextAlign = ContentAlignment.MiddleCenter

CardX = CardX + 50
Label(N).Left = CardX
Label(N).Top = CardY
Label(N).BringToFront()
Me.Controls.Add(Label(N))
Next

If anyone can help me I would really appreciate it. Thank You for looking!

Re: Card Game ?

Christian Graus2-Jan-07 0:10

Christian Graus

2-Jan-07 0:10

Your approach is fundamentally broken. You should do this by creating graphics which you store as resources and draw to the screen ( or at least draw text right where you want it ). Moving labels and pictures boxes around is just a disaster.

Christian Graus - Microsoft MVP - C++
Metal Musings - Rex and my new metal blog

Re: Card Game ?

Martin.Smith2-Jan-07 0:12

Martin.Smith

2-Jan-07 0:12

In your FOR loop that is creating the labels, add an event handling function for the mouse click event, for example:
AddHandler Label(N).MouseClick, AddressOf CardClickFct

You will then need to create the CardClickFct, such as:

    Sub CardClickFct(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) <br />
       Dim TheCard as label = DirectCast(sender, Label)<br />
<br />
       ' TODO: Add whatever you want the card to do when its been clicked<br />
    End Sub

What you must also remember to do is remove the event handler when the label is destroyed (by calling RemoveHandler)....

You MUST ensure that your array variable "Label" is declared "WithEvents" for this to work!!!

I hope this helps you out....

Regards,

Martin

Search in Combo

msleem1-Jan-07 5:20

msleem

1-Jan-07 5:20

I use VB.NET 2005 and
I want to search in combo's items . for example :
the combo have many names when I start to write the first litter of the name which I want to find , the combo automatically find the names which begin with the same letter and show them in order.

In VB6 I use this code :

(General Diclaration)
Global IgnoreTextChange As Boolean

'
Public Function ComboSearch(CO As ComboBox)
Dim I%
Dim NewText$
If Not IgnoreTextChange And CO.ListCount > 0 Then
For I = 0 To CO.ListCount - 1
NewText = CO.List(I)
If InStr(1, NewText, CO.Text, 1) = 1 Then
If Len(CO.Text) <> Len(NewText) Then
IgnoreTextChange = True
I = Len(CO.Text)
CO.Text = CO.Text & Mid$(NewText, I + 1)
CO.SelStart = I
CO.SelLength = Len(Mid$(NewText, I + 1))
Exit For
End If
End If
Next
Else
IgnoreTextChange = False
End If
End Function

and thanks for any help
Smile | :)

soly

Re: Search in Combo

The ANZAC1-Jan-07 23:20

The ANZAC

1-Jan-07 23:20

try findstring on the text_changed event. Not Sure Exactly where to find it. maybe me.combobox1.findstring(me.combobox1.text), think that should do it. Should choose the closets matching item.

Posted by The ANZAC

Smithers-Jones1-Jan-07 4:38

Smithers-Jones

1-Jan-07 4:38

i want to add a new column to an excel-table, the name of this new column is the caption of a datagrid's column.
the only problem: the column's caption consists of two words (firstname, surname).
i use this command:

<br />
Cmd1.CommandText="ALTER TABLE MyTable ADD '" & dt.columns(column).caption.tostring & "' FLOAT"<br />

this works fine, but the names are enclosed by '-characters which doesn't look too nice. without '-character it doesn't work anymore, of course.
any help?

web service

arindam_1st31-Dec-06 22:51

arindam_1st

31-Dec-06 22:51

I haven't understand the web service please help with some good example as soon as possible.

Arindam

Help Needed!! Problem with creating a installation

ArchaBhandare31-Dec-06 20:06

ArchaBhandare

31-Dec-06 20:06

I am working on a VB project.
I was successful in creating an executable for the client using 'File->Make Project.exe'. But I want to provide the client with a setup, so that the client can install the whole project.
Actually the client has provided me with some install scripts in the '.wse' format. I cant figure out how to create an installable using these files.
Has anyone used .wse files to create installables. Please help

Re: Help Needed!! Problem with creating a installation

MatrixCoder1-Jan-07 22:18