CN101436125A - 特殊符号输入法 - Google Patents

特殊符号输入法 Download PDF

Info

Publication number
CN101436125A
CN101436125A CNA2007101661444A CN200710166144A CN101436125A CN 101436125 A CN101436125 A CN 101436125A CN A2007101661444 A CNA2007101661444 A CN A2007101661444A CN 200710166144 A CN200710166144 A CN 200710166144A CN 101436125 A CN101436125 A CN 101436125A
Authority
CN
China
Prior art keywords
caption
sub
clipboard
click
call
Prior art date
Legal status (The legal status is an assumption and is not a legal conclusion. Google has not performed a legal analysis and makes no representation as to the accuracy of the status listed.)
Pending
Application number
CNA2007101661444A
Other languages
English (en)
Inventor
吴多传
Current Assignee (The listed assignees may be inaccurate. Google has not performed a legal analysis and makes no representation or warranty as to the accuracy of the list.)
Individual
Original Assignee
Individual
Priority date (The priority date is an assumption and is not a legal conclusion. Google has not performed a legal analysis and makes no representation as to the accuracy of the date listed.)
Filing date
Publication date
Application filed by Individual filed Critical Individual
Priority to CNA2007101661444A priority Critical patent/CN101436125A/zh
Publication of CN101436125A publication Critical patent/CN101436125A/zh
Pending legal-status Critical Current

Links

Landscapes

  • Input From Keyboards Or The Like (AREA)

Abstract

特殊符号输入法提供一种不针对某种特定软件的输入方法,该输入法直接在显示屏上显示数学运算符等特殊符号,只需用鼠标单击,被点击的符号即能输入到光标指定的位置。

Description

特殊符号输入法
所属技术领域
本发明直接应用于计算机中特殊符号的输入。
背景技术
眼下各种输入法不下几十种,但主要都是针对文字符号进行设计,对数学运算符等特殊符号的输入还是显得不方便,某些编辑软件虽然有快速输入特殊符号的功能,但却只能在它的界面内使用,又显得不够通用。
发明内容
为了克服目前输入法对特殊符号输入的困难,本发明提供一种不针对某种特定软件的输入方法,该输入法直接在显示屏上显示特殊符号,只需用鼠标单击,被点击的符号即能输入到光标指定的位置。为了在较小的显示区域内显示更多的特殊符号,对特殊符号按类型分类,每一类型显示在一页中,通过单击不同命令按钮显示不同的特殊符号类型。
本发明解决其技术问题所采用的技术方案是:运行Visual Basic 6.0软件,在“文件”菜单中选择“新建工程”命令打开对话框,选择“标准EXE”建立一个默认名为form1的窗口,把它的Caption属性设为“特殊符号输入法(演示版)”(注:输入时没有双引号“”)。向窗体添加如下控件:(1)八个单选按钮控件Option1~Option8,它们的Caption属性分别设为“ā”、“零”、“①”、“π”、“≈”、“★”、“囍”和“:)”。(2)两个框架frame1和frame2,它们的Caption属性均设为空,在frame1内添加六十个命令按钮控件Command1~Command60,在frame2内添加十二个命令按钮控件Command61~Command72。(3)一个命令按钮控件Command73,它的Caption属性设为“关于”。(4)一个计时器控件Timer,它的Interval属性设为“100”。在“视图”菜单中选择“代码窗口”,向代码窗口中输入如下代码:
Const SWP_NOSIZE=1
Const HWND_TOPMOST=-1
Const WM_PASTE=&H302
Const KEYEVENTF_KEYUP=&H2
Const VK_CONTROL=&H11
Const VK_V=&H56
Private Type POINTAPI
    X As Long
    Y As Long
End Type
Private Type RECT
    leftAs Long
    topAs Long
    rightAs Long
    bottom As Long
End Type
Private Declare Function GetDesktopWindow Lib"user32"()As Long
Private Declare Sub Sleep Lib"kerne132"(ByVal dwMilliseconds As Long)
Private Declare Sub keybd_event Lib"user32"(ByVal bVk As Byte,ByVal bScan As Byte,ByVal dwFlags As Long,ByVal dwExtraInfo As Long)
Private Declare Function SetActiveWindow Lib"user32"(ByVal hwnd As Long)As Long
Private Declare Function GetForegroundWindow Lib"user32"()As Long
Private Declare Function GetCursorPos Lib"user32"(lpPointAs POINTAPI)As Long
Private Declare Function SetWindowPos Lib"user32"(ByVal hwnd As Long,ByValhWndInsertAfter As Long,ByVal X As Long,ByVal Y As Long,ByVal cx As Long,ByVal cy AsLong,ByVal wFlags As Long)As Long
Private Declare Function GetWindowRect Lib"user32"(ByVal hwnd As Long,lpRect AsRECT)As Long
Private Sub Form_Load()
     Dim drecAs RECT
     Dim dhwnd As Long
     Static ahwnd As Long
     dhwnd=GetDesktopWindow
     GetWindowRect dhwnd,drec
     SetWindowPos Form1.hwnd,HWND_TOPMOST,drec.right-255,drec.bottom-250,280,240,SWP_NOSIZE
     Call Addl
End Sub
Private Sub Option1_Click()
   Frame1.Visible=True
   Frame2.Visible=False
   Call Addl
End Sub
Private Sub Option2_Click()
    Frame1.Visible=True
    Frame2.Visible=False
   Call Add2
End Sub
Private Sub Option3_Click()
    Frame1.Visible=True
    Frame2.Visible=False
    CallAdd3
End Sub
Private Sub Option4_Click()
    Frame1.Visible=True
    Frame2.Visible=False
    Call Add4
End Sub
Private Sub Option5_Click()
    Frame1.Visible=True
    Frame2.Visible=False
    Call Add5
End Sub
Private Sub Option6_Click()
    Frame1.Visible=True
    Frame2.Visible=False
    Call Add6
End Sub
Private Sub Option7_Click()
    Frame1.Visible=False
    Frame2.Visible=True
    Call Add7
End Sub
Private Sub Option8_Click()
    Frame1.Visible=False
    Frame2.Visible=True
    Call Add8
End Sub
Private Sub Timer1_Timer()
    Dim rec As RECT,point As POINTAPI
  GetWindowRect Form1.hwnd,rec
  GetCursorPos point
      If point.X<rec.leftOr point.X>rec.right Or point.Y<rec.top Or point.Y>rec.bottom Then
      ahwnd=GetForegroundWindow()
    End If
End Sub
Private Sub Command1_Click()
    Clipboard.Clear
    Clipboard.SetText Command1.Caption
    Call Paste2
End Sub
Private Sub Command2_Click()
    Clipboard.Clear
    Clipboard.SetText Command2.Caption
    Call Paste2
End Sub
Private Sub Command3_Click()
    Clipboard.Clear
    Clipboard.SetText Command3.Caption
    Call Paste2
End Sub
Private Sub Command4_Click()
    Clipboard.Clear
    Clipboard.SetText Command4.Caption
    Call Paste2
End Sub
Private Sub Command5_Click()
    Clipboard.Clear
    Clipboard.SetText Command5.Caption
    Call Paste2
End Sub
Private Sub Command6_Click()
    Clipboard.Clear
    Clipboard.SetText Command6.Caption
    Call Paste2
End Sub
Private Sub Command7_Click()
    Clipboard.Clear
    Clipboard.SetText Command7.Caption
    Call Paste2
End Sub
Private Sub Command8_Click()
    Clipboard.Clear
    Clipboard.SetText Command8.Caption
    Call Paste2
End Sub
Private Sub Command9_Click()
    Clipboard.Clear
    Clipboard.SetText Command9.Caption
    Call Paste2
End Sub
Private Sub Command10_Click()
    Clipboard.Clear
    Clipboard.SetText Command10.Caption
    Call Paste2
End Sub
Private Sub Command11_Click()
    Clipboard.Clear
    Clipboard.SetText Command11.Caption
    Call Paste2
End Sub
Private Sub Command13_Click()
    Clipboard.Clear
    Clipboard.SetText Command13.Caption
    Call Paste2
End Sub
Private Sub Command14_Click()
    Clipboard.Clear
    Clipboard.SetText Command14.Caption
    Call Paste2
End Sub
Private Sub Command15_Click()
    Clipboard.Clear
    Clipboard.SetText Command15.Caption
    Call Paste2
End Sub
Private Sub Command16_Click()
    Clipboard.Clear
    Clipboard.SetText Command16.Caption
    Call Paste2
End Sub
Private Sub Command17_Click()
    Clipboard.Clear
    Clipboard.SetText Command17.Caption
    Call Paste2
End Sub
Private Sub Command18_Click()
    Clipboard.Clear
    Clipboard.SetText Command18.Caption
    Call Paste2
End Sub
Private Sub Command19_Click()
    Clipboard.Clear
    Clipboard.SetText Command19.Caption
    CallPaste2
End Sub
Private Sub Command20_Click()
    Clipboard.Clear
    Clipboard.SetText Command20.Caption
    Call Paste2
End Sub
Private Sub Command21_Click()
    Clipboard.Clear
    Clipboard.SetText Command21.Caption
    Call Paste2
End Sub
Private Sub Command22_Click()
    Clipboard.Clear
    Clipboard.SetText Command22.Caption
    Call Paste2
End Sub
Private Sub Command23_Click()
    Clipboard.Clear
    Clipboard.SetText Command23.Caption
    Call Paste2
End Sub
Private Sub Command24_Click()
     Clipboard.Clear
     Clipboard.SetText Command24.Caption
     Call Paste2
End Sub
Private Sub Command25_Click()
    Clipboard.Clear
    Clipboard.SetText Command25.Caption
    Call Paste2
End Sub
Private Sub Command26_Click()
    Clipboard.Clear
    Clipboard.SetText Command26.Caption
    Call Paste2
End Sub
Private Sub Command27_Click()
    Clipboard.Clear
    Clipboard.SetText Command27.Caption
    Call Paste2
End Sub
Private Sub Command28_Click()
    Clipboard.Clear
    Clipboard.SetText Command28.Caption
    Call Paste2
End Sub
Private Sub Command29_Click()
    Clipboard.Clear
    Clipboard.SetText Command29.Caption
    Call Paste2
End Sub
Private Sub Command12_Click()
    Clipboard.Clear
    Clipboard.SetText Command12.Caption
    Call Paste2
End Sub
Private Sub Command30_Click()
    Clipboard.Clear
    Clipboard.SetText Command30.Caption
    Call Paste2
End Sub
Private Sub Command31_Click()
    Clipboard.Clear
    Clipboard.SetText Command31.Caption
    Call Paste2
End Sub
Private Sub Command32_Click()
    Clipboard.Clear
    Clipboard.SetText Command32.Caption
    Call Paste2
End Sub
Private Sub Command33_Click()
    Clipboard.Clear
    Clipboard.SetText Command33.Caption
    Call Paste2
End Sub
Private Sub Command34_Click()
    Clipboard.Clear
    Clipboard.SetText Command34.Caption
    Call Paste2
End Sub
Private Sub Command35_Click()
    Clipboard.Clear
    Clipboard.SetText Command35.Caption
    Call Paste2
End Sub
Private Sub Command36_Click()
    Clipboard.Clear
    Clipboard.SetText Command36.Caption
    Call Paste2
End Sub
Private Sub Command37_Click()
    Clipboard.Clear
    Clipboard.SetText Command37.Caption
    Call Paste2
End Sub
Private Sub Command38_Click()
    Clipboard.Clear
    Clipboard.SetText Command38.Caption
    Call Paste2
End Sub
Private Sub Command39_Click()
    Clipboard.Clear
    Clipboard.SetText Command39.Caption
    Call Paste2
End Sub
Private Sub Command40_Click()
    Clipboard.Clear
    Clipboard.SetText Command40.Caption
    CallPaste2
End Sub
Private Sub Command41_Click()
    Clipboard.Clear
    Clipboard.SetText Command41.Caption
    Call Paste2
End Sub
Private Sub Command42_Click()
    Clipboard.Clear
    Clipboard.SetText Command42.Caption
    Call Paste2
End Sub
Private Sub Command43_Click()
    Clipboard.Clear
    Clipboard.SetText Command43.Caption
    Call Paste2
End Sub
Private Sub Command44_Click()
    Clipboard.Clear
    Clipboard.SetText Command44.Caption
    Call Paste2
End Sub
Private Sub Command45_Click()
    Clipboard.Clear
    Clipboard.SetText Command45.Caption
    Call Paste2
End Sub
Private Sub Command46_Click()
    Clipboard.Clear
    Clipboard.SetText Command46.Caption
    Call Paste2
End Sub
Private Sub Command47_Click()
    Clipboard.Clear
    Clipboard.SetText Command47.Caption
    Call Paste2
End Sub
Private Sub Command48_Click()
    Clipboard.Clear
    Clipboard.SetText Command48.Caption
    Call Paste2
End Sub
Private Sub Command49_Click()
    Clipboard.Clear
    Clipboard.SetText Command49.Caption
    Call Paste2
End Sub
Private Sub Command50_Click()
    Clipboard.Clear
    Clipboard.SetText Command50.Caption
    Call Paste2
End Sub
Private Sub Command51_Click()
    Clipboard.Clear
    Clipboard.SetText Command51.Caption
    Call Paste2
End Sub
Private Sub Command52_Click()
    Clipboard.Clear
    Clipboard.SetText Command52.Caption
    Call Paste2
End Sub
Private Sub Command53_Click()
    Clipboard.Clear
    Clipboard.SetText Command53.Caption
    Call Paste2
End Sub
Private Sub Command54_Click()
    Clipboard.Clear
    Clipboard.SetText Command54.Caption
    Call Paste2
End Sub
Private Sub Command55_Click()
    Clipboard.Clear
    Clipboard.SetText Command55.Caption
    Call Paste2
End Sub
Private Sub Command56_Click()
    Clipboard.Clear
    Clipboard.SetText Command56.Caption
    Call Paste2
End Sub
Private Sub Command57_Click()
    Clipboard.Clear
    Clipboard.SetText Command57.Caption
    Call Paste2
End Sub
Private Sub Command58_Click()
    Clipboard.Clear
    Clipboard.SetText Command58.Caption
    Call Paste2
End Sub
Private Sub Command59_Click()
    Clipboard.Clear
    Clipboard.SetText Command59.Caption
    Call Paste2
End Sub
Private Sub Command60_Click()
    Clipboard.Clear
    Clipboard.SetText Command60.Caption
    Call Paste2
End Sub
Private Sub Command61_Click()
    Clipboard.Clear
    Clipboard.SetText Command61.Caption
    Call Paste2
End Sub
Private Sub Command62_Click()
    Clipboard.Clear
    Clipboard.SetText Command62.Caption
    Call Paste2
End Sub
Private Sub Command63_Click()
    Clipboard.Clear
    Clipboard.SetText Command63.Caption
    Call Paste2
End Sub
Private Sub Command64_Click()
    Clipboard.Clear
    Clipboard.SetText Command64.Caption
    Call Paste2
End Sub
Private Sub Command65_Click()
    Clipboard.Clear
    Clipboard.SetText Command65.Caption
    Call Paste2
End Sub
Private Sub Command66_Click()
    Clipboard.Clear
    Clipboard.SetText Command66.Caption
    Call Paste2
End Sub
Private Sub Command67_Click()
    Clipboard.Clear
    Clipboard.SetText Command67.Caption
    Call Paste2
End Sub
Private Sub Command68_Click()
    Clipboard.Clear
    Clipboard.SetText Command68.Caption
Call Paste2
End Sub
Private Sub Command69_Click()
    Clipboard.Clear
    Clipboard.SetText Command69.Caption
    Call Paste2
End Sub
Private Sub Command70_Click()
    Clipboard.Clear
    Clipboard.SetText Command70.Caption
    Call Paste2
End Sub
Private Sub Command71_Click()
    Clipboard.Clear
    Clipboard.SetText Command71.Caption
    Call Paste2
End Sub
Private Sub Command72_Click()
    Clipboard.Clear
    Clipboard.SetText Command72.Caption
    Call Paste2
End Sub
Private Sub Command74_Click()
    Call MsgBox("版权所有 2007 海南 吴多传",vbOKOnly,"特殊符号输入法(演示版)")
End Sub
Private Sub Add1()
    Command1.Caption="ā"
    Command2.Caption="á"
Command3.Caption="ǎ"
Command4.Caption="à"
Command5.Caption=""
Command6.Caption="ē"
Command7.Caption="é"
Command8.Caption="ě"
Command9.Caption="è"
Command10.Caption=""
Command11.Caption="ī"
Command12.Caption="í"
Command13.Caption="ǐ"
Command14.Caption="ì"
Command15.Caption=""
Command16.Caption="ō"
Command17.Caption="ó"
Command18.Caption="ǒ"
Command19.Caption="ò"
Command20.Caption=""
Command21.Caption="ū"
Command22.Caption="ú"
Command23.Caption="ǔ"
Command24.Caption="ù"
Command25.Caption=""
Command26.Caption="ǖ"
Command27.Caption="ǘ"
Command28.Caption="ǚ"
Command29.Caption="ǜ"
Command30.Caption=""
Command31.Caption="ü"
Command32.Caption=
Figure A200710166144D00171
Command33.Caption="o"
    Command34.Caption="g"
    Command35.Caption=""
    Command36.Caption=
Figure A200710166144D00181
    Command37.Caption=
Figure A200710166144D00182
    Command38.Caption=
Figure A200710166144D00183
    Command39.Caption=
Figure A200710166144D00184
    Command40.Caption=""
    Command41.Caption=""
    Command42.Caption=""
    Command43.Caption=""
    Command44.Caption=""
    Command45.Caption=""
    Command46.Caption=""
    Command47.Caption=""
    Command48.Caption=""
    Command49.Caption=""
    Command50.Caption=""
    Command51.Caption=""
    Command52.Caption=""
    Command53.Caption=""
    Command54.Caption=""
    Command55.Caption=""
    Command56.Caption=""
    Command57.Caption=""
    Command58.Caption=""
    Command59.Caption=""
    Command60.Caption=""
End Sub
Private Sub Add2()
    Command1.Caption="(一)"
    Command2.Caption="(二)"
    Command3.Caption="(三)"
Command4.Caption="(四)"
Command5.Caption="(五)"
Command6.Caption="(六)"
Command7.Caption="(七)"
Command8.Caption="(八)"
Command9.Caption="(九)"
Command10.Caption="(十)"
Command11.Caption="○"
Command12.Caption="一"
Command13.Caption="二"
Command14.Caption="三"
Command15.Caption="四"
Command16.Caption="五"
Command17.Caption="六"
Command18.Caption="七"
Command19.Caption="八"
Command20.Caption="九"
Command21.Caption="十"
Command22.Caption="百"
Command23.Caption="千"
Command24.Caption="万"
Command25.Caption="亿"
Command26.Caption="兆"
Command27.Caption="吉"
Command28.Caption="太"
Command29.Caption="拍"
Command30.Caption="艾"
Command31.Caption="分"
Command32.Caption="厘"
Command33.Caption="毫"
Command34.Caption="微"
    Command35.Caption=""
    Command36.Caption=""
    Command37.Caption=""
    Command38.Caption="拾"
    Command39.Caption="佰"
    Command40.Caption="仟"
    Command41.Caption="零"
    Command42.Caption="壹"
    Command43.Caption="贰"
    Command44.Caption="叁"
    Command45.Caption="肆"
    Command46.Caption="伍"
    Command47.Caption="陆"
    Command48.Caption="柒"
    Command49.Caption="捌"
    Command50.Caption="玖"
    Command51.Caption="
Figure A200710166144D0020143756QIETU
    Command52.Caption="‖"
    Command53.Caption="
Figure A200710166144D0020143804QIETU
    Command54.Caption="
    Command55.Caption="
Figure A200710166144D0020143824QIETU
    Command56.Caption=
Figure A200710166144D00201
    Command57.Caption=
Figure A200710166144D00202
    Command58.Caption=
Figure A200710166144D00203
Command59.Caption=""
    Command60.Caption=""
End Sub
Private Sub Add3()
    Command1.Caption="①"
    Command2.Caption="②"
    Command3.Caption="③"
    Command4.Caption="④"
Command5.Caption="⑤"
Command6.Caption="⑥"
Command7.Caption="⑦"
Command8.Caption="⑧"
Command9.Caption="⑨"
Command10.Caption="⑩"
Command11.Caption="(1)"
Command12.Caption="(2)"
Command13.Caption="(3)"
Command14.Caption="(4)"
Command15.Caption="(5)"
Command16.Caption="(6)"
Command17.Caption="(7)"
Command18.Caption="(8)"
Command19.Caption="(9)"
Command20.Caption="(10)"
Command21.Caption="(11)"
Command22.Caption="(12)"
Command23.Caption="(13)"
Command24.Caption="(14)"
Command25.Caption="(15)"
Command26.Caption="(16)"
Command27.Caption="(17)"
Command28.Caption="(18)"
Command29.Caption="(19)"
Command30.Caption="(20)"
Command31.Caption="1."
Command32.Caption="2."
Command33.Caption="3."
Command34.Caption="4."
Command35.Caption="5."
    Command36.Caption="6."
    Command37.Caption="7."
    Command38.Caption="8."
    Command39.Caption="9."
    Command40.Caption="10."
    Command41.Caption="11."
    Command42.Caption="12."
    Command43.Caption="13."
    Command44.Caption="14."
    Command45.Caption="15."
    Command46.Caption="16."
    Command47.Caption="17."
    Command48.Caption="18."
    Command49.Caption="19."
    Command50.Caption="20."
    Command51.Caption="I"
    Command52.Caption="II"
    Command53.Caption="III"
    Command54.Caption="IV"
    Command55.Caption="V"
    Command56.Caption="VI"
    Command57.Caption="VII"
    Command58.Caption="VIII"
    Command59.Caption="IX"
    Command60.Caption="X"
End Sub
Private Sub Add4()
    Command1.Caption="α"
    Command2.Caption="β"
    Command3.Caption="γ"
    Command4.Caption="δ"
    Command5.Caption="ε"
Command6.Caption="ζ"
Command7.Caption="η"
Command8.Caption="θ"
Command9.Caption="ι"
Command10.Caption="κ"
Command11.Caption="λ"
Command12.Caption="μ"
Command13.Caption="ν"
Command14.Caption="ξ"
Command15.Caption="o"
Command16.Caption="π"
Command17.Caption="ρ"
Command18.Caption="σ"
Command19.Caption="T"
Command20.Caption="υ"
Command21.Caption=
Command22.Caption="x"
Command23.Caption="ψ"
Command24.Caption="ω"
Command25.Caption=""
Command26.Caption=""
Command27.Caption=""
Command28.Caption=""
Command29.Caption=""
Command30.Caption=""
Command31.Caption="A"
Command32.Caption="B"
Command33.Caption="Γ"
Command34.Caption="Δ"
Command35.Caption="E"
Command36.Caption="Z"
    Command37.Caption="H"
    Command38.Caption="Θ"
    Command39.Caption="I"
    Command40.Caption="K"
    Command41.Caption="Λ"
    Command42.Caption="M"
    Command43.Caption="N"
    Command44.Caption="
Figure A200710166144D0024145524QIETU
    Command45.Caption="O"
    Command46.Caption="Π"
    Command47.Caption="P"
    Command48.Caption="∑"
    Command49.Caption="T"
    Command50.Caption="Y"
    Command51.Caption="Φ"
    Command52.Caption="X"
    Command53.Caption="ψ"
    Command54.Caption="Ω"
    Command55.Caption=""
    Command56.Caption=""
    Command57.Caption=""
    Command58.Caption=""
    Command59.Caption=""
    Command60.Caption=""
End Sub
Private Sub Add5()
    Command1.Caption="="
    Command2.Caption="≈"
    Command3.Caption="≠"
    Command4.Caption="三"
    Command5.Caption="≌"
    Command6.Caption="∽"
Command7.Caption="//"
Command8.Caption="⊥"
Command9.Caption=
Figure A200710166144D00251
Command10.Caption="∈"
Command11.Caption="≤"
Command12.Caption="≥"
Command13.Caption="<"
Command14.Caption=">"
Command15.Caption="≮"
Command16.Caption="≯"
Command17.Caption="∧"
Command18.Caption="∨"
Command19.Caption="∪"
Command20.Caption="∩"
Command21.Caption="±"
Command22.Caption="+"
Command23.Caption="—"
Command24.Caption="×"
Command25.Caption="÷"
Command26.Caption="/"
Command27.Caption="∑"
Command28.Caption="Π"
Command29.Caption="∫"
Command30.Caption="∮"
Command31.Caption="::"
Command32.Caption="∵"
Command33.Caption="∴"
Command34.Caption=":"
Command35.Caption="⌒"
Command36.Caption="⊙"
Command37.Caption=
Figure A200710166144D00252
    Command38.Caption="∠"
    Command39.Caption=
    Command40.Caption="√"
    Command41.Caption=""
    Command42.Caption=""
    Command43.Caption=""
    Command44.Caption=""
    Command45.Caption=""
    Command46.Caption=""
    Command47.Caption=""
    Command48.Caption=""
    Command49.Caption=""
    Command50.Caption=""
    Command51.Caption=""
    Command52.Caption=""
    Command53.Caption=""
    Command54.Caption=""
    Command55.Caption=""
    Command56.Caption=""
    Command57.Caption=""
    Command58.Caption=""
    Command59.Caption=""
    Command60.Caption=""
End Sub
Private Sub Add6()
    Command1.Caption="№"
    Command2.Caption="§"
    Command3.Caption="※"
    Command4.Caption="☆"
    Command5.Caption="★"
    Command6.Caption="→"
    Command7.Caption="←"
Command8.Caption="↑"
Command9.Caption="↓"
Command10.Caption="^"
Command11.Caption="○"
Command12.Caption="●"
Command13.Caption="◎"
Command14.Caption="◇"
Command15.Caption="◆"
Command16.Caption="口"
Command17.Caption="■"
Command18.Caption="△"
Command19.Caption="▲"
Command20.Caption=
Command21.Caption="¥"
Command22.Caption="£"
Command23.Caption="$"
Command24.Caption="$"
Command25.Caption="
Figure A200710166144D0027144510QIETU
Command26.Caption=
Figure A200710166144D00272
Command27.Caption=
Figure A200710166144D00273
Command28.Caption=
Command29.Caption="TEL
Command30.Caption="(株)"
Command31.Caption="°"
Command32.Caption="′"
Command33.Caption="″"
Command34.Caption="℃"
Command35.Caption="℉"
Command36.Caption="%"
Command37.Caption="‰"
Command38.Caption="@"
    Command39.Caption="&"
    Command40.Caption="#"
    Command41.Caption="kg"
    Command42.Caption="mg"
    Command43.Caption="km"
    Command44.Caption="am"
    Command45.Caption="mm"
    Command46.Caption="m2"
    Command47.Caption="cc"
    Command48.Caption="ln"
    Command49.Caption="log"
    Command50.Caption="mil"
    Command51.Caption="♀"
    Command52.Caption="♂"
    Command53.Caption=""
    Command54.Caption=""
    Command55.Caption=""
    Command56.Caption=""
    Command57.Caption=""
    Command58.Caption=""
    Command59.Caption=""
    Command60.Caption=""
End Sub
Private Sub Add7()
    Command61.Caption="public"
    Command62.Caption="private"
    Command63.Caption="protected"
    Command64.Caption="static"
    Command65.Caption="const"
    Command66.Caption="volatile"
    Command67.Caption="囍"
    Command68.Caption="嫪毐"
    Command69.Caption="甲由"
    Command70.Caption="博鳌"
    Command71.Caption="厄尔尼诺"
    Command72.Caption="罄竹难书"
End Sub
Private Sub Add8()
    Command61.Caption=":)"
    Command62.Caption=":-D"
    Command63.Caption="%-\"
    Command64.Caption=":-X"
    Command65.Caption=";-("
    Command66.Caption=":′("
    Command67.Caption="顶!!!"
    Command68.Caption="嘻嘻!"
    Command69.Caption="呵呵!"
    Command70.Caption="哈哈哈…"
    Command71.Caption="啊~哦~~?!"
    Command72.Caption="*$#-@!"
End Sub
Private Sub Paste2()
    SetActiveWindow ahwnd
    keybd_event VK_CONTROL,0,0,0
    keybd_event VK_V,0,0,0
    Sleep100
    keybd_event VK_V,0,KEYEVENTF_KEYUP,0
    keybd_event VK_CONTROL,0,KEYEVENTF_KEYUP,0
End Sub
单击“文件”菜单中的“生成特殊符号输入法(演示版).exe”项,单击“确定”按钮完成可执行文件的生成。
本发明的有益效果是,提供一种输入法,该输入法能方便地、快速地输入一些不常用的特殊符号。
具体实施方式
按照所采用的技术方案逐步操作,最终生成的可执行文件可以在Windows环境下运行。

Claims (1)

  1. 一种不针对某种特定软件的输入方法,其特征是:法直接在显示屏上显示特殊符号,只需用鼠标单击,被点击的符号即能输入到光标指定的位置;对特殊符号按类型分类,每一类型显示在一页中,通过单击不同命令按钮显示不同的特殊符号类型。
CNA2007101661444A 2007-11-12 2007-11-12 特殊符号输入法 Pending CN101436125A (zh)

Priority Applications (1)

Application Number Priority Date Filing Date Title
CNA2007101661444A CN101436125A (zh) 2007-11-12 2007-11-12 特殊符号输入法

Applications Claiming Priority (1)

Application Number Priority Date Filing Date Title
CNA2007101661444A CN101436125A (zh) 2007-11-12 2007-11-12 特殊符号输入法

Publications (1)

Publication Number Publication Date
CN101436125A true CN101436125A (zh) 2009-05-20

Family

ID=40710574

Family Applications (1)

Application Number Title Priority Date Filing Date
CNA2007101661444A Pending CN101436125A (zh) 2007-11-12 2007-11-12 特殊符号输入法

Country Status (1)

Country Link
CN (1) CN101436125A (zh)

Cited By (2)

* Cited by examiner, † Cited by third party
Publication number Priority date Publication date Assignee Title
CN101968719A (zh) * 2010-11-18 2011-02-09 北京数码大方科技有限公司 创建特殊字符的方法、装置及其计算机
WO2016197271A1 (zh) * 2015-06-11 2016-12-15 周连惠 一种特殊符号输入法及输入法系统

Cited By (2)

* Cited by examiner, † Cited by third party
Publication number Priority date Publication date Assignee Title
CN101968719A (zh) * 2010-11-18 2011-02-09 北京数码大方科技有限公司 创建特殊字符的方法、装置及其计算机
WO2016197271A1 (zh) * 2015-06-11 2016-12-15 周连惠 一种特殊符号输入法及输入法系统

Similar Documents

Publication Publication Date Title
US20050273700A1 (en) Computer system with user interface having annotation capability
TW591478B (en) Apparatus and method of using personal computer to integrate functions of home electronics
JP6795519B2 (ja) クロスドメインデスクトップ合成器
CN103218109A (zh) 用于安卓操作系统的双窗口解决方案
Cabreira et al. An analysis of mid-air gestures used across three platforms
TWI354224B (en) Interpreting architecture of multi-finger gesture
Hutterer et al. Groupware support in the windowing system
US8443299B1 (en) Rendering text in a brew device
US11016588B2 (en) Method and device and system with dual mouse support
WO2015030982A1 (en) Gui window with scaled-down version of the desktop for interacting with hidden interface elements
CN106066768A (zh) 一种ppt互动演示装置和方法
CN101436125A (zh) 特殊符号输入法
CN103034490A (zh) 一种基于Managed C实现WPF窗体与GDI窗体消息互操作的方法
Benyon et al. Blended spaces for collaborative creativity
US20150138085A1 (en) Electronic apparatus for simulating or interfacing a backward compatible human input device by means or control of a gesture recognition system
Scott et al. Towards an interaction blueprint for mixed reality experiences in glam spaces: the augmented telegrapher at porthcurno museum
JP2005339530A (ja) 小型コンピュータ装置用のユーザインターフェイスシェルを改良するシステムおよび方法
US20110314399A1 (en) Windowless runtime control of dynamic input device
Correia et al. From GUI to AVUI: situating audiovisual user interfaces within human-computer interaction and related fields
WO2019092920A1 (ja) 付加情報重畳プログラム、付加情報重畳方法、及び付加情報重畳装置
CN102662673B (zh) 用于手持设备的人机交互装置
Fetter et al. Tuiofx: A javafx toolkit for shared interactive surfaces
CN107797753A (zh) 一种调用预装输入法的软键盘及其调用方法
CN111045638B (zh) 光标控制方法、装置、存储介质和终端
Burkhardt et al. A mobile visual analytics approach for instant Trend Analysis in mobile Contexts

Legal Events

Date Code Title Description
C06 Publication
PB01 Publication
C10 Entry into substantive examination
SE01 Entry into force of request for substantive examination
C02 Deemed withdrawal of patent application after publication (patent law 2001)
WD01 Invention patent application deemed withdrawn after publication

Open date: 20090520