如何為vb菜單編輯器及其控件編寫代碼

同時，在復制/粘貼操作之後，要求只有“粘貼”菜單項可用。謝謝大家！”

這樣做以後就不能“剪切”和“復制”了，好像有點奇怪！！

選項顯式

私有子窗體_Load()

剪切菜單。啟用=真

復制菜單。啟用=真

粘貼菜單。啟用=假

末端接頭

私有子副本菜單_Click()

剪貼板。清楚的

剪貼板。SetText文本1。SelText，ClipBoardConstants.vbCFText

粘貼菜單。啟用=真

剪切菜單。啟用=假

復制菜單。啟用=假

末端接頭

私有子剪切菜單_Click()

剪貼板。清楚的

剪貼板。SetText文本1。SelText，ClipBoardConstants.vbCFText

Text1。SelText = " "

粘貼菜單。啟用=真

末端接頭

私有子粘貼菜單_Click()

將a作為字符串變暗

a =剪貼板。GetText(clipboard constants . vbcftext)

Text1。SelText = a

剪切菜單。啟用=假

復制菜單。啟用=假

粘貼菜單。啟用=真

末端接頭