精华内容
下载资源
问答
  • VB中Show方法详解.doc

    2010-07-02 13:59:42
    Modal:指定窗体显示的模式,可以为vbModal(=1)或vbModeless(=0,默认值),vbModal表示将窗体作为模式对话框显示,这种情况下,Show方法后的代码要等到模式对话框关闭之后才能执行,且焦点也不能移动到其他窗体...
  • VB中Show方法详解

    万次阅读 2007-04-10 09:22:00
    语法:窗体名.Show [Modal][,Owerner]说明:Modal:指定窗体显示的模式,可以为vbModal(=1)或vbModeless(=0,默认值),vbModal表示将窗体作为模式对话框显示,这种情况下,Show方法后的代码要等到模式对话框关闭...

    语法:

    窗体名.Show [Modal][,Owerner]

    说明:

    Modal:指定窗体显示的模式,可以为vbModal(=1)或vbModeless(=0,默认值),vbModal表示将窗体作为模式对话框显示,这种情况下,Show方法后的代码要等到模式对话框关闭之后才能执行,且焦点也不能移动到其他窗体;vbModeless表示将窗体作为无模式对话框显示,这种情况下,焦点能在其他窗体之间转移。

    Owner:指定窗体的拥有者,可将某个窗体的窗体名传给这个参数,使得这个窗体成为新窗体的拥有者。使用该参数,可以确保对话框在它的父窗体最小化时它也最小化,或者在其父窗体关闭时它也卸载。

    例:

    frm1.Show vbModal
    frm1.Show vbModeless
    frm1.Show vbModal,Me

     

    展开全文
  • VB打开对话框ShowOpen

    2021-01-07 20:40:29
    “ 本节课程一起学习CommonDialog控件ShowOpen方法——打开对话框” 一、添加CommonDialog控件 首先我们需要添加CommonDialog对话框控件。 在工具箱空白处右键,选择“部件“,进入控件选择界面。 找到...

    “ 本节课程一起学习CommonDialog控件中的ShowOpen方法——打开对话框”

    图片

    一、添加CommonDialog控件

    首先我们需要添加CommonDialog对话框控件。

    在工具箱空白处右键,选择“部件“,进入控件选择界面。

    找到Microsoft Common Dialog Control 6.0(SP6),在其复选框打勾,然后单击确定按钮。即可将此控件添加到工具箱。

    图片

    少部分电脑如果不能成功添加,那么是因为该文件没有被正确注册,可以进入安全模式,然后尝试重新注册该控件。

    二、添加到窗体

    将CommonDialog控件拖拽到窗体上,完成引用。

    图片

    三、打开对话框

    打开对话框的作用:
    打开对话框,获得用户选择的文件名和路径

    打开对话框方法:

    CommonDialog1.ShowOpen
    

    获取文件名:

    CommonDialog1.FileTitle
    

    获取文件全路径:

    CommonDialog1.FileName
    

    举例:

    Private Sub Command1_Click()    
    	 	 '打开文件对话框      
    	 	 CommonDialog1.ShowOpen    
    	 	 '打印用户选择的文件名    
    	  	Print "文件名:" & CommonDialog1.FileTitle    
    	  	'打印用户选择的文件路径    
    	  	Print "文件路径:" & CommonDialog1.FileName
    End Sub
    

    图片

    图片

    在这里插入图片描述

    四、属性设置

    文件类型过滤器

    属性:Filter
    作用:过滤器确定文件列表框中所显示文件的类型,只显示指定的类型的文件。
    语法:CommonDialog1.Filter = “显示文本|文件类型”

    说明:Filter成对出现,之前以“|”符号分隔,可显示多个文件类型。

    举例(只显示txt、word和Excel的文件):

    CommonDialog1.Filter = "文本文件|*.txt|word文件|*.doc|Excel文件|*xlsx"
    

    属性:FilterIndex
    作用:过滤器索引,整型。指定默认显示Filter过滤器中哪一组文件类型。
    语法:CommonDialog1.FilterIndex=[值]
    说明:值为整数型,从1开始,对应于Filter过滤器。
    举例:CommonDialog1.FilterIndex=1

    属性:InitDir
    作用:打开对话框时的初始目录
    语法:CommonDialog1.InitDir=[路径]
    举例:CommonDialog1.InitDir = "E:\"

    属性:CancelError
    作用:用户取消时,是否报错
    语法:CommonDialog1.CancelError = [值]
    举例:CommonDialog1.CancelError =True
    说明:利用on error goto 语句可以处理用户取消时的情况

    五、举例

    Private Sub Command1_Click()     
    	  '设置文件类型过滤器(txt、word、xlsx)    
    	  CommonDialog1.Filter = "全部文件|*.*|文本文件|*.txt|word文件|*.doc|Excel文件|*xlsx"    
    	  '设置默认显示过滤器中的第一组文件类型    
    	  CommonDialog1.FilterIndex = 1    
    	  '设置默认的初始化目录    
    	  CommonDialog1.InitDir = "E:\"    
    	  CommonDialog1.CancelError = True    
    	  '打开文件对话框    
    	  CommonDialog1.ShowOpen    
    	  On Error GoTo err    
    	  '打印用户选择的文件名    
    	  Print "文件名:" & CommonDialog1.FileTitle    
    	  '打印用户选择的文件路径    
    	  Print "文件路径:" & CommonDialog1.FileName    
    	  Exit Sub
    	  '错误提示
    err:    
    	  MsgBox "用户取消了选择"
    End Sub
    

    运行时,过滤器中有4种文件格式,第一种是全部文件。可以选择某一种类型的文件格式,进行过滤。

    图片

    当用户取消选择时,将会报错,从而跳转到err语句,给出提示。

    图片

    好了,本节课程打开对话框就学习结束了,再见吧。

    展开全文
  • 用JQueryajax 调用VB后台方法

    千次阅读 2012-06-08 17:35:26
    如果用Jquery 的ajax调用后台方法, 1.首先 在标签页里脚本要(注意:绿色字体为重点)  function ShowData(){    $.ajax({  async: false,  type: "POST",  contentType:

    如果用Jquery 的ajax调用后台方法,

    1.首先 在标签页里脚本要(注意:绿色字体为重点)

     function ShowData(){
                
               $.ajax({
                    async: false,
                    type: "POST",
                    contentType: "application/json;utf-8",
                    url: "TeachMange.aspx/GetJSonSerializable",
                    data: "{str:'79'}",
                    success: function (data) {
                   
                            var json = eval(data.d);
                            $("#tdBJMC").html(json[0].ClassName);
                            $("#tbTeachMange").find("tr").each(function (i) {
                                if (i == 3) {
                                    $(this).find("td").eq(1).html(json[0].PrimaryTeacher);
                                    $(this).find("td").eq(2).html("主讲");
                                    $(this).find("td").eq(3).html(json[0].SKRQ + "<br/>" + json[0].LB_Name);
                                    $(this).find("td").eq(4).html(json[0].ClassName2);
                                    $(this).find("td").eq(5).html(json[0].CourseName);
                                    $(this).find("td").eq(6).html(json[0].XERS);
                                    $(this).find("td").eq(7).html(json[0].TrainNum);
                                  
                                    $("#param").val(json[0].PrimaryTeacher+"#"+json[0].ID+"#"+json[0].CID+"#"+ json[0].SKRQ);
                                }
                                if (i == 4) {
                                    $(this).find("td").eq(1).html(json[0].SecondTeacher);
                                    $(this).find("td").eq(2).html("辅导");
                                    $("#param1").val(json[0].SecondTeacher+"#"+json[0].ID+"#"+json[0].CID+"#"+ json[0].SKRQ);
                                }
                                 if (i == 5) {
                                    $(this).find("td").eq(1).html(json[0].ThirdTeacher);
                                    $(this).find("td").eq(2).html("辅导");
                                    $("#param2").val(json[0].ThirdTeacher+"#"+json[0].ID+"#"+json[0].CID+"#"+ json[0].SKRQ);
                                }
                               
                                if ($("#param2").val().length){
                                    $("#divStaffConfirm").css("display","block");
                                    //document.getElementById("divStaffConfirm").style.display="block";
                                }
                            });
                           
                           
                    },
                    error: function (ex) {
                        var exx = ex;
                        alert('错误'+ exx);
                    }

                 });
             }

     

    2.后台要求方法必须为静态,且方法上有“<WebMethod()> _”  标示

    后台cs端代码 如:

        <WebMethod()> _
        Public Shared Function GetJSonSerializable(ByVal str As String) As String
            HttpContext.Current.Session("loadData") = ""
            Dim jsonStr = String.Empty
            Dim dt As DataTable = New ScheduleTools().GetScheduleByBH(str, " SZJG_Class.ID=" & str)

            Dim sj As String = ""
            If Not (dt Is Nothing) Then
                sj = JsonConvert.SerializeObject(dt, New DataTableConverter())
                HttpContext.Current.Session("loadData") = sj
                '补充说明一下,在序列化日期型的数据时,需要加上一个
                'dr["c"] = "3" + i.ToString();改成dr["c"] = DateTime.Now; 且
                'Dim sj1 As String = JsonConvert.SerializeObject(dt, New DataTableConverter(), New IsoDateTimeConverter())
                'Dim sj2 As String = JsonConvert.SerializeObject(dt, New DataTableConverter(), New JavaScriptDateTimeConverter())
            End If

            Return sj
        End Function

     ‘注意:JsonConvert.SerializeObject方法是引用了dll,网上写好的对json的序列号,只要拿过来用就可以了,可以从这里进行下载

     http://ishare.iask.sina.com.cn/f/23871343.html?w=MjEzMDk2OTg1OQ%3D%3D]Json45r1.zip

    ,也可以自己写个方法。

    就好了!网友如有问题,可加我QQ:794386465

     

    展开全文
  • VB 6.0 使用Line方法画网格线,文字下面的网格背景线,是基于VB中的Line方法绘制出来的,学习一下简单的VB绘图技巧,核心代码:  Private Sub Form_Load()  Show  Scale (0, 0)-(10, 10) '自定义坐标系  ...
  • MDI窗体可以避免打开窗体的时候被无数个子窗体困扰,我将为大家一一的介绍一下vb.netMDI窗体的操作方法 一、如何vb.net教程 创建MDI窗体? 1、创建mdi主窗体 新建建立一个默认空白的Windows应用c#教程程序,在Form...

    MDI窗体可以避免打开窗体的时候被无数个子窗体困扰,我将为大家一一的介绍一下vb.net中MDI窗体的操作方法

    一、如何vb.net教程
    创建MDI窗体?
    1、创建mdi主窗体
    新建建立一个默认空白的Windows应用c#教程程序,在Form1窗体的属性窗口中找到IsMDIContainer 属性,设置为 True
    在这里插入图片描述

    2、创建MDI子窗体
    在vb.net中,mdi子窗体就是普通的窗体,无需更改其属性。所有直接新建一个Form2

    3、添加代码

    Dim frm2 As New Form2
    Form2.Show()
    

    此时你只需要简单的实例化一下显示出来就python基础教程可以了,非常简单吧。

    二、显示MDI窗口列表
    用过带有子窗体的程序的朋友一定知道,很多程序都带显示它它本身打开的子窗体列表的功能,那么它是怎么实现的呢
    在这里插入图片描述

    现在在父窗体中修改你的MenuScript1控件的MdiWinddowListItem属性为你要设置的菜单即可。

    在这里插入图片描述

    三、排列子窗体
    你只需要在你的单击操作中填入以下代码即可

     Private Sub ToolStripMenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem2.Click
            Me.LayoutMdi(MdiLayout.TileHorizontal) '水平平铺
        End Sub
     
        Private Sub ToolStripMenuItem3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem3.Click
            Me.LayoutMdi(MdiLayout.TileVertical) '垂直平铺
        End Sub
     
        Private Sub ToolStripMenuItem4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem4.Click
            Me.LayoutMdi(MdiLayout.Cascade) '层叠
        End Sub
    

    看一下效果图

    在这里插入图片描述

    在这里插入图片描述

    在这里插入图片描述

    四、VB.NET 如何防止重复打开MDI子窗体?

    Private Sub 窗体1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 窗体1ToolStripMenuItem.Click
            Dim frm2 As New Form2
            CheckForm(frm2, "Form2")
            frm2.WindowState = FormWindowState.Normal
            ShowForm(Form2)
        End Sub
     
        '*****************************************************************************
        '*过程名称:CheckForm
        '*参数说明:MDIChildForm——需检测的窗体;MDIChildFormName ——检测窗体的名字
        '*功能说明:首先检测是否有MDI子窗体,如果没有,则创该MDI子窗体的窗体实例
        '*                    如果有,则检测当中有没有其窗体实例,有则激活;没有则创建其窗体实例
        '*****************************************************************************
        Private Sub CheckForm(ByVal MDIChildForm As Form, ByVal MDIChildFormName As String)
            If Me.MdiChildren.Length < 1 Then
                '如果没有任何一个MDI子窗体,则创该MDI子窗体的窗体实例
                ShowForm(MDIChildForm)
                Exit Sub
            Else
                Dim x As Integer
                Dim frmyn As Boolean
                For x = 0 To (Me.MdiChildren.Length) - 1
                    Dim tempChild As Form = CType(Me.MdiChildren(x), Form)
                    If tempChild.Name = MDIChildFormName Then
                        frmyn = True
                        '检测到有该MDI子窗体,设为TRUE 并退出循环
                        Exit For
                    Else
                        frmyn = False
                    End If
                Next
                If frmyn = False Then
                    '在打开的窗体中没检测到则新建
                    ShowForm(MDIChildForm)
                Else
                    '在打开的窗体中检测到则激活
                    Dim MDIChildFrm As Form = CType(Me.MdiChildren(x), Form)
                    MDIChildFrm.Activate()  '使子窗体激活
                    MDIChildFrm.WindowState = FormWindowState.Normal
                End If
            End If
        End Sub
     
        '**************************************************
        '*过程名称:ShowForm
        '*参数说明:MDIChildForm ——需创建实例的窗体
        '*功能说明:创建窗体实例
        '**************************************************
        Private Sub ShowForm(ByVal MDIChildForm As Form)
            Dim MDIChildFrm As Form = MDIChildForm
            MDIChildFrm.MdiParent = Me ' 定义MDI子窗体
            MDIChildFrm.Show() '打开窗体
        End Sub
     
     
        Private Sub MenuStrip1_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MenuStrip1.ItemClicked
     
        End Sub
     
        Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
            Dim frm2 As New Form2
            CheckForm(frm2, "Form2")
            frm2.WindowState = FormWindowState.Maximized
        End Sub
    End Class
    

    好了,关于MDI子窗体的先介绍到这,有什么不足或者不正确的地方,提出来一起交流。

    展开全文
  • 窗体没有show方法

    2021-03-12 15:51:10
    其实是因为在主窗体写frmStuDemCash,VB会认为是菜单frmStuDemCash,而不是窗体frmStuDemCash,所以命名的时候注意菜单和窗体不能同名。解决办法把窗体改名为frmStuDemCash1. 改好之后仍然不见窗体frmStuDemCash1...
  • 方法很简单,就是引用 System.Windows.Forms. 然后在代码页面头部 Imports System.Windows.Forms 即可。 或者直接使用 System.Windows.Forms.Messagebox.show() 之后就能使用Messagebox...
  • 陈伟视频16~19(VB中的窗体)

    千次阅读 2020-02-11 09:36:15
    程序的窗体 SDI MDI 其他(Dialog,Flash,…) 窗体的方法 常用(Load,Show ,Hide, Unload) 其他(16.1) New和Me的使用 Dim aForm AS New Form2 aForm.Show(自动创建新的实例) Me:(当前程序运行时的当前的活动...
  • C#方法

    2020-08-15 14:44:19
    C#语言和之前学习VB 一样,在代码也有方法的使用,那么方式是如何应用的呢?下面看下介绍。 语法: [访问修饰符] static 返回值 方法名([参数列表])---------说明:[ ]的内同可以写,也可以省略 { 方法体 ...
  • 一种VB窗体之间简单的参数传递方法

    千次阅读 2008-09-04 14:57:00
    form1 和form2,form1打开form2时必须将一个值传递给form2,实现该参数传递的方法如下: 首先在form2定义一个变量,如下 public nt as string 然后在form1给该变量赋值,如下 form2.nt="aaa" form2.show ...
  • 在Vb.net 中不能象vb中 from2.show()from1.close在 from2显示后关闭from1,在vb.net中如果关闭了from1整个程序都退出了.要能实现vb中的效果只能在新建一个模块,并在模块中建一个Main函数,使程序从模块启动或Main启动....
  • 如题,现有两个窗口,在form1有button1,form2有textbox1,需要通过button1把textbox1的字符改为123,不用show和load方式,有没有最简便的方法
  • Form2.Show() End Sub Private Sub form1_FormClosing(sender As Object, e As EventArgs) Handles Me.FormClosing ' If runThread.IsAlive = True Then runThread.Abort() End Sub Private Sub Button2_...
  • 3.在VB中可以建立 菜单和 菜单 4.菜单编辑器可分为3个部分即 5.如果要把某个菜单项设计为分隔线则该菜单项的标题应设置为 6.在菜单编辑器中菜单项后面4个小点的含义是 7.建立弹出式菜单所使用的方法是 ; 1.为了把...
  • 我的目标是显示两条温度-时间曲线,一条是实际值(红色),一条是设定值(蓝色),两条线的颜色不同,字体与曲线颜色相同,显示完成后,红色的曲线,有几个点的字体颜色为黑色,代码如下: With MSChart1 ....
  • VB 打印简单文本.rar

    2019-07-10 12:07:00
    要用 PrintForm方法打印应用程序的信息,需先将该信息显示在窗体,然后再用 PrintForm 打印窗体。  部分代码如下,你可以下载完整的源码包:  Private Sub Form_Load()  Show  Me.FontSize = 16 '窗体属性...
  • Show 方法:用以显示 MDIForm 或 Form 对象。不支持命名参数。 语法如下: object.Show style, ownerform Show 方法的语法包含下列部分: object: 可选的,一个对象表达式,其值为“应用于”列表的一个对象。...
  • 这是accessoft上,作者:煮江品茶 写的一个...摘 要:【VB.NET小品】LINQ标准操作符示例 正 文: LINQ是VS的一个通用的数据查询技术,该技术简化了对SQL、XML等数据的查询。本示例介绍LINQ的标准查询符的使用方法
  • vb学生成绩管理系统

    2013-06-28 08:55:24
     理解面向对象的软件设计基本理论,学习VB软件设计的基本方法,熟悉一般软件项目开发的基本步骤,培养运用VB解决实际问题的能力和技巧。 课程设计的主要内容和要求(包括原始数据、技术参数、设计要求、工作量要求...
  • VB增强搜索插件 v1.3

    2008-05-22 06:57:23
    VB增强搜索插件 <br>如何注册插件: 开始,运行,输入 Regsvr32.exe 增强搜索插件.dll <br>如何使用插件: ...使用新的show方法来响应键盘消息 * 增加对话框的位置判断,每次显示的时候会自动调整位置
  • VB.net 演示主线程异常捕获错误的方法,如何捕获错误的例子,采用异常委托处理程序,使用MyException.Exception.Source和MyException.Exception.Message获取错误信息代码和具体的消息,将程序运行时发生的错误消息,...
  • Visual Basic方法 ...其程序的方法Show(显示)方法,Hide(隐藏)方法,Refresh(刷新)方法。 (6) Visual Basic的过程 (Procedure)过程是指经过定义或说明的,或基于某一对象对应的事件所引发的程序段。
  • 在程序的编制和调试过程,我从中学到了很多有用的方法,比如通过本次设计,我更深刻的体会到了VB系统的方便与实用。在课程设计的过程,我对课本上的知识进行了复习,从中找出了不少盲点,由衷地感觉到学习过程...
  • 模态窗体也有人叫模式窗体,是否为模态窗体由Show方法的参数决定: 语法 object.Show style, ownerform Show 方法的语法包含下列部分: 部分 描述 object 可选的。一个对象表达式,其值为“应用于”列表...
  • vb.net和vc#.net的比较-1

    千次阅读 2005-10-11 15:33:00
    这两天用了点工来学习vc#.net,感觉它和我以前学的vb.net很类似,朦胧觉得应该再好好看看vb.net,好和现在要学的...(1)在vb.net很常见的msgbox()方法在c#换了表达的形式:由MsgBox()--->MessageBox.Show() (2

空空如也

空空如也

1 2 3 4 5
收藏数 86
精华内容 34
关键字:

vb中show方法