1 réponse
Ici tous XAML code peut être codé en vb alors
Code2--------------------------------
Imports System.Windows.Media
Imports System.Windows.Point
#VB#
--------------------------------------------
Ici j arrive presque sauf ce New point ->syntaxe erreur « impossible de convertir un valeur de type System.Drawing.Point en System.Windows.Point »
Aidez moi SVP je cherche les deux solutions (car parfois c’est très compliquer de convertir le code XAML en vb)
Merci
Code2--------------------------------
Imports System.Windows.Media
Imports System.Windows.Point
Public Class UserControl1
Public Property Couleur1 As Color = Color.FromRgb(45, 45, 45)
Public Property Couleur2 As Color = Color.FromRgb(45, 45, 45)
Public Sub New()
' Cet appel est requis par le concepteur.
InitializeComponent()
' Ajoutez une initialisation quelconque après l'appel InitializeComponent().
Dim position As PointF
position.X -= 2.0F
position.Y -= 6.0F
Dim P1 As New Point(0.0F, 1.0F)
Dim NormalBrush As New LinearGradientBrush
NormalBrush.StartPoint = New Point(0.0F, 1.0F)
NormalBrush.GradientStops.Add(New GradientStop(Couleur1, 0.0))
NormalBrush.GradientStops.Add(New GradientStop(Couleur2, 0.5))
BT.Background = NormalBrush
Dim NormalBorderBrush As New LinearGradientBrush
NormalBorderBrush.GradientStops.Add(New GradientStop(Colors.Red, 0.0))
NormalBorderBrush.GradientStops.Add(New GradientStop(Colors.White, 0.5))
BT.BorderBrush = NormalBorderBrush
' BT c'est Button Name
End Sub
End Class
#VB#
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load UserControl11.Couleur1 = Color.FromRgb(12, 12, 12) End Sub
--------------------------------------------
Ici j arrive presque sauf ce New point ->syntaxe erreur « impossible de convertir un valeur de type System.Drawing.Point en System.Windows.Point »
Aidez moi SVP je cherche les deux solutions (car parfois c’est très compliquer de convertir le code XAML en vb)
Merci
