modi123_1, on 23 August 2012 - 02:26 PM, said:
I learn from codes others have written. I analyze them and after that I knew how to work with it...




1 Votes
Posted 23 August 2012 - 02:37 PM
Posted 23 August 2012 - 02:39 PM
Posted 23 August 2012 - 02:41 PM
Whazabazaa, on 23 August 2012 - 02:32 PM, said:
modi123_1, on 23 August 2012 - 02:26 PM, said:
Quote
Quote
Posted 23 August 2012 - 02:48 PM
Posted 23 August 2012 - 02:53 PM
Posted 23 August 2012 - 10:27 PM
modi123_1, on 23 August 2012 - 04:58 PM, said:

Private Sub Form2_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim A As New SizesForms
A.HeightFORM = Me.Size.Height
A.WidthFORM = Me.Size.Width
End Sub
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim A As New SizesForms()
Me.Size = New System.Drawing.Point(A.HeightFORM, A.WidthFORM)
End Sub
Public Class SizesForms
Public HeightFORM As Double
Public WidthFORM As Double
End Class
Public Class Form2
Private Sub Form2_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim A As SizesForms
A.HeightFORM = Me.Size.Height
A.WidthFORM = Me.Size.Width
End Sub
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim A As SizesForms()
Me.Size = New System.Drawing.Point(A.HeightFORM, A.WidthFORM)
End Sub
End Class
Public Class SizesForms
Public HeightFORM As Double
Public WidthFORM As Double
End Class
Posted 23 August 2012 - 10:35 PM
Posted 24 August 2012 - 05:39 AM
Whazabazaa, on 24 August 2012 - 12:27 AM, said:
Private Sub Form2_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim A As New SizesForms
A.HeightFORM = Me.Size.Height
A.WidthFORM = Me.Size.Width
End Sub
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim A As New SizesForms()
Me.Size = New System.Drawing.Point(A.HeightFORM, A.WidthFORM)
End Sub
Public Class SizesForms
Public HeightFORM As Double
Public WidthFORM As Double
End Class
Public Class Foo
Dim Narf as String
Public Sub New()
Dim Chu as String
End Sub
Public Sub Print()
Console.WriteLine(Narf)
Console.WriteLine(Chu)
End Sub
End Class
This post has been edited by rgfirefly24: 24 August 2012 - 05:46 AM
Posted 24 August 2012 - 06:48 AM
|
|
Query failed: connection to localhost:3312 failed (errno=111, msg=Connection refused).
|
