史萊姆論壇

返回   史萊姆論壇 > 專業主討論區 > 程式語言討論區
忘記密碼?
論壇說明 標記討論區已讀

歡迎您來到『史萊姆論壇』 ^___^

您目前正以訪客的身份瀏覽本論壇,訪客所擁有的權限將受到限制,您可以瀏覽本論壇大部份的版區與文章,但您將無法參與任何討論或是使用私人訊息與其他會員交流。若您希望擁有完整的使用權限,請註冊成為我們的一份子,註冊的程序十分簡單、快速,而且最重要的是--註冊是完全免費的!

請點擊這裡:『註冊成為我們的一份子!』

Google 提供的廣告


發文 回覆
 
主題工具 顯示模式
舊 2009-06-29, 05:20 PM   #1
chung1206 帥哥
註冊會員
 
chung1206 的頭像
榮譽勳章
UID - 322141
在線等級: 級別:9 | 在線時長:134小時 | 升級還需:6小時級別:9 | 在線時長:134小時 | 升級還需:6小時級別:9 | 在線時長:134小時 | 升級還需:6小時級別:9 | 在線時長:134小時 | 升級還需:6小時
註冊日期: 2009-04-14
住址: Kaohsiung
文章: 192
精華: 0
現金: 121 金幣
資產: 521 金幣
預設 疑問 - VB6.0一個公式轉換的問題



各位先進們好,今天在做一個公式轉換時遇到了一個問題,我想將公分換成才數,因為30cmX30cm=1才,跟我之前的公式轉換的練習不太一樣,我做了一個Text1公分XText2公分=Text3才數,然後當我輸入數字後,按下button鈕,可以自動換算才數,請問這個該朝那個方向去寫呢?謝謝。
chung1206 目前離線  
送花文章: 25, 收花文章: 108 篇, 收花: 261 次
回覆時引用此帖
舊 2009-06-29, 07:39 PM   #2 (permalink)
管理版主
 
mini 的頭像
榮譽勳章
UID - 4144
在線等級: 級別:96 | 在線時長:9729小時 | 升級還需:68小時級別:96 | 在線時長:9729小時 | 升級還需:68小時級別:96 | 在線時長:9729小時 | 升級還需:68小時級別:96 | 在線時長:9729小時 | 升級還需:68小時級別:96 | 在線時長:9729小時 | 升級還需:68小時級別:96 | 在線時長:9729小時 | 升級還需:68小時
註冊日期: 2002-12-07
文章: 13276
精華: 0
現金: 26303 金幣
資產: 3024113 金幣
預設

有個方式可以將 Textbox 限制只能輸入 "數字"

OnlyForTextBoxModule.bas
語法:
Option Explicit

Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
    (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
    
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _
    (ByVal hWnd As Long, ByVal nIndex As Long) As Long

Private Const ES_NUMBER = &H2000
Private Const GWL_STYLE = (-16)

'   只允許輸入數字:
Public Function NumbersOnly(tBox As TextBox)
Dim DefaultStyle As Long

    DefaultStyle = GetWindowLong(tBox.hWnd, GWL_STYLE)
    NumbersOnly = SetWindowLong(tBox.hWnd, GWL_STYLE, DefaultStyle Or ES_NUMBER)

End Function
如何使用,只要在 Private Sub Form_Load()裡加上
NumbersOnly TextBox1
就好了
mini 目前離線  
送花文章: 2003, 收花文章: 7966 篇, 收花: 26761 次
回覆時引用此帖
發文 回覆


主題工具
顯示模式

發表規則
不可以發文
不可以回覆主題
不可以上傳附加檔案
不可以編輯您的文章

論壇啟用 BB 語法
論壇啟用 表情符號
論壇啟用 [IMG] 語法
論壇禁用 HTML 語法
Trackbacks are 禁用
Pingbacks are 禁用
Refbacks are 禁用

相似的主題
主題 主題作者 討論區 回覆 最後發表
字幕轉換的問題 xj2s 軟體應用問題討論區 6 2004-03-11 05:48 PM
字幕轉換的問題 cwvdavid 一般電腦疑難討論區 2 2003-04-18 07:29 PM
請問一個Serv-U的問題 nyr02217 軟體應用問題討論區 2 2003-03-11 08:39 PM
有一個網站叫做白色小站的問題 龍之首競技場 一般電腦疑難討論區 11 2002-12-20 11:28 PM
檔案轉換的問題 萍水相逢 軟體應用問題 Q & A 精華區 2 2002-12-13 04:56 PM


所有時間均為台北時間。現在的時間是 06:34 AM


Powered by vBulletin® 版本 3.6.8
版權所有 ©2000 - 2024, Jelsoft Enterprises Ltd.


SEO by vBSEO 3.6.1