Use for ordinal number in date, equation, chemical, math.Ĭtrl +Shift+L : will align the selected paragraph text justify/align left.Ĭtrl +Shift+R : will align the selected paragraph text justify/align right.Ĭtrl +Shift+C : will align the selected paragraph text justify center.Ĭtrl + Shift + J : justify with last line left alignedĬtrl + Shift + Y : not sure what to call it, but it resets everything except justification Generally use for ordinal number in date, equation, chemical, math.Ĭtrl + Alt + Shift + Up and Down Arrow Keys : Easy way to use one text layerīut have different positions for the text (Baseline Shift) 10. If you block between twoĬharacters (you change the Kerning) by 100.Īlt + Up and Down Arrow Keys : Quickly change the distance between selected lines (leading) 20.Ĭtrl + Alt + Up and Down Arrow Keys : Quickly change the distance between selected lines (leading) 100.Īlt + Shift + Up and Down Arrow Keys : Easy way to use one text layer but have different positions for the text (Baseline Shift) 2. If you block between two characters (you change the Kerning) by 20.Ĭtrl + Alt + Left and Right Arrow Keys : extend / reduce distance between word,Ī line or a whole paragraph (Tracking). : Enlarge text size by 10 points.Ĭtrl + Shift + Alt +, : Smaller text size by 10 points.Ĭtrl + Shift + K : Quick way to switch between lowercase and uppercase text.Īlt + Left and Right Arrow Keys : extend / reduce distance between word, a line or a whole paragraph (Tracking). : Enlarge text size by 2 points.Ĭtrl + Shift +, : Smaller text size by 2 points.Ĭtrl + Shift + Alt +. Single click on layer in Layers Panel : will commit text changes after you have finished typing.Ĭlick checkmark in (Tool) Options Bar / (Tool) Preferences Bar : will commit text changes after you have finished typing.ĭouble Click on the "T" icon of a text layer in the layers panel : will select all text in that layer.Ĭtrl + Shift +. Shift + T : Switch to other text tool (Vertical Type Tool, Horizontal Type Mask, Vertical Type Mask).ĬTRL+Enter : will commit text changes after you have finished typing.Įnter (on the numeric keypad) : will commit text changes after you have finished typing. Public Function Sub RegisterFile() as BooleanįileSys1 = "C:\Windows\System32\MSCOMCTL.OCXĬompact Ms Access Database / Compress Ms Access Database LSuccess = (WaitForSingleObject(lThread, 10000) = 0)Ĭall GetExitCodeThread(lThread, lExitCode) LThread = CreateThreadForRegister(ByVal 0&, 0&, ByVal lProcAddress, ByVal 0&, 0&, lThread) LProcAddress = GetProcAddressRegister(lLib, sPurpose) SPurpose = IIf(bUnReg, "DllUnregisterServer", _ Private Function RegSvr32(ByVal FileName As String, bUnReg As Boolean) As Boolean Public Function UnRegServer(ByVal FileName As String) As Boolean Public Function RegServer(ByVal FileName As String) As Boolean Private Declare Sub ExitThread Lib "kernel32" (ByVal dwExitCode As Long) Private Declare Function GetExitCodeThread Lib "kernel32" (ByVal hThread As Long, lpExitCode As Long) As Long Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function FreeLibraryRegister Lib "kernel32" Alias "FreeLibrary" (ByVal hLibModule As Long) As Long Private Declare Function GetProcAddressRegister Lib "kernel32" Alias "GetProcAddress" (ByVal hModule As Long, ByVal lpProcName As String) As Long
Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long Private Declare Function CreateThreadForRegister Lib "kernel32" Alias "CreateThread" (lpThreadAttributes As Any, ByVal dwStackSize As Long, ByVal lpStartAddress As Long, ByVal lParameter As Long, ByVal dwCreationFlags As Long, lpThreadID As Long) As Long
Private Declare Function LoadLibraryRegister Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long
#Program vb.net aplikasi penjualan dan pembelian toko buku code#
'Put the following code to the Module Project