Some necessary skills in VB Project

Click the Close button in the upper right corner to eject " Tips " , does not repeat when closed, but right-click

in the vb To find this event in the Private Sub form_queryunload (Cancel As Integer, UnloadMode as Integer) if MsgBox (" do you want to exit ", vbYesNo + vbDefaultButton2, " hint ") = vbno Thencancel = TrueEnd IfEnd Sub

The use of the backspace bar in the calculator

Assume that the Name property of the backspace button is: cmdBack

The Name property of the Output window textbook is: dataout

Private Sub Cmdback_click ()

If Dataout. Caption = "0" Then

Exit Sub

End If

If (dataout. Caption <> "") Then

Dataout. Caption = Mid (dataout. Caption, 1, Len (dataout. Caption)-1)

ElseIf Dataout. Caption = "Then"

Dataout. Caption = "0"

End If

'----If the result is displayed, then zeroing

' When there is no calculation, place the result on the marker position 1

If Res Then

Dataout. Caption = "0"

End If

End Sub

VB use of the software skin control

Add: Right-click the widget on the Control toolbar and select Browse under the Controls tab in the Pop-up window to add the xxx. OCX, remember the front check box to tick. 

Delete: Right-click the widget on the Control toolbar and select Browse under the Controls tab in the Pop-up window to remove the xxx.  the check box in front of the OCX control is removed (provided that you cannot be in use for this deleted control)

End of Project Exit greeting

MsgBox " Thanks for using "& VbCrLf &" Good bye!  ", vbOKOnly," Phase two project XXX "

  5.      How to register   ocx   control   

32   bit system:     Place the file in  c:\windows\system directory     register  run: Regsvr32 \ n Windows\system\xxx.ocx Unregister run: regsvr32.exe/u c:\windows\system\ Xxx.ocx  64  bit system Register  32-bit file:    place file in   c:\windows\syswow64 directory  run:  Regsvr32.exe c:\windows\sysWOW64\xxx.ocx  

Of course, you can also write a registry:

These two files are available under this folder:

Xxx.ocx and registering Xxx.cmd;

which Xxx.cmd written in:

XXX * *%windir%\system32\/y

Regsvr32%WINDIR%\SYSTEM32\XP XXX . ocx/s

Pause

Some necessary skills in VB Project