|
|
|
|
Автор:
|
Anonymous
|
|
Тема:
|
error in exporting VB6.0 -> VB.NET
|
|
Дата:
|
4/3/2004 4:20:00 AM
|
возникли проблемы в конвертации фрагментов кода из VC60 в .NET:
[VC6.0]
Public Sub Inicializuj_mrizku()
Dim frm As Form
If vParam = "frmGroupPlace" Then
Set frm = frmGroupPlace
Else
Set frm = frmEdition
End If
Vel_mrizky.height = frm.Shape1.height
Vel_mrizky.left = frm.Shape1.left
Vel_mrizky.top = frm.Shape1.top
Vel_mrizky.width = frm.Shape1.width
Set frm = Nothing
End Sub
[.NET]
Public Sub Inicializuj_mrizku()
Dim frm As System.Windows.Forms.Form
If vParam = "frmGroupPlace" Then
frm = frmGroupPlace.DefInstance
Else
frm = frmEdition.DefInstance
End If
Vel_mrizky.height = frm.Shape1.height
Vel_mrizky.left_Renamed = frm.Shape1.left
Vel_mrizky.top = frm.Shape1.top
Vel_mrizky.width = frm.Shape1.width
frm = Nothing
End Sub
при Build'e выдается ошибка:
'Shape1' is not a member of 'System.Windows.Forms.Form'
Измения компоненты Shape на Label (в MSDN сказано, что в .NET уже не используется Shape) - род ошибки не изменился.
В чем здесь проблема?
Заранее спасибо
Sergey
|
|
|
|
