VB.net制作啟動界面

新建一個Sub ： Main

目前創(chuàng)新互聯(lián)建站已為上1000家的企業(yè)提供了網(wǎng)站建設、域名、虛擬主機、網(wǎng)站托管、服務器租用、企業(yè)網(wǎng)站設計、儋州網(wǎng)站維護等服務，公司將堅持客戶導向、應用為本的策略，正道將秉承"和諧、參與、激情"的文化，與客戶和合作伙伴齊心協(xié)力一起成長，共同發(fā)展。

Private Sub Main()

xxx.show 'xxx指啟動窗體

'載入圖片、數(shù)據(jù)庫之類的

Unload xxx

{from}.show '{from}指主界面

End Sub

然后在工程-屬性將"Main"作為啟動對象

vb.net 用戶登錄

哈哈簡單哪

第一步：登陸網(wǎng)頁代碼

第二步：登陸以后判斷是否登陸成功

有兩種方法：1.獲取網(wǎng)頁代碼，判斷網(wǎng)頁字符有無”登陸成功”字樣

源代碼：

2.就是判斷網(wǎng)頁是否跳轉(zhuǎn)到了某一頁

源代碼：

兩種方法結(jié)合起來用，可以判斷網(wǎng)頁是否無法連接

求一份VB.NET的注冊頁面的代碼

創(chuàng)建完相應的用戶名，密碼控件之后，輸入以下代碼：

Imports System.Data.OleDb

Public Class Form1

Private Sub cmdok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdok.Click

Dim m_username As String

Dim m_userpwd As String

Dim cmd_result As MsgBoxResult

Dim m_da As New OleDbDataAdapter

Dim m_ds As New DataSet

Dim m_command As New OleDbCommand

Dim strsql As String

m_username = txtusername.Text

m_userpwd = txtuserpwd.Text

strsql = " select * from user_info where username='" m_username "' and userpwd='" m_userpwd "'"

OleDbConnection1.Open()

m_command.CommandType = CommandType.Text

m_command.CommandText = strsql

m_command.Connection = OleDbConnection1

m_da.SelectCommand = m_command

m_da.Fill(m_ds, "user_info")

If m_ds.Tables("user_info").Rows.Count 0 Then

cmd_result = MsgBox("歡迎登錄", MsgBoxStyle.OKOnly, "提示")

Else

MsgBox("登錄失敗，請確認用戶名和密碼")

End If

End Sub

End Class

VB.Net 新手問題：如何關閉登錄界面并跳到另一個界面

me.dispose()

樓主針對這個問題我也糾結(jié)過很久不過就在剛剛我找到了問題所在：

還是用me.close（）

打開

項目

》

最下面一行有一個屬性》

應用程序》下面

有一個關機模式

改為：當最后一個窗體關閉時。。。注意

me.close要寫在窗體show（）后面

例如

寫成

f2.show()

me.close()

不要寫成

me.close（）

f2.show（）