1樓:匿名使用者
2) .新建一個工程,文字框text1,使使用者輸入字母一律轉換為大寫顯示(焦點在最右端)儲存。
text1.text=ucase$(text1.text) '轉換為大寫
text1.selstart=len(text1.text) '游標移到最右端
***********************************
4) .新建一個工程,在form1介面建立form2,form3兩個子選單的forms選單,選擇form2子選單,以無模式顯示form2,選擇form3子選單,以有模式顯示form3.儲存。
那個有模式無模式是什麼意思啊,要怎麼弄
private sub mnuform2_click() 'from2子選單單擊事件
form2.show '顯示form2
end sub
private sub mnuform3_click() 'from3子選單單擊事件
form3.show vbmodal,me '這句就是將form3顯示為有模式
end sub
2樓:匿名使用者
'form1中**
sub form_load()
form2.show 1
form3.show
end sub
'***************===完工
VB程式設計的兩個搜尋語句
不要單引號 select form time where 天數 text1.text select from time where 日期 dtpicker1.value select form time where 天數 text1.text 改為 dim days as long days val...
問兩個民法題目
1 因為雙方約定是交貨時付款,而乙公司要求甲公司先付部分貨款違反了雙方合同之間的約定,甲公司有權拒付。貨物損失由乙公司承擔,因為貨物還未交付,所有權還未轉移,且乙方違反合同約定。2 a 王某與其妻的婚姻關係不會自動恢復,最高人民法院關於貫徹執行 中華人民共和國民法通則 若干問題的意見 規定 被宣告死...
VB題目,求大佬,如圖,vb題目求大佬解答
private sub mand1 click 生成20個20 80之間隨機數,按每行5個數輸出到窗體 me.cls dim a 20 dim i as integer for i 0 to 19 randomize a i int rnd 80 20 1 20 if i 0 and i mod 5...