Visual Basic Discussion Boards

Benjamin Liedblad29-Mar-05 21:48

29-Mar-05 21:48

I had this one about 2 years ago...
I had put some code inside my "form1" and found that the code ran, but the form seemed to never appear.
If you put a DoEvents after the show, then a Msgbox, you'll see what's happening... Your form is actually loading, but the program is exiting after the form.show method.

If you want to load the form and not exit "Main" until you close the form try using the ShowDialog method of the form instead of the Show method. I think that's what you are looking for.

Re: Display a form in Sub Main()

Mahesh167929-Mar-05 22:36

Mahesh1679

29-Mar-05 22:36

Thanks Alot!

It finally worked as Benjamin Liedblad said.

I would like to thank all of you who spared your precious time for me.

Thanks

Thanks !

Mahesh167929-Mar-05 22:36

Mahesh1679

29-Mar-05 22:36

Thanks Alot!

It finally worked as Benjamin Liedblad said.

I would like to thank all of you who spared your precious time for me.

Thanks

How to convert a string to form object?

Sheel Gohe29-Mar-05 18:26

Sheel Gohe

29-Mar-05 18:26

:(I am in a big trouble, I have to access form name as string from database and convert it into form object. I have tried Ctype and DirectCast but both method failed, it gives error "Specified cast not valid". Please help me!!

Sheel

Re: How to convert a string to form object?

Ritesh123430-Mar-05 3:19

Ritesh1234

30-Mar-05 3:19

Hi,
Try this...

Dim frm As Form = DirectCast(Activator.CreateInstance(Type.GetType("ProjectName.frmTest")), Form)

frm.Show()

I hope this will help u.................:->

Regards,
Ritesh

Re: How to convert a string to form object?

Sheel Gohe30-Mar-05 20:10

Sheel Gohe

30-Mar-05 20:10

Thanks Ritesh, this code is too important for me...

Regards
Sheel

sheel

How to get the command line argument of the other processes in VB using Win32 API?

Kent Liu29-Mar-05 17:39

Kent Liu

29-Mar-05 17:39

I've tried ToolHelp functions, Process & Thread functions, WMI, but still can't know how to get the command line argument information of existing processes (not the current process).
It seems that win32_process in WMI could do helps, but the commandline property only works under WinXP/Windows 2003, for Windows 2000, this property does not exists.
Can any one tell me some idea ?
If you could add the example code here, that would be nice !
Thanks.

Do or do not, there is no try.

serialization problem

29-Mar-05 16:17

ok here is the problem I am making a game and the variables work as follows they have a var class which includes the data and a wrapper class which has built in save and load functions which is binary serialization and the var class is accessed through properties now the problem happens when I try to load the var in this case a map it says the object type cannot be converted to the target type
here is some code

Imports System<br />
Imports System.Drawing<br />
imports System.IO<br />
Imports System.Runtime.Serialization<br />
Imports System.Runtime.Serialization.Formatters.Binary<br />
imports System.Windows.Forms<br />
<Serializable()>Public Class Game_map<br />
	Implements icloneable<br />
	<br />
	 	Function Clone() As Object Implements Icloneable.clone<br />
		return me.memberwiseclone<br />
		End Function<br />
		Private var As game_map_var = New Game_map_var<br />
	default Property Root(byval shallow_copy as boolean) As Game_map_var<br />
		Get<br />
			if shallow_copy = false then Return var.clone else return var<br />
		End Get<br />
		Set(ByVal new_object As Game_map_var)<br />
			if shallow_copy = false then me.var = new_object.clone else me.var = new_object<br />
		End Set<br />
	End Property<br />
	Sub save(ByVal filename As String)<br />
		'on error resume next<br />
		dim fs As filestream = New FileStream(filename,filemode.Create)<br />
		dim bf As New BinaryFormatter<br />
		bf.Serialize(fs,var)<br />
		fs.Close<br />
	End Sub<br />
	Sub load(ByVal filename As String)<br />
	'	on error resume next<br />
		if file.Exists(filename) = true then<br />
		dim fs As filestream = New FileStream(filename,filemode.Open)<br />
		dim bf As New BinaryFormatter<br />
		var = ctype(bf.Deserialize(fs),game_map_var)<br />
		fs.Close<br />
	Else<br />
		MessageBox.Show("The file "& filename & " could not be found", "File Not Found!", MessageBoxButtons.OK, MessageBoxIcon.Hand, MessageBoxDefaultButton.Button1)<br />
		End If<br />
	End Sub<br />
	Property name() As string<br />
		Get <br />
			return me.var.name<br />
		End Get<br />
		Set(ByVal new_name As string)<br />
			me.var.name = new_name<br />
		End Set<br />
	End Property<br />
	Property tiles() As game_map_var.game_tile()<br />
		Get <br />
			return me.var.tiles<br />
		End Get<br />
		Set(ByVal new_tiles As game_map_var.game_tile())<br />
			me.var.tiles = new_tiles<br />
		End Set<br />
	End Property<br />
	<Serializable()>Public Class Game_map_var<br />
		Implements icloneable<br />
	 	Function Clone() As Object Implements Icloneable.clone<br />
		return me.memberwiseclone<br />
		End Function<br />
		public name as string = ""<br />
		Public tiles() As game_tile = { _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile, _<br />
new game_tile}<br />
		<br />
		<Serializable()>Public Class Game_tile<br />
			Implements icloneable<br />
	 	Function Clone() As Object Implements Icloneable.clone<br />
		return me.memberwiseclone<br />
		End Function<br />
		Private var As Game_tile_var = New Game_tile_var<br />
			default Property Root(byval shallow_copy as boolean) As game_tile_var<br />
		Get<br />
			if shallow_copy = false then Return var.clone else return var<br />
		End Get<br />
		Set(ByVal new_object As game_tile_var)<br />
			if shallow_copy = false then me.var = new_object.clone else me.var = new_object<br />
		End Set<br />
	End Property<br />
	Property x() As Integer<br />
		Get <br />
			return me.var.x<br />
		End Get<br />
		Set(ByVal new_x As Integer)<br />
			me.var.x = new_x<br />
		End Set<br />
	End Property<br />
	Property y() As Integer<br />
		Get <br />
			return me.var.y<br />
		End Get<br />
		Set(ByVal new_y As Integer)<br />
			me.var.y = new_y<br />
		End Set<br />
	End Property<br />
	Property surface() As bitmap<br />
		Get <br />
			return me.var.surface<br />
		End Get<br />
		Set(ByVal new_y As bitmap)<br />
			me.var.surface = new_y<br />
		End Set<br />
	End Property<br />
	Property state() As tile_state<br />
		Get <br />
			return me.var.state<br />
		End Get<br />
		Set(ByVal new_y As tile_state)<br />
			me.var.state = new_y<br />
		End Set<br />
	End Property<br />
		<Serializable()>Public Class game_tile_var<br />
				Implements icloneable<br />
	 	Function Clone() As Object Implements Icloneable.clone<br />
		return me.memberwiseclone<br />
		End Function<br />
				public x As Integer = 0<br />
				public y As Integer = 0<br />
				Public surface As bitmap = New Bitmap(32,32,system.Drawing.Imaging.PixelFormat.Format24bppRgb)<br />
				public state as tile_state = tile_state.normal<br />
			End Class<br />
<Serializable()> public Enum tile_state<br />
	 	normal<br />
	 	solid<br />
	 	up_down_solid<br />
	 	left_right_solid<br />
	 	left_solid<br />
	 	right_solid<br />
	 	up_solid<br />
	 	down_solid<br />
	 	down_right_solid<br />
	 	down_left_solid<br />
	 	up_left_solid<br />
	 	up_right_solid<br />
	 End Enum<br />
		End Class<br />
	End Class<br />
	<br />
End Class<br />

I know all the class = new class stuff is wierd but I have to do that if i dont the debug says that the "object reference is not set to an object" when I try to access the variable this I believe is because a class is a reference type not a variable at least until you use new which this maybe the source of my problem but structures cannot have starting values which then will return "object reference is not set to an object" when I try to access the varaibles
HELP Confused | :confused:

Datagrid

rusudhan29-Mar-05 16:12

rusudhan

29-Mar-05 16:12

How to display a recordset got from oracle db into a datagrid?

Re: Datagrid

Christian Graus29-Mar-05 16:34

Christian Graus

29-Mar-05 16:34

just the same as one from SQL Server or Access.

Christian

I have several lifelong friends that are New Yorkers but I have always gravitated toward the weirdo's. - Richard Stringer

Code Downgrade

Member 175892829-Mar-05 14:20

Member 1758928

29-Mar-05 14:20

Hi there

Being too cheap to go out and buy it before learning VB.NET, I downloaded the 2005 Beta1 of Visual Studio. I wrote some programs, and now I've bought 2003 Standard. I've tried to downgrade the code so much as my GUI (controls, etc.) are all back, my code is (mostly fine) and there's no build errors. However...there's been a few issues that I need some help with.

Private Sub form1_closing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing

It seems that the older framework doesn't support this, but does anybody know of an alternative that will work?

***

Dim connectme As New Net.Sockets.TcpClient()<br />
      Dim server As String = "1.1.1.1"<br />
      If connectme.Connected = True Then //<br />

Property connected as Boolean doesn't exist in this older framework? Anyone else know how to check?

***

For this one, I'm using NotifyIconEX, and with the EXACT same code, the EXACT same controls, references, etc. When I try to set notifyicon1.visible = True, I get "Object Reference not Set to an Instance of an Object".

***

For some reason, whenever I startup this program, Main.vb (the primary form), is ALWAYS blank, even though I have everything set up in the designer. This NEVER happened in VS.NET 2005. I have yet to figure out how to get around this.

***

All of these worked PERFECTLY prior to the code conversion. If anybody could give me ANY advice, it would be GREATLY appreciated.

Head Admin,

http://www.khaoslabs.com/

Re: Code Downgrade

Mitch F.29-Mar-05 20:24

Mitch F.

29-Mar-05 20:24

Hello,

Kevin Delaney wrote:
Private Sub form1_closing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing

In Visual Basic .Net 2003, you can handle the Closing event with:

Private Sub Form1_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing

End Sub

Kevin Delaney wrote:
For some reason, whenever I startup this program, Main.vb (the primary form), is ALWAYS blank, even though I have everything set up in the designer. This NEVER happened in VS.NET 2005. I have yet to figure out how to get around this.

I am not sure of the problem here... You should check to see if the startup object is the Main.vb (right click your project inside of the solution explorer, and then select properties. You should see "Startup Object:" with a combobox that has your startup object.). Another thing that could be wrong is that the "Visible" property on each control is set to false.

I hope this helps,

Programmer2k4

My sig:

"And it is a professional faux pas to pay someone else to destroy your computer when you are perfectly capable of destroying it yourself." - Roger Wright

I now use my CodeProject Blog!
Most recent blog post: March 24

Re: Code Downgrade

Member 175892830-Mar-05 0:52

Member 1758928

30-Mar-05 0:52

Hi there

Thank you very much for your code sample, I shall try it this evening.

With regards to the second thing, I have tried BOTH of what you said. I don't even get a title for main.vb...just an empty window with an icon...I've narrowed it down to a certain form but it still makes no sense...

Thanks again,

Head Admin,

http://www.khaoslabs.com/

multiple objects in datagrid

nordyck29-Mar-05 13:21

nordyck

29-Mar-05 13:21

VB 6.0

I'm trying to create datagrid type control (5 rows 10 cols) that is connected to an access database table. The data is being pulled from several different tables to feed the main table. A combo box is used to query the data from the different tables.

i.e.
Col 1: plain text, user entry
Col 2: combo box tied to table (user list)
col 3: combo box tied to table (state)
col 4: checkbox weither is active or not
col 5: another combo box from another table
etc.

Data grid may not be the right thing to do. So far I haven't found any reference to this except in vb.net (can't get pass the database connections It's ok if I'm using 1 table with 6 fields). I can creat this form in MS Access but how do I recreat it in VB6.0?

Advice to learn assembly programming language

Mekong River29-Mar-05 11:29

Mekong River

29-Mar-05 11:29

Hi could anyone give me a suggestion or provide any advice on how to learn assebly programming language from the beginning in effective way???

A thousand mile of journey, begin with the first step.

APO-CEDC
Save Children Norway-Cambodia Office

Re: Advice to learn assembly programming language

Colin Angus Mackay29-Mar-05 12:03

Colin Angus Mackay

29-Mar-05 12:03

I think you would get a better response in the Visual C++ Forum because it at least allows you to embed assembly code inside functions.

My: Blog | Photos | Next SQL Presentation
WDevs.com - Open Source Code Hosting, Blogs, FTP, Mail and More

Re: Advice to learn assembly programming language

Christian Graus29-Mar-05 12:09

Christian Graus

29-Mar-05 12:09

If you're jumping from VB to assembler, I suggest you may well need an intermediate step. You've got my vote for confidence tho.

Microsoft used to publish an excellent book on the subject, I don't know if it's still around, but it's worth having a look on Amazon and also ebay. Sorry, I forget the title, but if you google Microsoft Press assembler, I'm sure you'll find it.

Christian

I have several lifelong friends that are New Yorkers but I have always gravitated toward the weirdo's. - Richard Stringer

Re: Advice to learn assembly programming language

Mekong River30-Mar-05 4:41

Mekong River

30-Mar-05 4:41

May be this is the book[^] that you want to say???

A thousand mile of journey, begin with the first step.

APO-CEDC
Save Children Norway-Cambodia Office

Re: Advice to learn assembly programming language

Dave Kreskowiak30-Mar-05 5:29

Dave Kreskowiak

30-Mar-05 5:29

Nope. That's the Intermediate Language that all managed languages compile into.

Assembly Launguage is pretty much a dead art form under Windows. I think Microsoft stopped selling its Macro Assembler about 4 years ago. It's still available as an MSDN Subscriber download though.

What your refering to is actually here[^] on Amazon. There are other titles listed on that page that still cover the topic.

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

Re: Advice to learn assembly programming language

Mekong River30-Mar-05 17:59

Mekong River

30-Mar-05 17:59

Thank you very much for your comment. But I already order this book[^] online. Do you think it is a good book for me as a beginner which never know about assembly programming language??? On the other hand, could you give me some advantage that assembly programming language could do for us???

Thank in advance

A thousand mile of journey, begin with the first step.

APO-CEDC
Save Children Norway-Cambodia Office

Re: Advice to learn assembly programming language [EDITED]

Dave Kreskowiak31-Mar-05 2:06

Dave Kreskowiak

31-Mar-05 2:06

Oh well, it's not assembly language...

[EDIT]
Whoops, I thought you were talkinga about the IL book...

The man from SCN-CO wrote:
On the other hand, could you give me some advantage that assembly programming language could do for us???

Like I said, in Windows it's a dead art. It's EXTREMELY tedious, but in speed critical code, it can be worth to time to write the machine code by hand for the best possible optimization.

Mind you, the only Visual Studio language that lets you write machine code in-line is C++. None of the managed languages will let you do this.

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

Very big problem

magnifique29-Mar-05 5:01

magnifique

29-Mar-05 5:01

there is a program written in DOS any time i issue print
the printer does not respond . I read from the net that is becos of the
new usb printers

i need a source that can help me issue print or
source code that can allow me to get the command from the QUEUE

Can anyboby help me

Re: Very big problem

Mekong River29-Mar-05 11:32

Mekong River

29-Mar-05 11:32

Is this[^] and this[^] will help you???

A thousand mile of journey, begin with the first step.

APO-CEDC
Save Children Norway-Cambodia Office

Convertion Object Into Form

Sunil Gidwani29-Mar-05 4:12

Sunil Gidwani

29-Mar-05 4:12

When i create this programe it will give error
Public Class Form1
Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

Public Sub New()
MyBase.New()

'This call is required by the Windows Form Designer.
InitializeComponent()

'Add any initialization after the InitializeComponent() call

End Sub

'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub

'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer

'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
Friend WithEvents Button1 As System.Windows.Forms.Button
<system.diagnostics.debuggerstepthrough()> Private Sub InitializeComponent()
Me.Button1 = New System.Windows.Forms.Button
Me.SuspendLayout()
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(64, 80)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(152, 24)
Me.Button1.TabIndex = 0
Me.Button1.Text = "Button1"
'
'Form1
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(292, 273)
Me.Controls.Add(Me.Button1)
Me.Name = "Form1"
Me.Text = "Form1"
Me.ResumeLayout(False)

End Sub

#End Region
Dim frmstring As Object = "From2"
Dim frm As Form = frmstring

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
frm.show()
End Sub
End Class

Re: Convertion Object Into Form

Robert Rohde29-Mar-05 7:57

Robert Rohde

29-Mar-05 7:57

Dim frmstring As Object = "From2"
Dim frm As Form = frmstring

What do you think those two lines should do? First you assign the string "From2" to the object variable frmstring. Then you want to assign this string into the Form variable frm. This doesnt make sense and is the cause of the error.

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.