Fehlermeldung ka wie beheben

  • VB.NET

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von Devilx1.

    Fehlermeldung ka wie beheben

    hi ich hab beim erstellen von meinem programm "TW Skin creator"ein/mehrere probleme seit dem ich vista gelöscht habe und xp draufgemacht habe
    dies ist aus ms sample
    vb code

    VB.NET-Quellcode

    1. ' Copyright © Microsoft Corporation. All Rights Reserved.
    2. ' This code released under the terms of the
    3. ' Microsoft Public License (MS-PL, http://opensource.org/licenses/ms-pl.html.)
    4. '
    5. Imports Microsoft.Ink
    6. Public Class Form1Dim myInkOverlay As InkOverlay
    7. Sub New()
    8. ' This call is required by the Windows Form Designer.
    9. InitializeComponent()
    10. 'Place the various raster operations in the group box
    11. InitializeRasterOperations()
    12. End Sub
    13. 'Handle the form loading event by wiring up ink collectionSub FormLoadHandler(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
    14. 'Create and enable the ink collecting ControlmyInkOverlay = New InkOverlay(PictureBox2)
    15. myInkOverlay.Enabled = True
    16. 'Set the attributes of the ink collector
    17. SetAttributes()
    18. End Sub
    20. 'Creates controls for selecting raster operationSub InitializeRasterOperations()
    21. 'Add all the types of Raster Operations to the groupbox for possible selectionFor Each rasterOpName As String In System.Enum.GetNames(GetType(RasterOperation))
    22. 'Create a new radio buttonDim rasterButton As New RadioButton()
    23. rasterButton.Text = rasterOpName
    24. 'Default raster op is "Copy Pen"
    25. If rasterOpName = "CopyPen" Then
    26. rasterButton.Checked = True
    27. End If
    28. 'Add it to the flow layout panel
    29. FlowLayoutPanel1.Controls.Add(rasterButton)
    30. 'Add a handler to itAddHandler rasterButton.CheckedChanged, AddressOf RasterOpChosenHandler
    31. Next
    32. End Sub
    33. 'Handles selections of raster operationSub RasterOpChosenHandler(ByVal sender As Object, ByVal e As EventArgs)
    34. 'Who has been chosen?Dim chosenButton As RadioButton = CType(sender, RadioButton)
    35. 'This will be called if checked or unchecked, so only assign on checked
    36. If chosenButton.Checked Then
    37. 'What's the RasterOperation value of selected button?Dim rasterOp = System.Enum.Parse(GetType(RasterOperation), chosenButton.Text)
    38. 'Set attribute
    39. myInkOverlay.DefaultDrawingAttributes.RasterOperation = rasterOp
    40. End If
    41. End SubSub SetAttributesHandler(ByVal sender As Object, ByVal e As EventArgs) Handles antiAliasCheckbox.CheckedChanged, pressureSensitiveCheckbox.CheckedChanged, penTipRectangle.CheckedChanged, penTipEllipse.CheckedChanged, widthUpDown.ValueChanged, transparencyUpDown.ValueChanged, heightUpDown.ValueChanged
    42. 'Can be called prior to myInkOverlay being initialized, so check if that's the case
    43. If myInkOverlay Is Nothing Then
    44. Return
    45. End If
    46. SetAttributes()
    47. End Sub
    48. 'Sets the major attributes of the ink overlay (minus color, raster op, and some rare propertiesSub SetAttributes()
    49. 'Anti-aliasing
    50. If antiAliasCheckbox.Checked = True Then
    51. myInkOverlay.DefaultDrawingAttributes.AntiAliased = True
    52. Else
    53. myInkOverlay.DefaultDrawingAttributes.AntiAliased = False
    54. End If
    55. 'Pressure sensitivity
    56. If pressureSensitiveCheckbox.Checked = True Then
    57. myInkOverlay.DefaultDrawingAttributes.IgnorePressure = False
    58. Else
    59. myInkOverlay.DefaultDrawingAttributes.IgnorePressure = True
    60. End If
    61. 'Pen Tip
    62. If penTipRectangle.Checked = True Then
    63. myInkOverlay.DefaultDrawingAttributes.PenTip = PenTip.Rectangle
    64. Else
    65. myInkOverlay.DefaultDrawingAttributes.PenTip = PenTip.Ball
    66. End If
    67. 'Transparency
    68. myInkOverlay.DefaultDrawingAttributes.Transparency = transparencyUpDown.Value
    69. 'Height
    70. myInkOverlay.DefaultDrawingAttributes.Height = heightUpDown.Value
    71. 'Width
    72. myInkOverlay.DefaultDrawingAttributes.Width = widthUpDown.Value
    73. End Sub
    74. 'Handles "color" buttonPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    75. 'Create a standard dialogDim colorDialog As New ColorDialog()
    76. 'Set color to current color
    77. colorDialog.Color = myInkOverlay.DefaultDrawingAttributes.Color
    78. 'Show it
    79. If colorDialog.ShowDialog() = Windows.Forms.DialogResult.OK Then
    80. 'Set color to chosen
    81. myInkOverlay.DefaultDrawingAttributes.Color = colorDialog.Color
    82. End If
    83. End SubPrivate Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs)
    84. End SubPrivate Sub BeendenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BeendenToolStripMenuItem.Click
    85. Me.Close()SplashScreen1.Close()
    86. End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    87. AboutBox1.Show()
    88. End SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
    89. End SubPrivate Sub PictureBox2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox2.Click
    90. End SubPrivate Sub SpeichernToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SpeichernToolStripMenuItem.Click
    91. SaveFileDialog1.Filter = "PNG-Bild|*.png"
    92. If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
    93. Dim pfad As String
    94. pfad = SaveFileDialog1.FileNameDim bmp As New Bitmap(PictureBox1.Width, PictureBox1.Height)
    95. PictureBox1.DrawToBitmap(bmp, New Rectangle(0, 0, PictureBox1.Width, PictureBox1.Height))bmp.Save(pfad, System.Drawing.Imaging.ImageFormat.Png)
    96. End IfMsgBox("Gespeichert")
    97. End SubPrivate Sub LadenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LadenToolStripMenuItem.Click
    98. End SubEnd Class

    und die fehlermeldungen

    Quellcode

    1. Warnung 1 Der in Imports "Microsoft.Ink" angegebene Namespace oder Typ enthält keine öffentlichen Member oder kann nicht gefunden werden. Stellen Sie sicher, dass der Namespace oder der Typ definiert ist und mindestens einen öffentlichen Member enthält und dass der importierte Elementname keine weiteren Aliase enthält. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form1.vb 5 9 DrawingAttributes
    2. Fehler 2 Der Typ "InkOverlay" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form1.vb 8 25 DrawingAttributes
    3. Fehler 3 Der Typ "InkOverlay" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form1.vb 23 28 DrawingAttributes
    4. Fehler 4 Der Typ "RasterOperation" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form1.vb 34 73 DrawingAttributes
    5. Fehler 5 Der Typ "RasterOperation" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form1.vb 59 54 DrawingAttributes
    6. Fehler 6 "PenTip" wurde nicht deklariert. Auf das Objekt kann aufgrund seiner Schutzstufe möglicherweise nicht zugegriffen werden. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form1.vb 91 60 DrawingAttributes
    7. Fehler 7 "PenTip" wurde nicht deklariert. Auf das Objekt kann aufgrund seiner Schutzstufe möglicherweise nicht zugegriffen werden. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form1.vb 93 60 DrawingAttributes
    8. Warnung 8 Der in Imports "Microsoft.Ink" angegebene Namespace oder Typ enthält keine öffentlichen Member oder kann nicht gefunden werden. Stellen Sie sicher, dass der Namespace oder der Typ definiert ist und mindestens einen öffentlichen Member enthält und dass der importierte Elementname keine weiteren Aliase enthält. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form2.vb 5 9 DrawingAttributes
    9. Fehler 9 Der Typ "InkOverlay" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form2.vb 8 25 DrawingAttributes
    10. Fehler 10 Der Typ "InkOverlay" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form2.vb 23 28 DrawingAttributes
    11. Fehler 11 Der Typ "RasterOperation" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form2.vb 34 73 DrawingAttributes
    12. Fehler 12 Der Typ "RasterOperation" ist nicht definiert. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form2.vb 59 54 DrawingAttributes
    13. Fehler 13 "PenTip" wurde nicht deklariert. Auf das Objekt kann aufgrund seiner Schutzstufe möglicherweise nicht zugegriffen werden. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form2.vb 91 60 DrawingAttributes
    14. Fehler 14 "PenTip" wurde nicht deklariert. Auf das Objekt kann aufgrund seiner Schutzstufe möglicherweise nicht zugegriffen werden. D:\Dokumente und Einstellungen\Dominik\Eigene Dateien\Teeworlds Skin Editor\DrawingAttributes\Form2.vb 93 60 DrawingAttributes
    15. Warnung 15 Die Komponente "Microsoft.Ink", auf die verwiesen wird, wurde nicht gefunden.

    die frage erklärt sich von selbst:)

    die microsoft hilfe sagte zur 1. fehlermeldung das: [url=''http://msdn.microsoft.com/query/dev10.query?appId=Dev10IDEF1&l=DE-DE&k=k(VS.TASKLISTERROR.REFERENCENOTFOUND);k(TargetFrameworkMoniker-']http://msdn.microsoft.com/query/dev10.query?appId=Dev10IDEF1&l=DE-DE&k=k(VS.TASKLISTERROR.REFERENCENOTFOUND);k(TargetFrameworkMoniker-".NETFRAMEWORK,VERSION=V4.0")&rd=true[/url] aber ich verstand das nicht

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Hydropie“ ()

Facebook
Telefonspende