تبدیل vb6 به c#

[bahar_engineer]

سلام
من یه کد پازل دارم ... یک تصویر که به چندین قسمت مساوی تقسیم شده و تصاویر به هم ریخته را مرتب می کنه
این کد که به زبان ویژوال بیسیک 6 هست رو می خوام convert کنم به سی شارپ ...
من توی 2005 کار می کنم

یه convertor پیدا کردم اما حلقه ها و بعضی دیگه از دستورات رو درست تبدیل نکرده

ممکنه کمک کنید



Option Explicit

Dim second As Integer
Dim a As Boolean
Dim b As Long
Dim g As String

Private Sub cmdcorrect_Click()

Dim i As Integer
Dim strfilename As String

a = False

For i = 0 To 8

strfilename = App.Path + "\" + Trim(Str(i)) + ".bmp"
img(i).Picture = LoadPicture(strfilename)
img(i).Tag = i

Next

second = 0

cmdplay.Enabled = True
cmdcorrect.Enabled = False

End Sub

Private Sub cmdplay_Click()

Dim z As Integer
Dim z2 As Integer
Dim i As Integer

Call cmdcorrect_Click

For i = 0 To 8

Randomize
z = 8 * Rnd
z2 = 8 * Rnd
imgtemp.Picture = img(z).Picture
img(z).Picture = img(z2).Picture
img(z2).Picture = imgtemp.Picture
imgtemp.Tag = img(z).Tag
img(z).Tag = img(z2).Tag
img(z2).Tag = imgtemp.Tag

Next

a = True
b = Timer

Timer1.Enabled = True
cmdcorrect.Enabled = False
img(0).Enabled = True
img(1).Enabled = True
img(2).Enabled = True
img(3).Enabled = True
img(4).Enabled = True
img(5).Enabled = True
img(6).Enabled = True
img(7).Enabled = True
img(8).Enabled = True

End Sub

Private Sub Command1_Click()

End

End Sub

Private Sub Form_Activate()

'Skin1.ApplySkin hWnd

End Sub

Private Sub Form_Load()

cmdplay.Enabled = False
img(0).Enabled = False
img(1).Enabled = False
img(2).Enabled = False
img(3).Enabled = False
img(4).Enabled = False
img(5).Enabled = False
img(6).Enabled = False
img(7).Enabled = False
img(8).Enabled = False

End Sub

Private Sub img_DragDrop(Index As Integer, Source As Control, X As Single, Y As Single)

Dim strtime As String

If a = False Then

Exit Sub

End If

imgtemp.Picture = img(Index).Picture
img(Index).Picture = Source.Picture
Source.Picture = imgtemp.Picture

imgtemp.Tag = img(Index).Tag
img(Index).Tag = Source.Tag
Source.Tag = imgtemp.Tag

If CheckCorrect = True Then

strtime = Str(Int(Timer - b))
MsgBox ("ÒãÇä ӁÑí ÔÏå : " + strtime + " ËÇäíå "), vbInformation, "ÞåÑãÇä"

cmdcorrect.Enabled = True
Command1.Enabled = True

a = False
img(0).Enabled = False
img(1).Enabled = False
img(2).Enabled = False
img(3).Enabled = False
img(4).Enabled = False
img(5).Enabled = False
img(6).Enabled = False
img(7).Enabled = False
img(8).Enabled = False

End If
End Sub

Private Function CheckCorrect() As Boolean

Dim i As Integer

For i = 0 To 8

If img(i).Tag <> i Then

CheckCorrect = False
Exit Function

End If

Next

CheckCorrect = True
second = 0

End Function

Private Sub Timer1_Timer()

If a = True Then

second = second + 1
Label1.Caption = second

If second = 15 Then Timer1.Enabled = False
If Timer1.Enabled = False Then

MsgBox ("æÞÊ ÔãÇ ÊãÇã ÔÏ"), vbCritical, "ÇÊãÇã ÒãÇä"
cmdplay.Enabled = False
Command1.Enabled = True
cmdcorrect.Enabled = True
img(0).Enabled = False
img(1).Enabled = False
img(2).Enabled = False
img(3).Enabled = False
img(4).Enabled = False
img(5).Enabled = False
img(6).Enabled = False
img(7).Enabled = False
img(8).Enabled = False

End If
End If
End Sub




اینم تبدیل شده به سی شارپ هست اما مشکل داره


using System;
using System.Drawing;
using System.Collections;
using System.ComponentModel;
using System.Windows.Forms;

namespace ProjectName
{
/// <summary>
/// Summary description for Form1.
/// </summary>
public class Form1 : System.Windows.Forms.Form
{
private System.Windows.Forms.ACTIVESKINLibCtl.Skin Skin1;
private System.Windows.Forms.Timer Timer1;
private System.Windows.Forms.Button cmdcorrect;
private System.Windows.Forms.Button cmdplay;
private System.Windows.Forms.Button Command1;
private System.Windows.Forms.Label Label1;
private System.Windows.Forms.PictureBox imgtemp;
private System.Windows.Forms.PictureBox img8;
private System.Windows.Forms.PictureBox img7;
private System.Windows.Forms.PictureBox img6;
private System.Windows.Forms.PictureBox img5;
private System.Windows.Forms.PictureBox img4;
private System.Windows.Forms.PictureBox img3;
private System.Windows.Forms.PictureBox img2;
private System.Windows.Forms.PictureBox img1;
private System.Windows.Forms.PictureBox img0;
/// <summary>
/// Required designer variable.
/// </summary>
private System.ComponentModel.Container components = null;

public Form1()
{
// Required for Windows Form Designer support
InitializeComponent();

// TODO: Add any constructor code after InitializeComponent call
}
/// <summary>
/// Clean up any resources being used.
/// </summary>
protected override void Dispose( bool disposing )
{
if( disposing )
{
if (components != null)
{
components.Dispose();
}
}
base.Dispose( disposing );
}
#region Windows Form Designer generated code
/// <summary>
/// Required method for Designer support - do not modify
/// the contents of this method with the code editor.
/// </summary>
private void InitializeComponent()
{
this.Skin1 = new System.Windows.Forms.ACTIVESKINLibCtl.Skin();
this.Timer1 = new System.Windows.Forms.Timer();
this.cmdcorrect = new System.Windows.Forms.Button();
this.cmdplay = new System.Windows.Forms.Button();
this.Command1 = new System.Windows.Forms.Button();
this.Label1 = new System.Windows.Forms.Label();
this.imgtemp = new System.Windows.Forms.PictureBox();
this.img8 = new System.Windows.Forms.PictureBox();
this.img7 = new System.Windows.Forms.PictureBox();
this.img6 = new System.Windows.Forms.PictureBox();
this.img5 = new System.Windows.Forms.PictureBox();
this.img4 = new System.Windows.Forms.PictureBox();
this.img3 = new System.Windows.Forms.PictureBox();
this.img2 = new System.Windows.Forms.PictureBox();
this.img1 = new System.Windows.Forms.PictureBox();
this.img0 = new System.Windows.Forms.PictureBox();
this.SuspendLayout();
//
// Skin1
//
this.Skin1.Name = "Skin1";
this.Skin1.Location = new System.Drawing.Point(264, 128);
// this.Skin1.OleObjectBlob = "Form1.frx":0000;
//
// Timer1
//
this.Timer1.Enabled = false;
this.Timer1.Interval = 1000;
//
// cmdcorrect
//
this.cmdcorrect.Name = "cmdcorrect";
this.cmdcorrect.Text = " ";
this.cmdcorrect.Font = new System.Drawing.Font("B Traffic",9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((System.Byte)(178)));;
this.cmdcorrect.Size = new System.Drawing.Size(81, 33);
this.cmdcorrect.Location = new System.Drawing.Point(8, 208);
this.cmdcorrect.TabIndex = 2;
//
// cmdplay
//
this.cmdplay.Name = "cmdplay";
this.cmdplay.Text = " ";
this.cmdplay.DialogResult = System.Windows.Forms.DialogResult.OK;
this.cmdplay.Font = new System.Drawing.Font("B Traffic",9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((System.Byte)(178)));;
this.cmdplay.Size = new System.Drawing.Size(81, 33);
this.cmdplay.Location = new System.Drawing.Point(168, 208);
this.cmdplay.TabIndex = 1;
//
// Command1
//
this.Command1.Name = "Command1";
this.Command1.Text = "";
this.Command1.Font = new System.Drawing.Font("B Traffic",9F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((System.Byte)(178)));;
this.Command1.Size = new System.Drawing.Size(81, 33);
this.Command1.Location = new System.Drawing.Point(88, 208);
this.Command1.TabIndex = 0;
//
// Label1
//
this.Label1.Name = "Label1";
this.Label1.TextAlign = System.Drawing.ContentAlignment.TopCenter;
this.Label1.AutoSize = true;
this.Label1.Text = "00";
this.Label1.Size = new System.Drawing.Size(13, 13);
this.Label1.Location = new System.Drawing.Point(264, 176);
this.Label1.TabIndex = 3;
this.Label1.Visible = false;
//
// imgtemp
//
this.imgtemp.Name = "imgtemp";
this.imgtemp.Size = new System.Drawing.Size(81, 65);
this.imgtemp.Location = new System.Drawing.Point(264, 8);
// this.imgtemp.Stretch = -1;
this.imgtemp.Visible = false;
//
// img8
//
this.img8.Name = "img8";
this.img8.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img8.DragMode = 1;
this.img8.Size = new System.Drawing.Size(81, 65);
this.img8.Location = new System.Drawing.Point(168, 136);
// this.img8.Stretch = -1;
//
// img7
//
this.img7.Name = "img7";
this.img7.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img7.DragMode = 1;
this.img7.Size = new System.Drawing.Size(81, 65);
this.img7.Location = new System.Drawing.Point(88, 136);
// this.img7.Stretch = -1;
//
// img6
//
this.img6.Name = "img6";
this.img6.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img6.DragMode = 1;
this.img6.Size = new System.Drawing.Size(81, 65);
this.img6.Location = new System.Drawing.Point(8, 136);
// this.img6.Stretch = -1;
//
// img5
//
this.img5.Name = "img5";
this.img5.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img5.DragMode = 1;
this.img5.Size = new System.Drawing.Size(81, 65);
this.img5.Location = new System.Drawing.Point(168, 72);
// this.img5.Stretch = -1;
//
// img4
//
this.img4.Name = "img4";
this.img4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img4.DragMode = 1;
this.img4.Size = new System.Drawing.Size(81, 65);
this.img4.Location = new System.Drawing.Point(88, 72);
// this.img4.Stretch = -1;
//
// img3
//
this.img3.Name = "img3";
this.img3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img3.DragMode = 1;
this.img3.Size = new System.Drawing.Size(81, 65);
this.img3.Location = new System.Drawing.Point(8, 72);
// this.img3.Stretch = -1;
//
// img2
//
this.img2.Name = "img2";
this.img2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img2.DragMode = 1;
this.img2.Size = new System.Drawing.Size(81, 65);
this.img2.Location = new System.Drawing.Point(168, 8);
// this.img2.Stretch = -1;
//
// img1
//
this.img1.Name = "img1";
this.img1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img1.DragMode = 1;
this.img1.Size = new System.Drawing.Size(81, 65);
this.img1.Location = new System.Drawing.Point(88, 8);
// this.img1.Stretch = -1;
//
// img0
//
this.img0.Name = "img0";
this.img0.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle;
// this.img0.DragMode = 1;
this.img0.Size = new System.Drawing.Size(81, 65);
this.img0.Location = new System.Drawing.Point(8, 8);
// this.img0.Stretch = -1;
//
// Form1
//
this.Controls.AddRange(new System.Windows.Forms.Control[]
{
this.Skin1,
this.cmdcorrect,
this.cmdplay,
this.Command1,
this.Label1,
this.imgtemp,
this.img8,
this.img7,
this.img6,
this.img5,
this.img4,
this.img3,
this.img2,
this.img1,
this.img0
});
this.Name = "Form1";
this.BackColor = System.Drawing.Color.FromArgb(-4144897);
this.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None;
this.ClientSize = new System.Drawing.Size(257, 249);
this.MaximizeBox = false;
this.MinimizeBox = false;
this.ShowInTaskbar = false;
this.StartPosition = System.Windows.Forms.FormStartPosition.CenterScree n;
this.ResumeLayout(false);
}
#endregion

private short second;
private bool a;
private int b;
private string g;
private short i;
private string strfilename;
private short z;
private short z2;
private short i;
private string strtime;
private short i;

private void cmdcorrect_Click()
{


a = false;

For i = 0 To 8;

strfilename = App.Path + "\" + Trim(Str(i)) + ".bmp";
img(i).Picture = LoadPicture(strfilename);
img(i).Tag = i;

Next;

second = 0;

cmdplay.Enabled = true;
cmdcorrect.Enabled = false;

}
private void cmdplay_Click()
{


Call cmdcorrect_Click;

For i = 0 To 8;

Randomize;
z = 8 * Rnd;
z2 = 8 * Rnd;
imgtemp.Picture = img(z).Picture;
img(z).Picture = img(z2).Picture;
img(z2).Picture = imgtemp.Picture;
imgtemp.Tag = img(z).Tag;
img(z).Tag = img(z2).Tag;
img(z2).Tag = imgtemp.Tag;

Next;

a = true;
b = Timer;

Timer1.Enabled = true;
cmdcorrect.Enabled = false;
img(0).Enabled = true;
img(1).Enabled = true;
img(2).Enabled = true;
img(3).Enabled = true;
img(4).Enabled = true;
img(5).Enabled = true;
img(6).Enabled = true;
img(7).Enabled = true;
img(8).Enabled = true;

}
private void Command1_Click()
{

}
private void Form_Activate()
{

Skin1.ApplySkin hWnd;

}
private void Form_Load()
{

cmdplay.Enabled = false;
img(0).Enabled = false;
img(1).Enabled = false;
img(2).Enabled = false;
img(3).Enabled = false;
img(4).Enabled = false;
img(5).Enabled = false;
img(6).Enabled = false;
img(7).Enabled = false;
img(8).Enabled = false;

}
private void img_DragDrop {


if ( a = false )
{;

Exit Sub;

};

imgtemp.Picture = img(Index).Picture;
img(Index).Picture = Source.Picture;
Source.Picture = imgtemp.Picture;

imgtemp.Tag = img(Index).Tag;
img(Index).Tag = Source.Tag;
Source.Tag = imgtemp.Tag;

if ( CheckCorrect = true )
{;

strtime = Str(Int(Timer - b));
MsgBox (" Ӂ : " + strtime + " "), vbInformation, "";

cmdcorrect.Enabled = true;
Command1.Enabled = true;

a = false;
img(0).Enabled = false;
img(1).Enabled = false;
img(2).Enabled = false;
img(3).Enabled = false;
img(4).Enabled = false;
img(5).Enabled = false;
img(6).Enabled = false;
img(7).Enabled = false;
img(8).Enabled = false;

};
}
private As CheckCorrect()
{


For i = 0 To 8;

if ( img(i).Tag <> i )
{;

CheckCorrect = false;
Exit Function;

};

Next;

CheckCorrect = true;
second = 0;

}
private void Timer1_Timer()
{

if ( a = true )
{;

second = second + 1;
Label1.Text = second;

if ( second = 15 )
{
Timer1.Enabled = false;
if ( Timer1.Enabled = false )
{;

MsgBox (" "), vbCritical, " ";
cmdplay.Enabled = false;
Command1.Enabled = true;
cmdcorrect.Enabled = true;
img(0).Enabled = false;
img(1).Enabled = false;
img(2).Enabled = false;
img(3).Enabled = false;
img(4).Enabled = false;
img(5).Enabled = false;
img(6).Enabled = false;
img(7).Enabled = false;
img(8).Enabled = false;

};
};
}
}
}

[rezatati]

اسم کانورتو که استفاده می کنی چی هستش
ودر ضمن من این کد رو با استفاده از # Instant c که مال شرکت tangible softwares تبدیل کردم که امیدوارم کار بکنه


private int second;
private bool a;
private long b;
private string g;

private void cmdcorrect_Click()
{

int i = 0;
string strfilename = null;

a = false;

for (i = 0; i <= 8; i++)
{

strfilename = App.Path + "\\" + System.Convert.ToString(i).ToString().Trim(' ') + ".bmp";
img(i).Picture = LoadPicture(strfilename);
img(i).Tag = i;

}

second = 0;

cmdplay.Enabled = true;
cmdcorrect.Enabled = false;

}

private void cmdplay_Click()
{

int z = 0;
int z2 = 0;
int i = 0;

cmdcorrect_Click();

for (i = 0; i <= 8; i++)
{

Randomize;
z = 8 * Rnd;
z2 = 8 * Rnd;
imgtemp.Picture = img(z).Picture;
img(z).Picture = img(z2).Picture;
img(z2).Picture = imgtemp.Picture;
imgtemp.Tag = img(z).Tag;
img(z).Tag = img(z2).Tag;
img(z2).Tag = imgtemp.Tag;

}

a = true;
b = Timer;

Timer1.Enabled = true;
cmdcorrect.Enabled = false;
img(0).Enabled = true;
img(1).Enabled = true;
img(2).Enabled = true;
img(3).Enabled = true;
img(4).Enabled = true;
img(5).Enabled = true;
img(6).Enabled = true;
img(7).Enabled = true;
img(8).Enabled = true;

}

private void Command1_Click()
{

System.Environment.Exit(1);

}

private void Form_Activate()
{

//Skin1.ApplySkin hWnd

}

private void Form_Load()
{

cmdplay.Enabled = false;
img(0).Enabled = false;
img(1).Enabled = false;
img(2).Enabled = false;
img(3).Enabled = false;
img(4).Enabled = false;
img(5).Enabled = false;
img(6).Enabled = false;
img(7).Enabled = false;
img(8).Enabled = false;

}

private void img_DragDrop(int Index, Control Source, float X, float Y)
{

string strtime = null;

if (a == false)
{

return;

}

imgtemp.Picture = img(Index).Picture;
img(Index).Picture = Source.Picture;
Source.Picture = imgtemp.Picture;

imgtemp.Tag = img(Index).Tag;
img(Index).Tag = Source.Tag;
Source.Tag = imgtemp.Tag;

if (CheckCorrect() == true)
{

strtime = System.Convert.ToString((int)Math.Floor(Timer - b)).ToString();
MessageBox.Show("ÒãÇä ӁÑí ÔÏå : " + strtime + " ËÇäíå "), Microsoft.VisualBasic.Constants.vbInformation, "ÞåÑãÇä";

cmdcorrect.Enabled = true;
Command1.Enabled = true;

a = false;
img(0).Enabled = false;
img(1).Enabled = false;
img(2).Enabled = false;
img(3).Enabled = false;
img(4).Enabled = false;
img(5).Enabled = false;
img(6).Enabled = false;
img(7).Enabled = false;
img(8).Enabled = false;

}
}

private bool CheckCorrect()
{
bool tempCheckCorrect = false;

int i = 0;

for (i = 0; i <= 8; i++)
{

if (img(i).Tag != i)
{

return false;

}

}

tempCheckCorrect = true;
second = 0;

return tempCheckCorrect;
}

private void Timer1_Timer()
{

if (a == true)
{

second = second + 1;
Label1.Caption = second;

if (second == 15)
{
Timer1.Enabled = false;
}
if (Timer1.Enabled == false)
{

MessageBox.Show("æÞÊ ÔãÇ ÊãÇã ÔÏ"), Microsoft.VisualBasic.Constants.vbCritical, "ÇÊãÇã ÒãÇä";
cmdplay.Enabled = false;
Command1.Enabled = true;
cmdcorrect.Enabled = true;
img(0).Enabled = false;
img(1).Enabled = false;
img(2).Enabled = false;
img(3).Enabled = false;
img(4).Enabled = false;
img(5).Enabled = false;
img(6).Enabled = false;
img(7).Enabled = false;
img(8).Enabled = false;

}
}
}

[rezatati]

البته از ظاهر قضیه بر میاد که کار کنه