Question

让图像框中的图片消失怎样编写命令按钮在vb中

Answer 1

在VB中可使用 LoadPicture 函数将图片加载到窗体的 PictureBox
控件并从控件上清除掉该图片。

1. Private Sub Command1_Click()

       Picture1.Picture = LoadPicture()   '清除 picturebox。

   End Sub

2. LoadPicture 函数，将图形载入到窗体的 Picture 属性、PictureBox 控件或 Image 控件。

   

3. LoadPicture 函数示例

   本例使用 LoadPicture 函数将图片加载到窗体的 PictureBox
   控件并从控件上清除掉该图片。要试用此例，将 PictureBox 控件添加入 Form 对象，然后将以下代码粘贴到 Form
   的声明部分，然后运行此例，单击 Form 。

   Private Sub Form_Click ()
     Dim Msg as String   ' 声明变量。
     On Error Resume Next   ' 设置错误句柄。
     Height = 3990
     Width = 4890   ' 设置高度和宽度。
     Picture1.Picture = LoadPicture("PAPER.CUR", vbLPCustom, vbLPColor, 32, 32)   ' 加载光标。
     If Err Then
        Msg = "Couldn't find the .cur file."
        MsgBox Msg   ' 显示错误消息。
        Exit Sub   ' 如果发生错误则退出。
     End If
     Msg = "Choose OK to clear the bitmap from the form."
     MsgBox Msg
     Picture1.Picture = LoadPicture()   '清除 picturebox。
   End Sub
   
   
   

Answer 2

typedef void(*func)(void);
typedef struct hand
{
char *pname;
func handler;
}HAND_TO;

Answer 3

Private Sub Command1_Click()
Picture1.Picture = Nothing
End Sub