服務端做數據的儲存/處理工作。
創新互聯公司2013年成立,先為安平等服務建站,安平等地企業,進行企業商務咨詢服務。為安平企業網站制作PC+手機+微官網三網同步一站式服務解決您的所有建站問題。
試想下用戶他的游戲等級是12級,
如果你不儲存在服務端而儲存在客戶端,用戶就可以像修改單機游戲一樣直接改成120級那不是亂套了。
服務端用戶觸碰不到服務端處理用戶升級或降級并記錄在數據庫中,用戶不可修改。
Function?ULCase(ByVal?value?As?String)?As?String
Dim?s?As?String?=?""
For?Each?i?As?Char?In?value
s?=?IIf(Char.IsLower(i),?Char.ToUpper(i),?Char.ToLower(i))
Next
Return?s
End?Function
textbox1.text=ULCase(textbox1.text)
就行了.類似樓上,用的內置方法判斷大小寫
2.
能得到數據的方法 常用 InputBox ?,TextBox
inputBox 用法
Public Function InputBox(ByVal Prompt As String, Optional ByVal Title As String = "", Optional ByVal DefaultResponse As String = "", Optional ByVal XPos As Integer = -1, Optional ByVal YPos As Integer = -1) As String
功能: 在對話框中顯示提示,等待用戶輸入文本或單擊按鈕,然后返回包含文本框內容的字符串。
參數:
Prompt: 必選的 String 表達式,作為消息顯示在對話框中。Prompt 的最大長度大約為 1024 個字符,具體取決于所用字符的寬度。如果 Prompt 包含多行內容,則可以在每行之間使用回車符 (Chr(13))、換行符 (Chr(10)) 或回車/換行符組合 (Chr(13) Chr(10)) 來分隔各行。
Title: 可選。顯示在對話框標題欄中的 String 表達式。如果省略 Title,則標題欄中顯示應用程序名稱。
DefaultResponse: 可選的 String 表達式。如果未提供其他輸入,則作為默認響應顯示在文本框中。如果省略 DefaultResponse,則顯示的文本框為空。
XPos: 可選。數值表達式,指定屏幕左邊緣與對話框左邊緣之間的距離(以緹為單位)。如果省略 XPos,則對話框水平居中。
YPos: 可選。數值表達式,指定屏幕頂部與對話框上邊緣之間的距離(以緹為單位)。如果省略 YPos,則對話框垂直定位在屏幕向下大約三分之一處。
返回值:
在對話框中顯示提示,等待用戶輸入文本或單擊按鈕,然后返回包含文本框內容的字符串。
代碼:
Dim?KC()?As?String?=?{"語文",?"數學",?"英語",?"物理",?"化學"}
Dim?MyTable?As?New?Hashtable
For?Each?i?As?String?In?KC
MyTable.Add(i,?Val(InputBox("請輸入"""??i??"""?的成績:",?"成績輸入",?"0")))
Next
Dim?sum?As?Single
For?Each?i?As?DictionaryEntry?In?MyTable
sum?+=?i.Value
Next
Dim?Pf?As?String?=?IIf(sum??450?OrElse?_
(MyTable(KC(0))??95?AndAlso?MyTable(KC(1))??95?AndAlso?MyTable(KC(2))??95?AndAlso?MyTable(KC(3))??80?AndAlso?MyTable(KC(4))??80)?OrElse?_
(MyTable(KC(0))??85?AndAlso?MyTable(KC(1))??85?AndAlso?MyTable(KC(2))??85?AndAlso?MyTable(KC(3))??85?AndAlso?MyTable(KC(4))??85),?"優秀",?"可以")
MsgBox(Pf)
可以的,服務器用WIN 2000/NT了,語言只是個工具而已,想實現的目的用所選的工具都能實現,只是實現周期的長短了。vb可以做任何事,比如高級應用,線程等,但要用到API,如果用C/c++就不用API 了,所以工具的選擇還是蠻重要的!
可以的,把項目的類型設成類庫,將所有的函數用Public修飾附封裝在類里面,生成dll文件。這樣別人就可以在別人項目屬性的引用頁里面添加對你的dll文件的引用,然后導入命名空間,直接使用了。
比如說,在一個項目里:
NameSpace Controller
Public Class ControlMachine
Public Sub Boot()
End Sub
Public Sub Shutdown()
End Sub
End Class
End NameSpace
進入另一個項目的項目屬性,進入引用頁,添加到那個dll文件的引用。在代碼中:
Imports Controller '加在代碼文檔的最頂端
使用:
Dim controller As New ControlMachine
controller.Boot()
controller.Shutdown()
希望你能了解,不懂再追問
vb.net是基于.NET框架的完全對向對象的編程語言,而vb 6.0只是半面向對象的語言,使用vb.net可以編制出功能更加強大的windows程序?,F在,我們把vb.net和vb 6.0做一下比較,看看vb.net對比vb 6.0有著什么樣的特性和優點。 1.在vb 6.0中,創建對象的時候,需要等這個對象創建完畢后,再另外調用一個獨立的方法對其進行初始化。在vb.net中, 可以利用構造函數為對象賦初值,這樣就不需要進行煩瑣的調用賦初值了。構造函數的使用,簡化了編碼的過程和出錯的機會。 2.vb.net編寫線程的能力比vb 6.0有很大的增強。 3.在vb 6.0中,需要首先聲明一個變量,然后才能對其賦值,這樣就需要寫兩行代碼。在vb.net中,可以 使用初始化函數將這兩個步驟合并在一行代碼中完成,這個似乎微小的改進,提供了更少、更簡單、更易于維護的代碼。 4.vb.net基于.NET框架,開發者可以快速的可視化開發網絡應用程序、網絡服務、Windows應用程序和服務器端組件。 5.因為vb.net是基于.NET框架的,可以與其它.NET語言協同工作。 6.在vb.net中,通過Web窗體及ADO.NET,開發者可以快速開發可擴展的Web站點。 如果你能進一步學習vb.net,你會發現更多的新特性和優點。
當前標題:vb.net編寫服務 VBNET教程
標題URL:http://vcdvsql.cn/article14/hejgde.html
成都網站建設公司_創新互聯,為您提供網站設計公司、標簽優化、網站設計、手機網站建設、網站收錄、商城網站
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯