程序要求:窗體上設置兩個帶水平和垂直滾動條的文本框,并設置相應的四個按鈕和一些標簽,實現文本框1中選中的內容向文本框2的復制、向文本框2開始部分的插入、向文本框2開始部分的插入并且自身的刪除、退出程序四個功能解答:Private Sub Command1_Click()Text2.Text = Text1.TextEnd SubPrivate Sub Command2_Click()Text2.Text = Text1.Text & Text2.TextEnd SubPrivate Sub Command3_Click()Text2.Text = Text1.TextText1.Text = ""End SubPrivate Sub Command4_Click()EndEnd Sub
熱心網友
據我所知,如果要操作選中的文字,應該用seltext所以Private Sub Command1_Click()Text2.Text = Text1.SelTextEnd SubPrivate Sub Command2_Click()Text2.Text = Text1.Text & Text2.SelTextEnd SubPrivate Sub Command3_Click()Text2.Text = Text1.TextText1.Text = ""End SubPrivate Sub Command4_Click()EndEnd Sub
熱心網友
就我所知,VB似乎不能處理TEXT中的選中部分吧。按照上面的代碼運行的話,是對TEXT1中的所有文本進行操作的。
熱心網友
圖