廣告廣告
  加入我的最愛 設為首頁 風格修改
首頁 首尾
 手機版   訂閱   地圖  簡體 
您是第 3149 個閱讀者
 
發表文章 發表投票 回覆文章
  可列印版   加為IE收藏   收藏主題   上一主題 | 下一主題   
reizheu
數位造型
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x1
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片
推文 x0
文章表情[學習] vb 的問題!!!
有誰會用 Rnd 亂數來寫一個程式.......

題目:設計一程式,在 TextBox 物件框裡輸入任一數(不可限制只能輸入幾位數!!!),按下 command button 物件所做的按鈕後,TextBox 物件框裡所顯現出來的,是將之前所輸入的任一數整個倒反過來。

拜託大家幫幫忙,我下星期一就要將這作業交出去了.........,拜託........


獻花 x0 回到頂端 [樓 主] From:台灣台灣索尼 | Posted:2006-01-14 18:37 |
真希 手機 會員卡
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎 社區建設獎
頭銜:許你一個願望許你一個願望
風雲人物
級別: 風雲人物 該用戶目前不上站
推文 x2 鮮花 x399
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

請問您的題目問題是說輸入數字到txtbox內
假設為123456789按下BTN後txtbox內為987654321嗎?
如果是這樣那跟rnd有什麼關係呢?

此文章被評分,最近評分記錄
財富:30 (by 晨秋) | 理由: 您的熱心程度已經到達了匪夷所思的地步了


獻花 x0 回到頂端 [1 樓] From:台灣台灣電訊 | Posted:2006-01-16 13:36 |
apen 手機
數位造型
個人文章 個人相簿 個人日記 個人地圖
初露鋒芒
級別: 初露鋒芒 該用戶目前不上站
推文 x0 鮮花 x9
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

如果只是要將textbbox內容反轉過來,確實跟亂數無關,而是跟字串轉換有關。
可以查查看字串的函數。


獻花 x0 回到頂端 [2 樓] From:台灣數位聯合 | Posted:2006-01-16 23:35 |
真希 手機 會員卡
個人文章 個人相簿 個人日記 個人地圖
特殊貢獻獎 社區建設獎
頭銜:許你一個願望許你一個願望
風雲人物
級別: 風雲人物 該用戶目前不上站
推文 x2 鮮花 x399
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

可以使用Mid 和 for迴圈搭配取出字串
Private Sub Command1_Click()
Label1.Caption = ""  
For Y= Len(Text1.Text) To 1 Step -1
Label1.Caption = Label1.Caption & Mid(Text1.Text,Y 1)
Next
End Sub
這部分不一定使用Mid主要是for迴圈怎麼去定義而已
用right去搭配迴圈將字串從最後方去一個一個取回
也是一個方法

此文章被評分,最近評分記錄
財富:30 (by 晨秋) | 理由: 感謝您長期以來跨海協助 不勝感激


獻花 x0 回到頂端 [3 樓] From:台灣台灣電訊 | Posted:2006-01-17 11:41 |
gvh87019 手機
數位造型
個人文章 個人相簿 個人日記 個人地圖

小人物
級別: 小人物 該用戶目前不上站
推文 x0 鮮花 x19
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

嗯嗯

樓上的大大寫的真好


獻花 x0 回到頂端 [4 樓] From:台灣中華電信 | Posted:2006-01-18 22:07 |
fanchen
數位造型
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x0
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

Private Sub Command1_Click()
Label1.Caption = ""  
For Y= Len(Text1.Text) To 1 Step -1
Label1.Caption = Label1.Caption & Mid(Text1.Text,Y 1)
Next
End Sub
這段程式在VB.NET 上跑會有問題


獻花 x0 回到頂端 [5 樓] From:台灣中華電信 | Posted:2006-02-18 22:36 |
雷帝斯洛
個人頭像
個人文章 個人相簿 個人日記 個人地圖
初露鋒芒
級別: 初露鋒芒 該用戶目前不上站
推文 x0 鮮花 x31
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

net和6的物件名稱並不是完全相同的…


獻花 x0 回到頂端 [6 樓] From:台灣中華電信 | Posted:2006-07-25 11:03 |

首頁  發表文章 發表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.020990 second(s),query:16 Gzip disabled
本站由 瀛睿律師事務所 擔任常年法律顧問 | 免責聲明 | 本網站已依台灣網站內容分級規定處理 | 連絡我們 | 訪客留言