2013-10-31 94 views
0

有什么方法可以在控制台应用程序中模拟picturebox?我想这样,但图像总是返回全黑的:如何在控制台应用程序中模拟PictureBox控件

Using P As New PictureBox 
     P.Size = New Point(255, 255) 
     P.Image = New Bitmap(255, 255) 'I did set a real image, but I didn't for the sake this example 
    End Using 
+0

你想用它做什么?您的代码在使用结束时处理该控件。你应该使用Size属性的'New Size(255,255)'。 – LarsTech

+0

你说它是“完全黑色返回”,但你不显示你要返回的位置。你怎么知道图像是黑色的,还是有一些代码用来渲染它没有显示? –

+0

我发布的代码是一个例子,自然你会在“End Using”之前返回picturebox, –

回答

0

假设你已经导入需要显示的形式,不要使用form.Show方法的一切。而是使用Application.Run(New Form1)来显示表单。这post有一个更完整的答案。

您可以在设计器中设计表单,按原样使用表单,或者将其声明为新对象并更改任何属性并将新对象传递给Run方法。

Imports System.Drawing 
Imports System.Windows.Forms 
Module Module1 

    Sub Main() 
     Dim newform1 As New Form1 
     newform1.PictureBox1.Image = New Bitmap("MyImageFile") 
     Application.Run(newform1) 
     Console.ReadLine() 
    End Sub 

End Module 
相关问题