首先安裝VB,你可以上網(wǎng)下載VB6或者VB2008之類的來安裝,不過VB6和VB200X的用法有所不同,后者是VB.net。

網(wǎng)站建設(shè)哪家好,找創(chuàng)新互聯(lián)公司!專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、成都小程序開發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了靈山免費(fèi)建站歡迎大家使用!
安裝完成后,雙擊開始中的快捷方式執(zhí)行,VB6直接選擇標(biāo)準(zhǔn)EXE,然后點(diǎn)擊創(chuàng)建。VB.net需要選擇創(chuàng)建新項目并指定文件夾,新項目中選擇應(yīng)用程序。
編程方法是首先在控件庫中拖拽需要的控件,如按鈕,輸入框,選擇框之類的圖形到程序設(shè)計界面上,然后在右邊屬性欄中設(shè)置他們的屬性,如顏色,大小,顯示方式之類的。
之后雙擊控件對控件進(jìn)行編程,語法就是VB語法,很好學(xué),簡單易懂。
在程序編寫的任意時刻都可以點(diǎn)擊工具欄的三角箭頭(播放)來運(yùn)行程序測試,若沒有問題,則點(diǎn)文件,生成EXE產(chǎn)生EXE文件即可。
1,窗體上使用容器控件比如:Panel,在容器控件里添加文本框,用來顯示滾動的號碼。
2,添加一個Timer控件,用來不斷改變上述文本框的Top屬性,實(shí)現(xiàn)不斷向上滾動的動態(tài)效果。
3,使用系統(tǒng)的隨機(jī)函數(shù),生成所想要的適當(dāng)位數(shù)的隨機(jī)數(shù),單擊按鈕,停止?jié)L動,顯示隨機(jī)數(shù)。
4,用數(shù)組保存產(chǎn)生的隨機(jī)數(shù),再次停止,與已經(jīng)產(chǎn)生的保存在數(shù)組里的隨機(jī)進(jìn)行比較,如果重復(fù),就重新生成隨機(jī)數(shù),直到不重復(fù)。
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)
就行了.類似樓上,用的內(nèi)置方法判斷大小寫
2.
能得到數(shù)據(jù)的方法 常用 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
功能: 在對話框中顯示提示,等待用戶輸入文本或單擊按鈕,然后返回包含文本框內(nèi)容的字符串。
參數(shù):
Prompt: 必選的 String 表達(dá)式,作為消息顯示在對話框中。Prompt 的最大長度大約為 1024 個字符,具體取決于所用字符的寬度。如果 Prompt 包含多行內(nèi)容,則可以在每行之間使用回車符 (Chr(13))、換行符 (Chr(10)) 或回車/換行符組合 (Chr(13) Chr(10)) 來分隔各行。
Title: 可選。顯示在對話框標(biāo)題欄中的 String 表達(dá)式。如果省略 Title,則標(biāo)題欄中顯示應(yīng)用程序名稱。
DefaultResponse: 可選的 String 表達(dá)式。如果未提供其他輸入,則作為默認(rèn)響應(yīng)顯示在文本框中。如果省略 DefaultResponse,則顯示的文本框?yàn)榭铡?/p>
XPos: 可選。數(shù)值表達(dá)式,指定屏幕左邊緣與對話框左邊緣之間的距離(以緹為單位)。如果省略 XPos,則對話框水平居中。
YPos: 可選。數(shù)值表達(dá)式,指定屏幕頂部與對話框上邊緣之間的距離(以緹為單位)。如果省略 YPos,則對話框垂直定位在屏幕向下大約三分之一處。
返回值:
在對話框中顯示提示,等待用戶輸入文本或單擊按鈕,然后返回包含文本框內(nèi)容的字符串。
代碼:
Dim?KC()?As?String?=?{"語文",?"數(shù)學(xué)",?"英語",?"物理",?"化學(xué)"}
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),?"優(yōu)秀",?"可以")
MsgBox(Pf)
可以的,把項目的類型設(shè)成類庫,將所有的函數(shù)用Public修飾附封裝在類里面,生成dll文件。這樣別人就可以在別人項目屬性的引用頁里面添加對你的dll文件的引用,然后導(dǎo)入命名空間,直接使用了。
比如說,在一個項目里:
NameSpace Controller
Public Class ControlMachine
Public Sub Boot()
End Sub
Public Sub Shutdown()
End Sub
End Class
End NameSpace
進(jìn)入另一個項目的項目屬性,進(jìn)入引用頁,添加到那個dll文件的引用。在代碼中:
Imports Controller '加在代碼文檔的最頂端
使用:
Dim controller As New ControlMachine
controller.Boot()
controller.Shutdown()
希望你能了解,不懂再追問
using?System;
using?System.Windows.Forms;
namespace?WindowsFormsApplication1
{
public?partial?class?Form1?:?Form
{
Timer?tm?=?new?Timer();//實(shí)例化?timeer?
static?int?timeS?=?0;?//設(shè)置靜態(tài)變量記錄秒數(shù)
TimeSpan?ts?=?new?TimeSpan();?//實(shí)例化?TimeSpan?
public?Form1()
{
InitializeComponent();
}
private?void?button1_Click(object?sender,?EventArgs?e)
{
tm.Interval?=?1000;?//設(shè)置?timeer?1000毫秒執(zhí)行一次
tm.Tick?+=?new?EventHandler(timeer_Tick);?//設(shè)置?timeer?運(yùn)行事件
tm.Start();?//?啟用?timeer
}
private?void?timeer_Tick(object?sender,?EventArgs?e)
{
timeS?+=?1;?//秒數(shù)?+1?
ts?=?new?TimeSpan(0,?0,?timeS);?
label1.Text?=?ts.Hours?+?":"?+?ts.Minutes?+?":"?+?ts.Seconds;
}
private?void?button2_Click(object?sender,?EventArgs?e)
{
tm.Stop();
timeS?=?0;
}
}
}
本文名稱:vb.net如何編輯程序,用vb編寫程序
網(wǎng)頁網(wǎng)址:http://chinadenli.net/article20/dsidjco.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供標(biāo)簽優(yōu)化、網(wǎng)站制作、關(guān)鍵詞優(yōu)化、服務(wù)器托管、建站公司、網(wǎng)站建設(shè)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)