急！再線等，一道簡單的VB程式設計題

1樓：匿名使用者

我來給你做啊

很簡單，但是要點時間的

hi me

2樓：匿名使用者

程式不難.只說關鍵實現.設定字型呀,窗體那些自己弄.

比如command9 標籤名為9

其點選事件為

text1.text = text1.text & command9.caption

這樣,就可以按順序顯示號碼了.

重拔也簡單.

拔完號後,用一個str儲存text1.text點重拔鍵後,

for i=1 to9

text1.text=mid(str,i,1)'可以再加一句延時的空迴圈.

next i

或者第二種實現方法是,timer事件時,

依次呼叫command1_click(),...command9_click()

3樓：匿名使用者

dim callv, indx

private sub command1_click(index as integer)

text1.text = text1.text & indexend sub

private sub command2_click()callv = text1.text

indx = 1

text1.text = ""

timer1.enabled = trueend sub

private sub timer1_timer()if indx = len(callv) + 1 thentimer1.enabled = falseelse

call command1_click(mid(callv, indx, 1))

end if

indx = indx + 1

end sub

4樓：別碰我的西紅柿

新手路過 看看 看來你還不錯，幫幫我的問題吧

5樓：匿名使用者

挺簡單的，我寫寫看。

急！再線等，一道簡單的VB程式設計題

做好了，把你郵箱給我，我給你發過去 這是 和截圖。dim s as string dim a as integer private sub command1 click index as integer if len 20 then m msgbox 所撥數字已經達到最大 vbexclamation...

一道有關vb程式設計的題目，一道比較簡單的VB程式題目，只需要程式碼即可

火星飛人 private sub form load show label1.autosize true label1.caption str time label1.top val form1.height 2 val label1.height 2 label1.left val form1.w...

求解一道c 程式設計題，求解一道簡單的C語言程式設計題

麼誒節奏 include using namespace std int search int p1,int n,int p2 void print int p,int n int main int arr1 10 int arr2 int count search arr1,10,arr2 pri...