1.VB登陆窗体代码。窗体窗体数据库呢是源码access的 数据库名为data 有一个登陆表 有两个字段名 用户名 密码
2.Windows 中不规则窗体的编程实现

VB登陆窗体代码。数据库呢是代码视频点播专家源码access的 数据库名为data 有一个登陆表 有两个字段名 用户名 密码

       新建vb工程，然后点击“工程”-->“引用”，窗体窗体在以下两个选项前挑勾：

       Microsoft Data Environment Instance 1.0

       Microsoft ActiveX Objects 2.5 Library

       因为你要用Access数据库，源码语音闹钟程序源码所以需要在工程中添加控件。代码天气app设计源码

       建立Access数据库，窗体窗体在这个vb工程文件夹新建一个文件夹，源码命名为table，代码然后将这个Access数据库文件放入table文件夹中。窗体窗体

       源代码：

       Private Con_Access As Connections

       Private Sub Form_Load()

           Set Con_Access = New Connection

           With Con_Access

               .Provider = "microsoft.jet.oledb.4.0"

               .ConnectionString = App.Path & "\table\ship.mdb"

               .Open

           End With

       End Sub

       Private Sub cmdOK_Click()

           Dim cmd As New Command

           Dim rd As New Recordset

           cmd.ActiveConnection = Con_Access

           cmd.CommandText = "select username,源码userpassword from usertable where username='" & Text1.Text & "'"

           On Error GoTo db_error

           Set rd = cmd.Execute

           On Error GoTo 0

           If rd.EOF Then

               MsgBox "用户名不存在。",代码 vbOKOnly + vbInformation, "错误"

               Exit Sub

           End If

       db_error:

           MsgBox Err.Description, vbOKOnly + vbInformation, "错误"

       End Sub

       Private Sub cmdCancel_Click()

           End

       End Sub

       已经附上截图了，如果还有疑问，窗体窗体比太钱包源码发电邮给我rearguard_zero@hotmail.com

源码

源码

Windows 中不规则窗体的编程实现

源码        　　Windows 中不规则窗体的编程实现          ä¸‹è½½æºä»£ç      ä¸€ 序言     ã€€ã€€åœ¨ç»å¤§å¤šæ•°çš„Windows应用程序中 其窗体都是使用的正规正矩的矩形窗体 例如我们常用的 记事本 扫雷 等等 矩形窗体 具有编程实现简单 风格简洁的优点 所以在普通文档应用程序和简单小游戏中使用足矣 但在某些娱乐游戏程序中使用就略显呆板些了 这时若用不规则窗体替代原先的矩形窗体 将会使这类程序更添情趣 典型的例子有windows 自代的Media Player 新版本的Media Player有个控制面板的选项 选中这些面板 播放器就以选中的面板形状出现 这时的播放器比以前版本的Media Player的古老矩形界面要生动有趣的多了 要实现不规则窗体不是太难 知道了基本原理后 你也可以创建各种有趣的不规则窗体           äºŒ 实现原理          ã€€ã€€æ‰€æœ‰çš„ Windows 窗体都位于一个称为 region 中 窗体的大小如果超出 region 的范围 windows会自动裁剪超出"region"范围那部分的窗体 使其不可见 所以 要创建不规则窗体有两个步骤 第一步就是创建不规则"region" 第二步就是将窗体放到创建的 region 中 　　其中第二步很简单就调用一条语句即可 在SDK中调用API函数SetWindowRgn 该函数原型如下

源码

        　　int SetWindowRgn( HWND hWnd HRGN hRgn BOOL bRedraw );

源码

        　　其中hWnd为待设置的窗体句柄 hRgn为已经创建的"region"句柄 bRedraw代表是否要重绘窗体 在MFC中使用窗口类CWnd的成员函数int CWnd::SetWindowRgn（HRGN hRgn BOOL bRedraw );该函数的参数意义与API中同名函数相同 　　相对与第二步 创建不规则窗体的第一步要复杂许多 并且不规则窗体越复杂 创建其"region"的过程也越复杂 接下去我们将由浅入深地介绍各种创建 region 的方法      ã€€ã€€åœ¨MFC中"region"对象 由CRgn类实现 CRgn的几乎每个成员函数都有同名的SDK API函数对应 三 简单 region 的创建     ã€€ã€€ç±»CRgn创建一个新的"region"的简单方法有以下几个成员函数

源码

        BOOL CRgn::CreateRectRgn( int x int y int x int y ); 创建矩形的 region        

源码

        BOOL CRgn::CreateEllipticRgn( int x int y int x int y ); 创建圆形或椭圆形 region        

源码

       

源码

        BOOL CRgn::CreateRoundRectRgn( int x int y int x int y int x int y ); 创建圆角矩形 region        

源码

        BOOL CRgn::CreatePolygonRgn( LPPOINT lpPoints int nCount int nMode ); 创建多边形 region

源码

        　　这里以创建椭圆窗体为例 介绍椭圆窗体创建的方法 在创建椭圆 region 的CreateEllipticRgn函数中 x y 指椭圆所在矩形的左上角坐标 x y 指该矩形的右下角坐标      ã€€ã€€ä¸‹é¢çš„代码加入到MFC对话框程序的OnInitDialog函数中 可将该对话框变成椭圆窗体      

源码

        　　BOOL CTestDlg::OnInitDialog(){ CDialog::OnInitDialog(); CRgn rgn; rgn CreateEllipticRgn( ); SetWindowRgn(rgn TRUE);}

源码     å›¾ä¸€ 椭圆窗体效果图     å›› 作图路径法创建 region 使用该方法创建 region 的过程如下 第一步绘制所要创建的窗体形状 该步骤中使用到CDC类中的一些成员函数如下

        　　BOOL CDC::BeginPath( );

源码

        　　调用该函数后当前设备环境(DC)开始追踪绘图的过程

源码

        　　int CDC::SetBkMode( int nBkMode );

源码

        　　设置绘图时的背景模式 此应用中nBkMode必须取值为TRANSPARENT 即设置绘图时背景不发生变化

源码

        　　BOOL CDC::EndPath( );

源码

        　　调用该函数后当前设备环境(DC)结束追踪绘图的过程 　　开始绘图前 先调用BeginPath 然后调用SetBkMode 接下去就可调用CDC的其他绘图函数作图 例如Arc AngleArc LineTo MoveTo RoundRect Textout等等 绘图完毕调用EndPath() 第二步将绘制的结果转成 region 此步骤中使用SDK API函数

源码

        　　HRGN PathToRegion( HDC hdc );

源码

        　　Hdc为作图DC的句柄 CDC类中的m_hDC成员变量可做此参数传入 示例 将下面代码加入某个按钮单击事件中 可以将当前窗体变为字符串 hello 的形状     

源码

        　　void CTestDlg::OnTest() {    HRGN wndRgn;    CClientDC dc(this);    CFont mFont;        if (dc m_hDC!=NULL)    {        VERIFY(mFont CreateFont(             FW_HEAVY TRUE FALSE             ANS    

源码lishixinzhi/Article/program/c//

源码